Jump to content


fabiano.froes

Member Since 12/09/2003
Offline Last Active 10/09/2007, 21:45
-----

Posts I've Made

In Topic: Data Do Excel

19/03/2007, 16:55

infelizmente nao achei oq eu procurava nesse site se mais alguem puder me ajudar...

desde já agradeço....

In Topic: Erro De Consulta

24/10/2006, 14:56

Amigos, não é falta de registro porque eu adicionei os registros....
vou mandar o codigo completo pra vcs darem uma olhada....
<%
	set fs=Server.CreateObject("Scripting.FileSystemObject")
	fotosdir= "e:\home\masterimoveis\web\aluguel\img\"
	arqdir = "e:\home\masterimoveis\dados\" 
	Set bdaluguel = Server.CreateObject("ADODB.Connection")
	bdaluguel.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & arqdir & "bdalugueis.mdb;"
	SQL = "SELECT * FROM destaque"
	set destaque = bdaluguel.execute(SQL)
				   
%>
</head>
<body bgcolor="#6B696B" leftmargin="0" topmargin="0">
<table width="241" border="0" cellspacing="0" cellpadding="0" background="../images/fundo_destaque.gif">
  <tr>
	  <td height="6"></td>
  </tr>
  <tr> 
	<td width="241" align="left"> <marquee id="vendas" direction=up scrollAmount="2" style="width:250px;height:250px;border:0px;padding:5px;"  onmouseover='this.stop()' onmouseout='this.start()'>
	  <%if not destaque.eof then							   
		destaque.movefirst 
		while not destaque.eof 
		  cod = destaque("Imov_Codigo")
		  dest = "SELECT * FROM SIMCadImov WHERE Imov_Codigo=" & cod
		  set dadosdest = bdaluguel.execute(dest)																
											
	 %>
	  <table width="240" height="82" border="0" cellpadding="0" cellspacing="0">
		<tr> 
		  <td width="5" height="0">&nbsp;</td>
		  <td width="146" height="1" bgcolor="#AAAAAA"><font face="verdana" style="font-size:10px"><b><%=tipo%></b></font></td>
		  <td width="82" height="0" rowspan="4" bgcolor="#FF8200"><div align="center"><img src="../../aluguel/img/<%=dadosdest("Imov_Codigo")%>.jpg" width="80" height="80"></div></td>
		  <td width="7" height="0">&nbsp;</td>
		</tr>
		<tr> 
		  <td height="0">&nbsp;</td>
		  <td height="1" bgcolor="#DDDDDD"><font face="verdana" style="font-size:10px"><%'=dadosdest("Imov_Bairro")%></font></td>
		  <td width="7" height="0">&nbsp;</td>
		</tr>
		<tr> 
		  <td height="0">&nbsp;</td>
		  <td height="1" bgcolor="#DDDDDD"><font color="#FF8200" face="verdana" style="font-size:10px"><b>R$ 
			<%'=dadosdest("Imov_Valor")%>,00</b></font></td>
		  <td width="7" height="0">&nbsp;</td>
		</tr>
		<tr> 
		  <td height="0"><div align="right"></div></td>
		  <td height="0" bgcolor="#DDDDDD"><a href="java script:ver('<%'=dadosdest("Imov_Codigo")%>','<%'=tipo%>')"><div align="right"><font style="font-size:10px" face="verdana">&lt;&lt;Detalhes&nbsp;&nbsp;</font></div></a></td>
		  <td height="0">&nbsp;</td>
		</tr>
	  </table>
	  <br>
	  <%
	  dadosdest.close
	  set dadosdest = nothing
	  destaque.movenext
	  wend 
	  end if	
	   destaque.close
	  %>
	  </marquee> </td>
  </tr>
	<tr>
	  <td height="6"></td>
  </tr>
  <tr> 
</table>
eu tenho um bd com duas tabelas destaque e SIMCadImov onde destaque tem os codigos dos registro de SIMCadImov que são destaques entaum eu selelcionei primeiro todos os registros de destaque e depois seleciono um por um os registros na tabela SIMCadImov, eu acho que o problema esta em ter um select dentro do outro porque qdo eu faço separadamente funciona....

In Topic: Thumbnail

16/10/2006, 15:33

pode ate gravar mas depois de viazualizado, tenho q apagar do servidor...

In Topic: Imagens

05/10/2006, 16:39

esse codigo funciona, mas quando eu selecionar o registro de codigo "12" ira aparecer todas as imagens q começa com "12", incluindo 123_1.jpg, 1234_1.jpg e etc

como eu resolvo isso...??? (y) (y)

In Topic: Qtos Digitos?

05/10/2006, 16:36

valew....
(y)

IPB Skin By Virteq