14 replies to this topic

[KBR]

Olá pessoal...
Usei a pesquisa mas nada encontrei.

Gostaria de umm script onde eu sabera os membros e não membros logados em meu site. Como poderei fazer isso???

Sem mais...

[wdalc]

No wmonline tem um exemplo pra fazer download

[[webmaster]®]

http://forum.wmonlin...usuarios online

[KBR]

Fiz um esquema muito bacana...]

Fiz o seguinte esquema...

Se o usuário estiver logado, ele grava o id do usuario no banco de dados, gravando o ip também e a data + qtos minutos eu configurar, que no caso... coloquei 5 minutos... Assim ele me retorna os usuários cadastrados on-line.

O mesmo fiz com os que não são membros do site... ao invés dele gravar o id, ele grava 0... onde 0= naomembros... aí sei os que estão on-line e que não são membros...

Ficou mais que perfeito o sistema, quem quiser ver... clica aqui...

Agradeço a atenção de vocês...

[K I L L I N G]

eu tenho um muito legal também e perfeito... vou colocar para download e coloca a URL aki ok?

[<%Rafael%>]

eu tenho um muito legal também e perfeito... vou colocar para download e coloca a URL aki ok?

Issooo por favor.. hehehe!! também to precisando... já tentei vários códigos aqui do fórum e ainda nada.. hehe

Falow!!!

[KBR]

Põe ae cara...

[lazerediversao]

Olá KBR eu tenho uma sugestão !!!

Bem eu fiz um também quase com o mesmo raciocinio só tem algumas diferenças !!!

Mas minha sugestão é a seguinte !!!

Ao invês de vc colocar os minutos vc poderia fazer um frame e atualiza-lo a cada tempo determinado por vc ai vc teria uma contagem mais exata !!!

Por exemplo eu entro em seu site e lá consta que tem 5 pessoas online porém elas já podem ter saido a uns 4 minutos !!!

Então vc colocando um frame vc pode fazer o seguinte primeiro vc verifica se existe algum usuário inativo de atualização a cada por exemplo 1 minuto e meio
se existir vc faz um código para retirá-lo e após isso vc atuliza o tempo do cara que está em sua página !!!

Deu para entender ???

Se tiver dúvidas poste ai !!!

Bem foi apenas uma sugestão eu fiz desta forma e ficou D+ !!!

Edição feita por: lazerediversao, 19/03/2004, 09:18.

[KBR]

Sim cara, com certeza.
Eu pensei em fazer isso, é muit mais eficaz, com certeza, sendo que à cada vez que eu acessar o site, ele irá me trazer somente os on-line mesmo.

Mas uma coisa... como ele irá verificar os inativos??? de qualquer jeito eu terei que fazer a data de expiração, por exemplo, 30 segundos... 1 minutos... 10 minutos... sei lá...

[wozniak]

artigos interessantes sobre o assunto

http://www.freecode....BQQK84802WFPYEW

http://www.freecode....TAXA67154QNVOJL

t+

[Matrix2003]

sem querer atrapalhar mais se o KBR le-se suas mensagens já taria com isto resolvido pois já mandei uma mensagem que fiz o codigo para ele me contacte já zanelati2002@hotmail.com

[wozniak]

sem querer atrapalhar mais se o KBR le-se suas mensagens já taria com isto resolvido pois já mandei uma mensagem que fiz o codigo para ele me contacte já zanelati2002@hotmail.com

cara vc ta falando coisa com coisa, para um pouquinho antes de postar, e releia sua mensagem, pq vc sabe oq vc está dizendo mais os outros não

t+

[K I L L I N G]

Ainda naum coloquei para download o meu sistema, mas vou explicar como ele é, além de ser mais um sistema 1000000% K I L L I N G!

No seu banco de dados deve ter uma tabela com as colunas usuario e senha certo? nesta tabela, insira mais 2 colunas:
Hora, OnLine
Após isto, vem o sistema em HTML...
Cria um iframe de tamanho 0,

<iframe src="confere.asp" scrolling="no"  width="1" height="1"></iframe>

Agora vem o sistema que criei em ASP:

CONFERE.ASP / pg-de-login.asp

SQL = "SELECT * FROM usuarios WHERE usuario = '" & session("usuario") & "' AND senha = '" & session("senha") & "'"
RS.open SQL,conn,3,3

	if rs.eof then
	response.redirect "index.html"
	Else
	
set rsc = server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM usuarios"
rsc.open SQL,conn,3,3

Do while Not rsc.eof
str = dateDiff("n",rsc("hora"),time())
strx = dateDiff("h",time(),rsc("hora"))

if str > 5 OR strx >= 1 then 

'este "> 5", quer dizer se o user estiver INATIVO
'por mais de 5 min, e este >= 1
'quer dizer se o user estiver fora do site
'a mais de um dia

rsc.update
rsc("online")="Não"
rsc.update
End if

Rsc.MoveNext
Loop

	rs.update
	rs("hora")=time()
	rs("OnLine")="Sim"
	rs.update

MOSTRANDO QUANTOS USUÁRIOS ESTÃO ON-LINE

SQL = "SELECT * FROM usuarios WHERE online = '" & sim &  "'" 
rs.open sql, conn, 3, 3

	If rs.eof then
	response.Write("0")
	Else
	response.Write(rs.RecordCount)
	End if

MOSTRANDO OS USUÁRIOS ON-LINE

SQL = "SELECT * FROM usuarios WHERE online = '" & sim &  "'" 
rs.open sql, conn, 3, 3

	If rs.eof then
	response.Write("Nenhum usuário On-Line no momento.")
	Else

Do while not rs.eof
response.Write(rs("usuario") & "<br>")
rs.MoveNext
Loop

	End if

* conversinha *
- K I L L I N G: nossa KILLING, vc não é refri... MAS SEMPRE TAÍ....
- KILLING: nossa K I L L I N G, vc não é macarrão, MAS É MASSA PRA CARAMBA
-KILLING: ahhh!!! brigado....
- K I L L I N G: brigado tb, e de nada...
- KILLING: não brigado vc...................................
(...)

* To be CONTINUE *

Edição feita por: K I L L I N G, 21/03/2004, 00:04.

[K I L L I N G]

E AI, FUNCIONOU????

[Reckless]

Ta mais qts arquivos ASP eu tenho q criar ?? seria um para cada item ??

Cada script faz uma coisa diferente ou eu posso juntar tudo ?


valeu se funcionar vai ser show de bola