Foros del Web » Programando para Internet » ASP Clásico »

Me muestra todos los registros completos, menos el primero

Estas en el tema de Me muestra todos los registros completos, menos el primero en el foro de ASP Clásico en Foros del Web. Me muestra todos los registros completos, menos el primero en el que solo me muestra la fecha pero no la url, ¿Por que? ¿Como se ...
  #1 (permalink)  
Antiguo 10/07/2003, 05:20
 
Fecha de Ingreso: mayo-2003
Mensajes: 866
Antigüedad: 21 años, 1 mes
Puntos: 0
Me muestra todos los registros completos, menos el primero

Me muestra todos los registros completos, menos el primero en el que solo me muestra la fecha pero no la url, ¿Por que?
¿Como se podria solucionar?

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!-- #include file="db.asp" -->
<!-- #include file="links.asp" -->
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<%'SE USA UNA PARTE PARA COGER LA URL Y OTRA PARA MOSTRAR LA URL
'Definimos las variables a utilizar.
Dim cuando, url
'tomamos el instante de entrada.
cuando = Now
'con esta variable de servidor, conseguimos la direccion URL de donde vino el visitante.
url= Request.ServerVariables("HTTP_REFERER")
if url="" then
else

db.Execute "INSERT INTO url (cuando,url)VALUES('"&cuando&"','"&url&"')"


end if


%>

<% set rsurl=DB.Execute("select * from url order by cuando")
cuando=rsurl("cuando")
url=rsurl("url")
%>
<div align="center">
<center>
<table border=1 cellpadding=5 cellspacing="0">
<tr>
<td align="center" valign="middle"><font face="helvetica, arial" size="-1" color="<%= text %>">
<b>Fecha</b>
</td>
<td align="left" valign="middle"><font face="helvetica, arial" size="-1" color="<%= text %>">
<div align="center"><b>Url</b> </div></td>
</td>
</tr>
<%
while not rsurl.eof
%>
<tr>
<td align="center" valign="middle"><font face="helvetica, arial" size="-1" color="<%= text %>">
<a href="cliente.asp?fecha=<%=rsurl("cuando") %>"><%=rsurl("cuando") %></a>
</td>

<td align="left" valign="middle"><font face="helvetica, arial" size="-1" color="<%= text %>">
<%=rsurl("url") %>
</td>

</tr>
<%
rsurl.movenext
wend
%>
</table>
</center>
</div>
</td>
</table>
<%db.Close
Set db = Nothing
%>
<br>

</body>
</html>
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 23:34.