 |
Submit Your Code | |
 |
SEO Monitor | |
 |
UpTime Monitor | |
 |
PHP Code Contest | |
 |
My Favorite Examples | |
|
My Favorite Articles | |
 |
Update Your Profile | |
|
|
| More Weber Sites | ||
| PHP Code Search | ||
| Web Development Forums | ||
| Learn MySQL Playing Trivia | ||
| PHPBB2 Templates | ||
| Web Development Index | ||
| PHP Web Logs (BLogs) | ||
| Web Development Resources | ||
| Web Development Content | ||
| Recommended Links | ||
| PHPClasses | ||
| PHP Editor | ||
| PHP Jobs | ||
| Vision.To Design | ||
| Ajax Tutorials | ||
| PHP Programming Help | ||
| PHP/MySQL Programming | ||
| Webmaster Resources | ||
| Webmaster Forum | ||
| XML meta language | ||
| website builder | ||
| Recommended | ||
| Submit Site | ||
| Forex Trading Online forex trading platform | ||
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| Code | |||||
<? // 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 connect\n"; 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> | |||||
| Related Code Examples | |||||
