แสดง Bot ใน online list for Discuz 7.2 & 7.1

affoman

อ้างอิงจากกระทู้ : http://www.discuzthai.com/viewthread.php?tid=4235

Author & special thank  : ntf

แสดงไอพีบอทของเสริชต่างๆเป็นชื่อบอทนั้นครับ
มี
Google Bot
Yahoo Bot
WindowLive Bot
Baidu Spider


ปล.  สำรอไฟล์ ที่จะ MOD  ก่อนน่ะครับ เพื่อเพิ่มความปลอดภัยฝห้กับเว็บ ไม่งั้น MOD ผิด จะ พังซะก่อน
1. เปิดไฟลล์ include/global.func.php
ค้นหา

1. if(!defined('IN_DISCUZ')) {
   
2.         exit('Access Denied');
   
3. }

คัดลอกไปที่คลิปบอร์ด

เอา code นี้ไป ใส่ ต่อจากบรรทัด นั่นครับ

1. 
   
2. //Bot Authentication By IP Start By ntf
   
3. function ip2bot($IP2BOT_IP){
   
4.         $IP2BOT_IPX=explode(".",$IP2BOT_IP,4);
   
5. if(($IP2BOT_IPX['0']=='66' && $IP2BOT_IPX['1']=='249') && ($IP2BOT_IPX['2']>=64 && $IP2BOT_IPX['2']<=95)){ //Google 66.249.64.0 - 66.249.95.255
   
6. $IP2BOT_NAME='GoogleBot';
   
7. }elseif(($IP2BOT_IPX['0']=='74' && $IP2BOT_IPX['1']=='6') or ($IP2BOT_IPX['0']=='72' && $IP2BOT_IPX['1']=='30')){//yahoo 74.6.0.0 - 74.6.255.255 ,72.30.0.0 - 72.30.255.255
   
8. $IP2BOT_NAME='YahooBot';
   
9. }elseif(($IP2BOT_IPX['0']=='65' && $IP2BOT_IPX['1']=='52') or ($IP2BOT_IPX['0']=='65' && $IP2BOT_IPX['1']=='55')){//Window Live 65.52.0.0 - 65.55.255.255
   
10. $IP2BOT_NAME='WindowLiveBot';
    
11. }elseif(($IP2BOT_IPX['0']=='202' && $IP2BOT_IPX['1']=='108' && $IP2BOT_IPX['2']=='1') or ($IP2BOT_IPX['0']=='202' && $IP2BOT_IPX['1']=='96' && $IP2BOT_IPX['2']=='63')){ //baidu 202.108.1.* - 202.96.63.*
    
12. $IP2BOT_NAME='Baidu Spider';
    
13. }else{
    
14. return false;
    
15. }
    
16. 
    
17. return $IP2BOT_NAME;
    
18. }
    
19. //Bot Authentication By IP End By ntf

คัดลอกไปที่คลิปบอร์ด

2. เปิดไฟลล์ member.php
ค้นหา

1.         while($online = $db->fetch_array($query)) {
   
2.                 $online['lastactivity'] = gmdate($timeformat, $online['lastactivity'] + $timeoffset * 3600);
   
3.                 $online['action'] = $actioncode[$online['action']];
   
4.                 $online['subject'] = $online['subject'] ? cutstr($online['subject'], 35) : NULL;
   
5.                 $online['ip'] = $online['ip1'].'.'.$online['ip2'].'.'.$online['ip3'].'.'.$online['ip4'];
   

คัดลอกไปที่คลิปบอร์ด

วางโค๊ดนี้ไว้บรรทัดต่อไป

1. if(!$online['username']) $online['username']=ip2bot($online['ip']);

คัดลอกไปที่คลิปบอร์ด

3. เปิดไฟลล์ include/index_classics.inc.php
ค้นหา

1. $query = $db->query("SELECT uid, username, groupid, invisible, action, lastactivity, fid FROM {$tablepre}sessions ".(isset($_DCACHE['onlinelist'][7]) ? '' : 'WHERE uid <> 0')." ORDER BY uid DESC LIMIT ".$maxonlinelist);

คัดลอกไปที่คลิปบอร์ด

เปลี่ยนเป็น

1. $query = $db->query("SELECT ip1,ip2,ip3,ip4,uid, username, groupid, invisible, action, lastactivity, fid FROM {$tablepre}sessions ".(isset($_DCACHE['onlinelist'][7]) ? '' : 'WHERE uid <> 0')." ORDER BY uid DESC LIMIT ".$maxonlinelist);

คัดลอกไปที่คลิปบอร์ด

ค้นหา

1. $online['username'] = $_DCACHE['onlinelist']['guest'];

คัดลอกไปที่คลิปบอร์ด

วางโค๊ดนี้ไว้บรรทัดต่อไป

1. $online['ip'] = $online['ip1'].'.'.$online['ip2'].'.'.$online['ip3'].'.'.$online['ip4'];                                
   
2. $online['username']=(!ip2bot($online['ip']))?$_DCACHE['onlinelist']['guest']:ip2bot($online['ip']);

คัดลอกไปที่คลิปบอร์ด

4. เปิดไฟลล์ /default/whosonline.htm
ค้นหา(มี 2 ที่)

1. <!--{if $online['uid']}--><a href="space.php?uid=$online[uid]">$online[username]</a><!--{else}-->{lang guest}<!--{/if}-->

คัดลอกไปที่คลิปบอร์ด

เปลี่ยนเป็น

1. <!--{if $online['uid']}--><a href="space.php?uid=$online[uid]">$online[username]</a><!--{else}-->
   
2.                                 <!--{if ($online['username'] && $online['uid']==0)}-->$online[username]<!--{else}-->{lang guest}<!--{/if}-->
   
3.                                 <!--{/if}-->

คัดลอกไปที่คลิปบอร์ด

5. อัพเดทแคช Admincp > เครื่องมือ > อัพเดทแคชไฟลล์

expertkom

แจ่มเลย

ขอบคุณมากครับ

nontawat1996

ใช้กับ 7.1 ได้ไมเนี่ย??

yseed

ขอลองครับ อิอิ

affoman

ตอบกลับ 3# nontawat1996


    ได้ครับ!!!

nontawat1996

ของผมทำไมไม่ขึ้นเลยแหะ อิอิ

dsiwarsza

ขอบคุณมากครับๆๆๆๆๆๆๆๆๆ

expertkom

ขอบคุณมากครับ

พิชิต

ไม่ขึ้นครับ  ต้องทำไงอีกล่ะครับ

affoman

ที่ไม่ขึ้น  บอท คงไม่ได้มา อ่ะดิคับ ฮาๆๆๆ..

ถ้าบอทไม่มา มันก็ไม่ขึ้น ครับ!!