Users Online com "Access"

[Hempinho 0]

Ae fazendo favor, alguem pode me da uma força aqui nesse sistema de usuários online. bom eu tava tentando faze aqui e tal, só que é o seguinte por exemplo é pra ele fica nessa forma:

 

Usuarios:

user1

user2

membros: 2

visitantes: 0

total: 2

 

só que acontece que, quando eu me logo ele aparece la 1 membro, total 1, e meu nome de usuario ali "imprimido", só que quando entra outra pessoa logada ou não ele ja não faz mais as "contagens" ai só fica na maquina do usuario o mesmo que fica na minha, o nome de usuario dele na tela e 1 membro, total 1. o que estou fazendo de errado no código abaixo ?

 

ASP [/tr][tr]<%

IF Session("sessaousuario") = "" THEN

usuario = "-"

ELSE

usuario = Session("sessaousuario")

END IF

 

horas = Time()

ip = Request.ServerVariables("REMOTE_ADDR")

conexao.execute("INSERT INTO users_online (usuario,ip,horas) VALUES ('"&usuario&"','"&ip&"','"&horas&"')")

conexao.execute("DELETE * FROM users_online WHERE horas < Time() - 60")

 

set rs = conexao.execute("SELECT * FROM users_online")

While Not rs.EOF

Response.Write(""&usuario&"")

rs.movenext

Wend

%>

<%

SQL = ("SELECT DISTINCT ip FROM users_online WHERE usuario <> '-' ")

set rs = server.createobject("adodb.recordset")

rs.open sql,conexao,3,3

Response.Write("Cadastrados: <b>"&rs.recordcount&"<b>")

%>

<%

rs.close

set rs = nothing

SQL = ("SELECT DISTINCT ip FROM users_online WHERE usuario = '-' ")

set rs = Server.Createobject("adodb.recordset")

rs.open sql,conexao,3,3

Response.Write("Visitantes: <b>"&rs.recordcount&"<b>")

%>

<%

rs.close

set rs = nothing

SQL = ("SELECT DISTINCT ip FROM users_online")

set rs = server.createobject("adodb.recordset")

rs.open sql,Conexao,3,3

Response.Write("Total: <b>"&rs.recordcount&"<b>")

%>

<%

END IF

rs.close

set rs = nothing

%>

[/tr]

[Mário Monteiro 179]

você tambem precisa atualizar a hora a cada nova atualização, senão mesmo online o cara não vai contar...

[Mário Monteiro 179]

??

O que significa...

[Hempinho 0]

eu sómente não entendi o que você quis dizer. :/

[Mário Monteiro 179]

cada pagina que o cara acessa você atualiza a hora que o cara acessou...

[dark0 0]

é isso aívocê precisa dar um UPDATE na tabela usuarios online, e atualizar o link que o usuario clicou, e a data/hora que ele clicou!Assim, mesmo o usuario estando no site à um bom tempo, seu sistema vai identificar !!T+

[DanDan 0]

eu so nao entendo uma coisa, como que e a tabela do acess, que campos ela contem?ae, como que eu mostro o nome dos membros nesser codigo?Grato