2 replies to this topic

[Andre Moura]

Alguem já viu acontecer esse erro?

Seguinte, essa programação roda perfeitamente no meu micro com WinXP. Mas qdo coloco no servidor os campos Email, Cidade e Data naum exibem.

Os codigos em azul sao os q naum exibem.


Isso já aconteceu com alguém? O q pode estar acontecendo?

Valew!!

A página é essaCLIQUE AQUI

<%
  Set Conexao = Server.CreateObject("ADODB.Connection")
  Conexao.Open Application("db")
 
  SQL = "SELECT * FROM Visitas ORDER BY Id DESC"
 
  Set Listar = Conexao.Execute(SQL)
 
  While Not Listar.EOF
    
   %>
   <table cellpadding="0" cellspacing="0" border="0" class="borda-livro"><tr><td>
   <table width="470" border="0" cellspacing="0" cellpadding="6">
    <tr bgcolor="#FFCC00">
    <td colspan="2"><strong><%=Listar("Nome")%></strong></td>
    <td width="102" align="center"><%
   
    Response.Write Mid(Listar("Data"),1,(Len(Listar("Data"))-3))   
    %></td>
     </tr>
    </table>
   <table width="470" height="80" border="0" cellpadding="10" cellspacing="0">
      <tr valign="top">
    <td width="28" height="50" align="center"><p><img src="images/gb_msg.gif" width="28" height="25"></p>
      </td>
    <td height="100" rowspan="2"><table width="100%" height="60" border="0" cellpadding="0" cellspacing="0">
      <tr><td height="50" align="justify" valign="top">
      <%
     
      Response.Write Listar("Comentario")
     
      %>
    </td></tr></table>

    <%
   
    If Listar("Cidade") <> "" Then
     Response.Write "<br><strong>"
     Response.Write Listar("Cidade")
     Response.Write "</strong>"
    End IF    
    %>
   
    </td>
      </tr>
      <tr valign="top">
     <td height="38" align="center" valign="bottom"><%
      If Not Listar("Email")=""  Then
     Response.Write "<a href=mailto:"
     Response.Write Listar("Email")
     Response.Write "><img src='images/email.gif' border='0' width='18' height='13' alt="
     Response.Write Listar("Email")
     Response.Write "></a>"
      End If      %></td>
      </tr>
   </table>
   </td></tr></table><br>
   <%
   Listar.MoveNext
  WEnd
  Conexao.Close
  Set Conexao = Nothing
  Set Listar = Nothing
  %>

Edição feita por: Andre Moura, 05/08/2004, 14:52.

[Info_Tec]

Parece que exibiu, mas tome cuidado com as tags html heim!

[Andre Moura]

ainda naum está exibindo, e já conferi todo html q envolve.. tá tudo certo, tanto q aqui na minha máquina funciona tudo perfeitamente..

já troquei Listar("Cidade") por Listar(3) q é o numero do campo, mesmo assim naum resolve...

O q eu percebi tb é q somente os dados q estão dentro da estrutura If q naum sao exibidos, embora as tag html sim.

Bom, estou achando muito estranho, pois nunca aconteceu isso antes.