Usuarios Onli]ne

[ramon]

alguém tem um script para eu ver quantos usuarios estao online no meu site

[OSJunior]

Faz assim:

#!/usr/bin/perl
$tempo = "300";
# Tempo em Segundos que um usuário contará como online. Padrão = 300.
$bd = "online.rse";
# Path completo para o arquivo de dados.
$cor = "000000";
# Cor que deseja para mostrar quantos usuários estarão online.
$texto = "Usuário";
use CGI;
$query = new CGI;
$ipx = $ENV{'REMOTE_ADDR'};
$tmp = time();

open (bd,"$bd");
@bd = <bd>;
close (bd);

foreach (@bd) {
($ip,$tempox) = split(/\|\|/, $_);
$tempon = $tempox + $tempo;
if ($tmp > $tempon or $ip eq $ipx) {

open(del,"$bd"); 
@del = <del>; 
close (del);
chomp(@del);
open(bx,">$bd"); 
close (bx);
foreach $linha (@del) { 
if($linha eq "$ip||$tempox||") { next; }
else {
open(delx,">>$bd"); 
print delx "$linha\n";  
close(delx);  
}
}
}
}

open (bd,">>$bd");
print bd "$ipx||$tmp||\n";
close (bd);

open (bd,"$bd");
@bd = <bd>;
close (bd);
$usuarios = @bd;

if ($usuarios > '1') { $texto .= "s"; }

print "content-type:text/html\n\n";
print qualquer~document.write('<a href="https://www.scriptbrasil.com.br"><font face="Verdana" size="1" color="$cor">$usuarios $texto Online</font></a>');~;

É necessário um outro arquivo para isso.

qualquer duvida me contate.

falou.

[ramon]

É necessário um outro arquivo para isso.

Qual arquivo?

[OSJunior]

você cria um arquivo chamado: online.rse vazio.

//para o banco de dados.

Abraços.

[Guest Renan Elias]

você cria um arquivo chamado: online.rse vazio.

//para o banco de dados.

Abraços.

Olha meu código =)

eu que fiz este´código

.rse = .RenanSilveiraElias

=)

Tem pra download em meu site

http://www.scriptsnan.rg3.net

tem inumeros scripts para download lá

Se precisar de algum script exclusivo entre em contato para negociar-mos valores.

Até breve!

[Guest Guest]

valeu vou rodar o script neste final de semana

[gross]

Alguém poderia trazer um filme bom da blockbuster aqui em casa????

Quero ver comédia ok...

e ve se deixa pago!!!!!!!

Hehehe

to brincando... só para descontrair...hehehe

são 3 da manhã...

boa noite!

[ramon]

Alguém poderia trazer um filme bom da blockbuster aqui em casa????

Quero ver comédia ok...

e ve se deixa pago!!!!!!!

Hehehe

to brincando... só para descontrair...hehehe

são 3 da manhã...

boa noite!

Viajou o maluco

[OSJunior]

hehehe...

Eles disse que são 3h da manhã, deve estar bêbado...

falou.