修改:Linux0911
版權屬原作者所有
當然, 您的 IP data 越詳盡當然越好
[sell=100]
1. 將以下代碼存為
getsimilar.php, 上傳至
論壇根目錄
複製內容到剪貼簿
代碼:
<?php
require './include/common.php';
require DISCUZ_ROOT.'./include/misc.php';
if(!$isadmin)
{
showmessage('admin_nopermission', NULL, 'NOPERM');
}
if($_REQUEST["similarusername"])
{
$query = $db->query("select useip from $table_posts where author = '$_REQUEST[similarusername]' group by useip");
while($rows = $db->fetch_array($query))
{
$iplist[] = $rows["useip"];
}
$query = $db->query("select regip, password from $table_members where username = '$_REQUEST[similarusername]' order by username limit 1");
$row = $db->fetch_array($query);
$passwd = $row["password"];
$ipfrom = convertip($row["regip"]);
if(!@in_array($row["regip"], $iplist))
{
$iplist[] = $row["regip"];
}
$count = count($iplist);
for($i = 0; $i < $count; $i++)
{
$ips .= "'".$iplist[$i]."'";
$ips .= ($i == $count - 1) ? "" : ",";
}
$query = $db->query("select author from $table_posts where useip in ($ips) group by author");
while($rows = $db->fetch_array($query))
{
$similarauthor[] = $rows["author"];
}
$count = count($similarauthor);
for($i = 0; $i < $count; $i++)
{
$username = $similarauthor[$i];
$query = $db->query("select password, regip from $table_members where username = '$username' limit 1");
$row = $db->fetch_array($query);
$passchk = ($row["password"] == $passwd) ? "密碼相同" : "密碼不同";
$iplocation = convertip($row["regip"]);
$array = array("username"=>$username, "password"=>$passchk, "ipfrom"=>$iplocation);
if($username !== $_POST["similarusername"])
{
$similarlist[] = $array;
}
}
}
?>
<form action="" method="post">
<input type="text" name="similarusername" size=30 value="<? echo $_REQUEST["similarusername"]; ?>"><br>
<input type="submit" name="submit" value="查找馬甲">
</form>
<?
if($_REQUEST["similarusername"])
{
$count = count($similarlist);
echo "來自:".$ipfrom."<br><br>猜測該用戶共有馬甲 $count 個:<br><br>";
for($i = 0; $i < $count; $i++)
{
echo "<a href=getsimilar.php?similarusername=".$similarlist[$i]["username"].">".$similarlist[$i]["username"]."</a>---".$similarlist[$i]["password"]."---".$similarlist[$i]["ipfrom"]."<br>";
}
}
?>2. 查看用戶資料時可以順便查閱
修改 viewpro.htm
找
複製內容到剪貼簿
代碼:
<!--{if $adminid == 1}-->
<a href="admincp.php?action=memberprofile&extr=$member[uid]&direct=1" target="_blank">[ {lang edit_member} ]</a>
<!--{else}-->
<a href="admincp.php?action=mod_members&extr=$member[uid]&direct=1" target="_blank">[ {lang edit_member} ]</a>
<!--{/if}-->加入紅字
引用:
<!--{if $adminid == 1}-->
<a href="admincp.php?action=memberprofile&extr=$member[uid]&direct=1" target="_blank">[ {lang edit_member} ]</a>
<a href="getsimilar.php?similarusername=$member[username]" target="_blank">[ 尋找用戶馬甲 ]</a>
<!--{else}-->
<a href="admincp.php?action=mod_members&extr=$member[uid]&direct=1" target="_blank">[ {lang edit_member} ]</a>
<!--{/if}-->
完成
[/sell]
附註:只有管理員可以查看