首頁加偵測browsers、OS - Discuz 4.0 及 4.1 插件發佈

johnng
0026476

頭銜: Lord

帖子: 424

精華: 0

積分: 3288 點

現金: 227 元

存款: 787 元

閱讀權限: 25

註冊: 2005-7-17

來自: http:// ...

狀態: 離線

#1

大中小

發表於 2005-12-23 16:46 資料個人空間主頁短消息加為好友

首頁加偵測browsers、OS

先安裝:
http://www.alan888.com/Discuz/vi ... d=52161&fpage=1

演示:
http://ngccs.no-ip.org/bbs/index.php
(不是24小時開我拿來玩的論壇)

index.php找

[Copy to clipboard] [ - ]

CODE:

$memberenc = rawurlencode($lastmember);
$newthreads = round(($timestamp - $lastvisit + 600) / 1000) * 1000;

之下加

[Copy to clipboard] [ - ]

CODE:

//---------------hack Meminfo start
if(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "MSIE 6.0")) {
            $visitor_browser = "Internet Explorer 6.0";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "MSIE 5.5")) {
            $visitor_browser = "Internet Explorer 5.5";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "MSIE 5.0")) {
            $visitor_browser = "Internet Explorer 5.0";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "MSIE 4.01")) {
            $visitor_browser = "Internet Explorer 4.01";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "NetCaptor")) {
            $visitor_browser = "NetCaptor";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "Netscape")) {
            $visitor_browser = "Netscape";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "Lynx")) {
            $visitor_browser = "Lynx";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "Opera")) {
            $visitor_browser = "Opera";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "Konqueror")) {
            $visitor_browser = "Konqueror";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "Mozilla")) {
            $visitor_browser = "Mozilla";
      } else {
            $visitor_browser = "其它";
      }
//上面的是瀏覽器//
      if(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "NT 5.1")) {
            $visitor_os = "Windows XP";
      }elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "NT 5.2")) {
            $visitor_os = "Windows Server 2003";
      }elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "NT 5")) {
            $visitor_os = "Windows 2000";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "4.9")) {
            $visitor_os = "Windows ME";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "NT 4")) {
            $visitor_os = "Windows NT 4.0";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "98")) {
            $visitor_os = "Windows 98";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "95")) {
            $visitor_os = "Windows 95";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "Mac")) {
            $visitor_os = "Mac";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "Linux")) {
            $visitor_os = "Linux";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "Unix")) {
            $visitor_os = "Unix";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "FreeBSD")) {
            $visitor_os = "FreeBSD";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "SunOS")) {
            $visitor_os = "SunOS";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "BeOS")) {
            $visitor_os = "BeOS";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "OS/2")) {
            $visitor_os = "OS/2";
      } elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "PC")) {
            $visitor_os = "Macintosh";
      }elseif(strpos($HTTP_SERVER_VARS[HTTP_USER_AGENT], "AIX")) {
            $visitor_os = "AIX";
      } else {
            $visitor_os = "其他";
      }


//info//

在首頁適當地方加入

[Copy to clipboard] [ - ]

CODE:

{lang stats_browser}：$visitor_browser

再到第7帖加上OS偵測~~~~~~~~~

[此帖最後由 johnng 在 2005-12-24 於 09:59 修改]