<?
/*This program werk for checking someone online on Mailinglist on egroup
this sample checking it-center mailing list and find someone called Made Wiryana
if we found him so print that he online vice versa
hoply this program usefull for you
greeting to :
My Wife ( dessy )
My brother Mohammad Nafiri
My friends at satunet.com groups keep on hard werk guys!!
My Idol Mr. Made Wiryana, this program for you sir!
My Best friend Mr.Brian!!!! hidup cruuuottttt!!
Jakarta 14, March 2000
idban secandri
idban@satunet.com */
$file=fopen("http://www.egroups.com/messages/itcenter/","r");
if (!$file) {
echo "error when connectn";
exit;
}
while (!feof($file)) {
$line = fgets($file,1024);
if (eregi("(.*)Made Wiryana", $line, $out)){
$i++;
if ($i > 1) { break; }
if($out){ echo "<font color="red"><B>Mr.Made</B> just make a reply on itcenter mailing list</font>n"; die;}
}
}
echo "duh!,<B>Mr.Made</B> Not Online yet!n";
fclose($file);
?>
|
|
Store
Your email:
