
29/06/2004, 13:57
|
| | Fecha de Ingreso: diciembre-2003 Ubicación: WWW
Mensajes: 98
Antigüedad: 21 años, 4 meses Puntos: 0 | |
Amigo RsOFT, hice esto:
Código:
dim cnn, rs, sSql
Set cnn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")
cnn.open("stringconnection")
sSql= "Select top 1 convert(varchar(10),Fecha,103) Fecha from Estadistica order by fecha desc"
rs.open sSql,cnn
With rs
if .recordcount <> 0 then
'If FormatDateTime(Date,1) = FormatDateTime(rs("Fecha"),1) then
'cnn.execute("Update Estadistica Set Visitantes = Visitantes + 1 where convert(varchar(10),fecha,103) = Convert(varchar(10),'" & date & "',103)")
'else
cnn.execute("Insert into Estadistica (Visitantes) values(1)")
'End If
End If
End With
rs.Close
cnn.Close
Set rs = Nothing
Set cnn = Nothing
Sólo dejé que se ejecutara el insert. Lo que puedo ver es que el código no se ejecuta por una de las funciones de asp: Date o FormatDateTime.
Seguiré probando y te cuento...
__________________ "No nos atrevemos a muchas cosas porque son difíciles, pero son difíciles porque no nos atrevemos a hacerlas" :si:
Séneca
Última edición por siannah; 29/06/2004 a las 14:06 |