
10/07/2003, 05:20
|
| | Fecha de Ingreso: mayo-2003
Mensajes: 866
Antigüedad: 22 años 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> |