Mira es muy facil. cuando un usuario inicie session en tu pc. Entonces tu deberás introducir en tu base de datos los datos que necesitas para reconocer a esta persona.. suponte lo siguiente
ESTO ES PARA REGISTRAR A TU USUARIO COMO ONLINE
<%
Dim rs,conexion
conexion="Parametros de Conexion sin DSN con OLEDB"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.ActiveConnetion = conexion
rs.Source = "SELECT * FROM usuariosonline"
rs.LockType=3
rs.CursorType = 2
rs.CursorLocation = 2
rs.Open()
rs.AddNew
rs.fields("ip")=Request.ServerVariables("REMOTE_AD DR")
rs.fields("nick")=Request.Form("nick")
rs.fields("password")=Request.Form("password")
rs.Update
'Entonces ya sabes que este usuario ya está registrado en tu bd como OnLine
%>
http://msdn.microsoft.com/library/de..._vbom_seso.asp
Más especificaciones sobre el Object Session.. Deberás saber Inglés
ESTO ES PARA ELIMINAR A TUS USUARIOS DE LA BD
DE TALMANERA QUE NO ESTEN ONLINE.. ESTE SE EJECUTA MEDIANTE LA
INSTRUCCION CERRAR SESSION O
Sub Session On_End
<%
Dim rs,conexion
conexion="Parametros de Conexion sin DSN con OLEDB"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.ActiveConnetion = conexion
rs.Source = "SELECT * FROM usuariosonline WHERE ip="'&Request.ServerVariables("REMOTE_ADDR")&'""
rs.LockType=3
rs.CursorType = 2
rs.CursorLocation = 2
rs.Open()
rs.Delete
rs.Update
%>
Si no entiendes puedes enviarme un correo a
[email protected]