home *** CD-ROM | disk | FTP | other *** search
/ PC World 2005 April / PCWorld_2005-04_cd.bin / akce / web / phpnuke / PHP-Nuke-7.5.exe / html / blocks / block-Random_Headlines.php < prev    next >
Encoding:
PHP Script  |  2004-03-26  |  3.1 KB  |  65 lines
  1. <?php
  2.  
  3. /************************************************************************/
  4. /* PHP-NUKE: Web Portal System                                          */
  5. /* ===========================                                          */
  6. /*                                                                      */
  7. /* Copyright (c) 2002 by Francisco Burzi                                */
  8. /* http://phpnuke.org                                                   */
  9. /*                                                                      */
  10. /* This program is free software. You can redistribute it and/or modify */
  11. /* it under the terms of the GNU General Public License as published by */
  12. /* the Free Software Foundation; either version 2 of the License.       */
  13. /************************************************************************/
  14. /*         Additional security & Abstraction layer conversion           */
  15. /*                           2003 chatserv                              */
  16. /*      http://www.nukefixes.com -- http://www.nukeresources.com        */
  17. /************************************************************************/
  18.  
  19. if (eregi("block-Random_Headlines.php", $_SERVER['PHP_SELF'])) {
  20.     Header("Location: index.php");
  21.     die();
  22. }
  23.  
  24. global $prefix, $multilingual, $currentlang, $db, $tipath, $user, $cookie;
  25.  
  26. $r_options = "";
  27. if (isset($cookie[4])) { $r_options .= "&mode=$cookie[4]"; }
  28. if (isset($cookie[5])) { $r_options .= "&order=$cookie[5]"; }
  29. if (isset($cookie[6])) { $r_options .= "&thold=$cookie[6]"; }
  30.  
  31. if ($multilingual == 1) {
  32.     $querylang = "AND (alanguage='$currentlang' OR alanguage='')"; /* the OR is needed to display stories who are posted to ALL languages */
  33. } else {
  34.     $querylang = "";
  35. }
  36.  
  37. $numrows = $db->sql_numrows($db->sql_query("SELECT * FROM ".$prefix."_topics"));
  38. if ($numrows > 1) {
  39.     $result = $db->sql_query("SELECT topicid FROM ".$prefix."_topics");
  40.     while ($row = $db->sql_fetchrow($result)) {
  41.     $topicid = intval($row['topicid']);
  42.     $topic_array .= "$topicid-";
  43.     }
  44.     $r_topic = explode("-",$topic_array);
  45.     mt_srand((double)microtime()*1000000);
  46.     $numrows = $numrows-1;
  47.     $topic = mt_rand(0, $numrows);
  48.     $topic = $r_topic[$topic];
  49. } else {
  50.     $topic = 1;
  51. }
  52. $row2 = $db->sql_fetchrow($db->sql_query("SELECT topicimage, topictext FROM ".$prefix."_topics WHERE topicid='$topic'"));
  53. $topicimage = $row2['topicimage'];
  54. $topictext = $row2['topictext'];
  55. $content = "<br><center><a href=\"modules.php?name=News&new_topic=$topic\"><img src=\"$tipath$topicimage\" border=\"0\" alt=\"$topictext\" title=\"$topictext\"></a><br>[ <a href=\"modules.php?name=Search&topic=$topic\">$topictext</a> ]</center><br>";
  56. $content .= "<table border=\"0\" width=\"100%\">";
  57. $result3 = $db->sql_query("SELECT sid, title FROM ".$prefix."_stories WHERE topic='$topic' $querylang ORDER BY sid DESC LIMIT 0,9");
  58. while ($row3 = $db->sql_fetchrow($result3)) {
  59. $sid = intval($row3['sid']);
  60. $title = $row3['title'];
  61.     $content .= "<tr><td valign=\"top\"><strong><big>·</big></strong></td><td><a href=\"modules.php?name=News&file=article&sid=$sid$r_options\">$title</a></td></tr>";
  62. }
  63. $content .= "</table>";
  64.  
  65. ?>