Ver Mensaje Individual
  #9 (permalink)  
Antiguo 29/06/2004, 13:57
siannah
 
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