Scipt who's online kserete?

cdhyper

Thelo ena script who's online alla gia olo to site (to domain).

kserei kaneis kanena kalo?

grjava · Στις: 24 Απρ 2003 01:29 Θέμα:

Για να γινετε αυτό θα πρεπει να υπαρχει μια λίστα εγεγραμμένων χρηστών στο site για κάποιο λόγο (π.χ. σε forum). Από κει και πέρα τα ετοιματζίδικα scripts (π.χ. phpbb) δίνουν κάποια έτοιμα scripts τα οποία τοποθετείς σε όποια σελίδα θέλεις και σου λένε ποιοί είναι online στο forum. Το πρόβλημα είναι ότι μόλις βγει ο χρήστης από το forum παύει να τον λαμβάνει ως online. οπότε η μόνη λύση είναι να κάνεις αυτό που κάνουν τα portals δηλ. να λες στον χρήστη να κάνει εγγραφή για κάποιες παραπάνω υπηρεσίες και χρησιμοποιώντας κάποιο script να εμφανίζονται οι χρήστες με τα ονοματά τους και οι απλοί επισκέπτες σε αριθμό.
Σημ.: Για να γίνουν όλα αυτά χρειάζεται βάση δεδομένων (π.χ.MySQL).

cdhyper · Στις: 24 Απρ 2003 01:36 Θέμα:

exo to phbb alla den ennoo auto.

exo dei tetoia scripts alla de thimamai pou. de xreiazontai aparetita vasi, alla kai na xreiazontai no problem.

fantasou oti leitourgei kapos san ta scriptakia counters episkepton

greekbytes · Στις: 24 Απρ 2003 14:00 Θέμα:

Loipon.. Ena pou exo xrisimopoiisei.. me ena mikro iframe...

Se ena arxeio online1.php vazeis:

κώδικας:

<?php
$log_file="online.txt";
$min_online="1";
if ($HTTP_X_FORWARDED_FOR == "") {
$ip = getenv(REMOTE_ADDR);
}
else {
$ip = getenv(HTTP_X_FORWARDED_FOR);
}
$day =date("d");
$month =date("m");
$year =date("Y");
$date="$day-$month-$year";
$ora = date("H");
$minuti = date("i");
$secondi = date("s");
$time="$ora:$minuti:$secondi";
$users_read = fopen("$log_file", "r");
$users = fread($users_read, filesize("$log_file"));
fclose($users_read);
$to_write="$ip|$time|$date";
if($users==0){
$user_write = fopen("$log_file", "w");
fputs($user_write , $to_write );
fclose($user_write );
}
else{
$users=explode("\n",$users);
$user_da_tenere=array();
while (list ($key, $val) = each ($users)) {
$user_sing=explode("|",$val);
if($date==$user_sing[2]){
$h=explode(":",$user_sing[1]);
if($ip!=$user_sing[0]){
if(($h[0]==$ora)and(($minuti-$h[1])<=$min_online)){
$user_da_tenere[]=$val;}
if(($h[0]==($ora-1))and((($minuti+2)-$h[1])<=$min_online)){
$user_da_tenere[]=$val;
}
}
}
}
$user_da_tenere[]=$to_write;
$user_write = fopen("$log_file", "w");
fputs($user_write , "" );
fclose($user_write );
while (list ($k, $v) = each ($user_da_tenere)) {
$new_file_log = fopen ("$log_file", "a");
fwrite($new_file_log,"$v\n");
fclose($new_file_log);
}
}
$users_online_read = fopen("$log_file", "r");
$users_online = fread($users_online_read, filesize("$log_file"));
fclose($users_online_read);
$users_online=explode("\n",$users_online);
$n_u_online=count($users_online)-1;
echo "<html>";
echo "<head>";
echo"<meta http-equiv=\"Refresh\" content=\"15; URL=online1.php\" >";
echo "</head>";
echo "<body bgcolor=\"#FFFFFF\">";
echo "<font face=verdana size=1>$n_u_online";
?></body>
</html>

Dimiourgeis ena arxeio online.txt kai to kaneis writable (CHMOD 666 as poume)

Kai vazeis ekei pou thes na emfanizetai to eksis iframe:

κώδικας:

Se emena douleuei kanonika kai einai kai elafri.

greekbytes · Στις: 24 Απρ 2003 14:09 Θέμα:

Simeiosi:
Epeidi les oti thes gia olo to site... Auto tha metraei online users stis selides pou to exeis valei na emfanizetai... An to exeis kato kato as poume se oles tis selides tha metraei pantou.. An thes mporeis na to valeis kai sto forum sou sto footer....

cdhyper · Στις: 24 Απρ 2003 14:10 Θέμα:

den to xrisimopiisa akoma alla exo mia proaisthisi oti tha leitourgisi. tha sou po ta apotelesmata se ligo

cdhyper · Στις: 24 Απρ 2003 14:49 Θέμα:

doulevei kai einai ontos elafri. tou evala to katallilo xroma background kai ti frasi pou thelo na deixnei.

thanx a lot. auto akrivos xreiazomoun