home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 4_2005-2006.ISO / data / Zips / Wisdom_Quo199211552006.psc / quotes.php < prev    next >
Text File  |  2006-05-03  |  825b  |  48 lines
  1. <html>
  2. <style>
  3. <!--
  4. body         { border-style: none; border-width: 1; background-color: #FFFF99 }
  5. -->
  6. </style>
  7.  
  8. <head>
  9.  <title>Quote</title>
  10. </head>
  11. <body>
  12. <p><font size="4" color="#C0C0C0">Quote of the day</font></p><br>
  13. <font color="#808080">
  14. <?php
  15.  
  16. $f1="quotes.txt";
  17. echo getposts($f1);
  18.  
  19. function getposts($file){
  20.  
  21. $log1 = fopen($file, "r");
  22. $logdata1="";
  23.  
  24.  
  25. while (!feof($log1)) {
  26. $logdata1.=fgets($log1, 4096);
  27. if (!$logdata1) break;
  28. }
  29. fclose($log1);
  30. if (!$logdata1) die("Err1");
  31. $quotef = explode("<##QUOTE##>", $logdata1);
  32. for($i=0;$i < count($quotef);$i=$i+1){
  33. $quote = explode("<blockquote>",strtolower($quotef[rand(0,count($quotef))]));
  34.  
  35. echo ($quote[1] . "<br><p align=\"right\"><i>" . $quote[0] . "</i></p>");
  36. die("");
  37. }
  38.  
  39.  
  40. return $i;
  41. }
  42.  
  43.  
  44. ?>
  45. </font>
  46. </body>
  47.  
  48. </html>