防止论坛广告机器人注册方法
2007-03-25
最近广告机器人实在太可恶了！以下的代码是专门针对广告机器人。
1.如果有人用同一个论坛用户名发同一个主题，那就删除该用户名发的相同的主题！
打开require目录下postnew.php
查找
QUOTE:
$atc_iconid=(int)$atc_iconid;
在其下方添加
在其下方添加
QUOTE:
//-------------- 防止论坛广告机器人发布同一主题--------------
$sql="select count(*) as flys from pw_threads where subject='{$atc_title}' and author='".addslashes($windid)."'";
$flyCheck=$db->get_one($sql);
if($flyCheck[flys]!=0){
$sql="delete from pw_threads where subject='{$atc_title}' and author='".addslashes($windid)."'";
$db->update($sql);
require_once(R_P.'require/checkpass.php');
Loginout();
exit(' ');
}
//-----------------------防止论坛广告机器人发布同一主题-----------------------
2.防止发布同一回复，如果有人用同一个论坛用户名发同一个回复，那就删除该用户名发的相同的回复
打开require目录下postreply.php
查找
$sql="select count(*) as flys from pw_threads where subject='{$atc_title}' and author='".addslashes($windid)."'";
$flyCheck=$db->get_one($sql);
if($flyCheck[flys]!=0){
$sql="delete from pw_threads where subject='{$atc_title}' and author='".addslashes($windid)."'";
$db->update($sql);
require_once(R_P.'require/checkpass.php');
Loginout();
exit(' ');
}
//-----------------------防止论坛广告机器人发布同一主题-----------------------
2.防止发布同一回复，如果有人用同一个论坛用户名发同一个回复，那就删除该用户名发的相同的回复
打开require目录下postreply.php
查找
QUOTE:
$atc_content=trim($atc_content);
在其下方添加
在其下方添加
QUOTE:
//-------------- 防止论坛广告机器人回复同一内容-------------------
$sql="select count(*) as flys from pw_posts where tid='{$tid}' and content='{$atc_content}' and ipfrom='{$ipfrom}' and author='".addslashes($windid)."'";
$flyCheck=$db->get_one($sql);
if($flyCheck[flys]!=0){
$sql="delete from pw_posts where tid='{$tid}' and content='{$atc_content}' and ipfrom='{$ipfrom}' and author='".addslashes($windid)."'";
$db->update($sql);
require_once(R_P.'require/checkpass.php');
Loginout();
exit(' ');
}
//------------------------防止论坛广告机器人回复同一内容----------------------
大家发现没有，论坛注册机的 email 地址 通常都是 aaaaaa@aaaaaa.com 格式的，也就是 @ 前后的字母是一样的，至少我论坛注册的都是这些，所以我目前通过 限制 @ 前后一样的来限制论坛机器人注册：
根据这个原理
查找register.php
$db->update("INSERT INTO pw_members (username, password,
其上加一句
//-----------------防止广告机器人注册---------------
$at=explode($regname,$regemail);$at[1]=='@'&&die("Forbidden");
//-----------------end--------------------
根据这个原理
查找register.php
QUOTE:
$db->update("INSERT INTO pw_members (username, password,
其上加一句
QUOTE:
//-----------------防止广告机器人注册---------------
$at=explode($regname,$regemail);$at[1]=='@'&&die("Forbidden");
//-----------------end--------------------
评论