home *** CD-ROM | disk | FTP | other *** search
/ Internet Magazine 2003 May / INTERNET103.ISO / pc / software / windows / building / php_nuke / html / admin / modules / referers.php < prev    next >
Encoding:
PHP Script  |  2002-09-16  |  2.5 KB  |  70 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.  
  15. if (!eregi("admin.php", $PHP_SELF)) { die ("Access Denied"); }
  16.  
  17. $result = sql_query("select radminsuper from ".$prefix."_authors where aid='$aid'", $dbi);
  18. list($radminsuper) = sql_fetch_row($result, $dbi);
  19. if ($radminsuper==1) {
  20.  
  21. /*********************************************************/
  22. /* Referer Functions to know who links us                */
  23. /*********************************************************/
  24.  
  25. function hreferer() {
  26.     global $bgcolor2, $prefix, $dbi;
  27.     include ("header.php");
  28.     GraphicAdmin();
  29.     OpenTable();
  30.     echo "<center><font class=\"title\"><b>"._HTTPREFERERS."</b></font></center>";
  31.     CloseTable();
  32.     echo "<br>";
  33.     OpenTable();
  34.     echo "<center><b>"._WHOLINKS."</b></center><br><br>"
  35.     ."<table border=\"0\" width=\"100%\">";
  36.     $hresult = sql_query("select rid, url from ".$prefix."_referer", $dbi);
  37.     while(list($rid, $url) = sql_fetch_row($hresult, $dbi)) {
  38.     echo "<tr><td bgcolor=\"$bgcolor2\"><font class=\"content\">$rid</td>"
  39.         ."<td bgcolor=\"$bgcolor2\"><font class=\"content\"><a target=\"_blank\" href=\"$url\">$url</a></td></tr>";
  40.     }
  41.     echo "</table>"
  42.     ."<form action=\"admin.php\" method=\"post\">"
  43.     ."<input type=\"hidden\" name=\"op\" value=\"delreferer\">"
  44.     ."<center><input type=\"submit\" value=\""._DELETEREFERERS."\"></center>";
  45.     CloseTable();
  46.     include ("footer.php");
  47. }
  48.  
  49. function delreferer() {
  50.     global $prefix, $dbi;
  51.     sql_query("delete from ".$prefix."_referer", $dbi);
  52.     Header("Location: admin.php?op=adminMain");
  53. }
  54.  
  55. switch($op) {
  56.  
  57.     case "hreferer":
  58.     hreferer();
  59.     break;
  60.  
  61.     case "delreferer":
  62.     delreferer();
  63.     break;
  64.  
  65. }
  66.  
  67. } else {
  68.     echo "Access Denied";
  69. }
  70. ?>