a cada 10 minutos fazer upldate

[zanelati2002 0]

olá amigos precisa da ajuda de vocês mais uma vez tenho um codigo de usuarios online cuja o cara se loga e o nome do cara fica logado mais para o cara sair do sistema ele precisa ir em sair do sistema ai vai par uma onlineoff.asp que faz com que o cara deixe de existir queria ver se a possibilidade de o cara não precisar clicar em sair sei lá não deria jeito de a cada 10 minutos o sistema fazer um uptade sozinho. olhem o codigo.

 

online.asp pagiana que fiz para mostrar os users online.

 

<%Set você = Server.CreateObject("ADODB.Connection")você.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("usuarios.mdb") &";Persist Security Info=False"vConta2="SELECT COUNT(ehmembro) AS monline FROM users WHERE ehmembro=1"Set vConta=você.Execute(vConta2)vMembros2="SELECT * FROM users WHERE ehmembro=1"Set vMembros=você.Execute(vMembros2)%></font><% IF vMembros.EOF THENResponse.Write "<tr><td width='100%'><p align=center font face=Verdana font color=#FFFFFF size=1>Nenhum membro online.</a></font></td></tr>"ELSEwhile not vMembros.EOF %><tr><td width="100%"><font face=Verdana size=1><p><font color="#FFFFFF"><img border="0" src="images/arrow1.gif">                  <a href="mailto:<%=vMembros("email")%>"><font color="#FFFFFF"><%=vMembros("login")%></a></font></font></td></tr><%vMembros.MoveNextWendEND IF%><tr><td width="100%"><font color="#FFFFFF" face="Verdana" size="1">Total: <%=vConta("monline")%></f

valida login.asp codigo para validar o login e mardar o users logado para o db

<!--#include file="conectar.asp"--><% AbreConexaologin = Replace(request.form("login"), "'", "/")  senha = Replace(request.form("senha"), "'", "/")Sql = "SELECT * FROM users WHERE login = '"&login&"' "Sql = Sql & "AND senha='"&senha&"' "Set Rs = Conexao.Execute(Sql)if not rs.eof thenSession("yep") = TrueSession("id") = RS("id")Session("login") = RS("login")Session.Timeout = 360Sql = "UPDATE users SET UltimaVisita=NOW WHERE login = '" & login & "'"Sql = "UPDATE users SET vezes=vezes+1 WHERE login = '" & login & "'"Sql = "UPDATE users SET ehmembro=1 WHERE login = '" & login & "'"Response.Cookies("login") = rs("login")Set Rs = Conexao.Execute(Sql)if stayloggedin = "yes" thenrs.closeset rs = nothingconn.closeset conn = nothingend ifResponse.Redirect "menu.asp"elseResponse.Redirect "erro.asp"end ifFechaConexao %>

onlineoff.asp pagina que a pagina sair vai para o cara sair do sistema

 

<%Set você = Server.CreateObject("ADODB.Connection")você.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("usuarios.mdb") &";Persist Security Info=False"username = request.cookies("username")IF NOT username = "" THENvOn = "UPDATE users SET ehmembro='0' WHERE username = '" & username & "'"você.Execute(vOn)ELSEnada = "nada"END IF%>

espero que alguém possa me ajudar

[Wallace.NET 0]

você tem q fazer de um jeito q em qualquer página possa haver essa verificação, e utilize sessions. Aí quando ocorrer o Session.Timeout e o cara for tentar acessar alguma página, você o redireciona para a pagina de login ou outra qualquer. ok? ;)

[Mário Monteiro 179]

o lance eh o que o Wallace.NET dissetoda pagina deve ter um include com o codigo do updateentretando eu usaria DB ao inves de sessionarmazena a data hora do ultimo acesso do cara (sendo que a cada nova pagina esta hora tb eh atualizada) e caso fique 10 minutos sem mexer o cara fica off

[zanelati2002 0]

mais no caso eu gravo a hora do login mais não sei fazer um upldate a cada 10 minutos

[Mário Monteiro 179]

não eh bem pra fazer update a cada dez minutos e sim verificar se o cara está mais de 10 minutos inativoentão esta verificação tem de ser feita sempre e sempre a cada atualização de qualquer page...