<?
// dedicate to my wife ( desy ) who infected with Hepatitis B virus, throw 'em away honey!, you can doit!!
// distribute as GPL!
?>
<table border="0" width="98%" bgcolor="#000000" cellspacing="0">
<tr>
<td width="100%"><small><font face="Verdana" color="#FFFFFF"><strong>7 latest mail from php3 mailing
list on php3-general</strong></font></small><table border="0" width="100%"
bgcolor="#000000" cellspacing="1">
<tr>
<td width="68%" bgcolor="#8080C0"><font face="Arial" color="#000000"><small><strong>Subject</strong></small></font></td>
<td width="19%" bgcolor="#8080C0"><font face="Arial" color="#000000"><small><strong>Author</strong></small></font></td>
<td width="13%" bgcolor="#8080C0"><font face="Arial" color="#000000"><small><strong>Date</strong></small></font></td>
</tr>
<?
$bulan= time();
$bulanstr=date("m",$bulan+(0*3600));
$fp = fsockopen("www.zend.com", 80, &$errno, &$errstr, 30);
if(!$fp) {
echo "Zend.com down!! :( <br>n";
exit; }
else {
$file=fopen("http://www.zend.com/lists/php-general/2000$bulanstr/maillist.html","r");
if (!$file) {
echo "error when connectn";
exit; }
while (!feof($file)) {
$line = fgets($file,1024);
if (eregi(" <A NAME="(.*)</A>", $line, $subject)){
$su++;
if ($su > 7) { break; }
$subject2= str_replace("HREF="","HREF="http://www.zend.com/lists/php-general/2000$bulanstr/",$subject[1]);
print (" <tr>n
<td width="68%" bgcolor="");
if ($su % 2 ) { echo"#C0C0C0"; } else { echo"#8080C0"; }
print ("" valign="top"><font face="Arial" color="#000000"><small><A NAME="$subject2</a></small></font></td>n");
}
if (eregi(" <a href="mailto:(.*)</a>", $line, $author)){
$au++;
if ($au > 7 ) { break; }
print (" <td width="18%" bgcolor="");
if ($su % 2 ) { echo"#C0C0C0"; } else { echo"#8080C0"; }
print ("" valign="top"><font face="Arial" color="#000000"><small><a href="mailto:$author[1]</a></small></font></td>n");
}
if (eregi("(.*)/2000", $line, $date1)){
$da1++;
if ($da1 > 7 ) { break; }
print (" <td width="13%" bgcolor="");
if ($su % 2 ) { echo"#C0C0C0"; } else { echo"#8080C0"; }
print ("" valign="top"><font face="Arial" color="#000000"><small><p align="right">$date1[1]");
}
if (eregi("/2000(.*)", $line, $date2)){
$da2++;
if ($da2 > 7 ) { break; }
print ("/2000 $date2[1]</small></font></td>n</tr>n");
}
}
}
fclose($file);
?>
<tr>
<td width="100%" bgcolor="#8080C0" valign="top" colspan="3"><font face="Arial"
color="#000000"><small><p align="right">source <a href="http://www.zend.com">zend.com</a>
mailing list archive! copyright � <a href="http://www.zend.com">zend.com</a> 2000</small><br>
<small>script done by<a
href="mailto:idban@tekkenzaibatsu.com?subject=gimme latest zend mailing list script">
idban secandri</a> want this script? just 1 US$ and contact me :) </small></font></td>
</tr>
</table>
</td>
</tr>
</table>
|
|
Store
Your email:
