Ultimas visitas reales...

[Fr@Nc3$c0]

Hola de nuevo chic@s:

He realizado todo esto y bien... salvo una pequeña pregunta que quisiera me ayudaran:

' ~~~~ Guardamos las visitas en la BD ~~~~
Application.Lock()
IP_Usuario = Request.ServerVariables( "REMOTE_ADDR" )
Soft_Usuario = Request.ServerVariables( "HTTP_USER_AGENT" )
Hora_Usuario = Now()

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Application("ConexionContadores")
SQLQuery1 = " INSERT INTO Visitantes (IP_Usuario, Soft_Usuario, Hora_Usuario) VALUES ('"&IP_Usuario&"', '"&Soft_Usuario&"', '"&Hora_Usuario&"') "
Conn.EXECUTE(SQLQuery1)
Application.Unlock()
' ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Ese es el código que he empleado para salvar las visitas desde el global.asa en una BD.
Todo es correcto, va añadiendo registros en la tabla de visitantes correctamente...

Pero cuando quiero mostrar el número de visitas que he recibido, no consigo imprimirlo en pantalla como antes.

Utilizo esto:


SQLQuery2 = " SELECT Count(Id) FROM Visitantes "
Set RS2 = Conn.EXECUTE(SQLQuery2)
' e intento convertirlo en una variable o que?
' Acá supongo que tengo el número de visitas totales, pero no se conservarlo en una variable para poder imprimirlo.

session("Visitas") = RS2

' y entonces desde donde quiera imprimirlo....

Visitas = session("Visitas")

pero esto no resulta.


Gracias de antemano.