📄 admin.php
字号:
if (empty($user_jump[$count-1])) unset($user_jump[$count-1]);
for ($i=0; $i<$count; $i++) {
$user_detail=explode("|",$user_jump[$i]);
if (file_exists("$userpath/$user_detail[1].php")) {
$subcover++;
if ($cover=="no") continue;
}
echo "$user_detail[1] 导入成功<br>";
writetofile("$userpath/$user_detail[1].php",$user_jump[$i]);
}
$olduserdata=explode("|",readfromfile("bbsdata/newuser.php"));
$olduserdata[1]=$olduserdata[1]+$count-$subcover;
writetofile("bbsdata/newuser.php",$olduserdata[0]."|".$olduserdata[1]."|".$olduserdata[2]);
print <<<EOT
<tr>
<td bgcolor=#f2f8ff align=center colspan=2>
<b>用户数据导入成功</b><br><br>
$tab_top
用户数据已经导入,详细数据列表:<br><br>
总共导入用户 <b>$count</b> 名<br>
覆盖/跳过 <b>$subcover</b> 名<br>
目前共有用户 <b>$olduserdata[1]</b> 名<br>
$tab_bottom
</td></tr>
</td></tr>$adminbottomad</table></body></html>
EOT;
exit;
} else {
print <<<EOT
<tr>
<td bgcolor=#f2f8ff align=center colspan=2>
<b>用户数据导入失败</b><br><br>
$tab_top
用户数据导入失败,详细情况:<br><br>
$reason <br><br>
>> <a onfocus=this.blur() href="javascript:history.go(-1)">返回前页</a>
$tab_bottom
</td></tr>
</td></tr></table></body></html>
EOT;
exit;
}
}
}
if($adminjob==fbusername)
{
$thisprog="admin.php?adminjob=fbusername";
$bannamefile="bbsdata/bannames.php";
if ($action!="process") {
if (file_exists($bannamefile)) {
include($bannamefile);
$bannames=implode("\r\n",$bannames);
} else $bannames="";
print <<<EOT
$admintopad
<tr>
<td bgcolor=#e8f4ff valign=middle align=center colspan=2>
<b>注册名 禁止列表</b>
</td></tr>
<form action="$thisprog" method="post">
<input type=hidden name="action" value="process">
<tr>
<td bgcolor=#f2f8ff valign=middle colspan=2>
<font color=#000000>
$tab_top
<b>1.注意</b></td></tr>
<tr><td bgcolor=#f2f8ff>
此功能是用来保留一些特殊的用户名不允许被注册。这样你可以防止别人用一些不良的词汇来作为用户名注册,也可以保留一些特殊的用户名给一些特殊的人。<BR><BR>输入的时候,每行输入一个保留的用户名即可。<BR>
$tab_bottom <br><br>
</font></td>
</tr>
<tr>
<td bgcolor=#f2f8ff valign=middle colspan=2><b>请输入您要禁止的注册名:</b><br><br><center>
<textarea cols=60 rows=6 name="userarray">$bannames</textarea></center><BR>
</td>
</tr>
<tr>
<td bgcolor=#e8f4ff valign=middle align=center colspan=2>
<input type=submit value="提 交"></td></form></tr>$adminbottomad</table></td></tr></table>
</td></tr></table></body></html>
EOT;
exit;
} elseif ($action=="process") {
$bannames="<?\n";
$userarray=str_replace("\n","",$userarray);
$userarray=explode("\r",$userarray);
$count=count($userarray);
for ($i=0; $i<$count; $i++) {
$bannames.="\$bannames[$i]='$userarray[$i]';\n";
}
writetofile($bannamefile,$bannames);
$userarray=implode("<br>",$userarray);
print <<<EOT
$admintopad
<tr>
<td bgcolor=#f2f8ff valign=middle colspan=2>
<font color=#333333><center><b>所有的信息已经保存</b></center><br><br>
<b>你已经禁止了下列 注册名</b><br><br>
$tab_top
<b>$userarray</b><br>
$tab_bottom
<br><br><center><a onfocus=this.blur() href="banname.php">增加更多禁止的 注册名</a></center>
</td></tr>$adminbottomad</table></body></html>
EOT;
exit;
}
}
if($adminjob==tbuser)
{
$thisprog="admin.php?adminjob=tbuser";
$tbuserfile="bbsdata/tbuser.php";
if ($action!="process") {
if (file_exists($tbuserfile)) {
include($tbuserfile);
$tbuser=implode("\r\n",$tbuser);
} else $tbuser="";
print <<<EOT
$admintopad
<tr>
<td bgcolor=#e8f4ff valign=middle align=center colspan=2>
<b>可以进入加密区会员</b>
</td></tr>
<form action="$thisprog" method="post">
<input type=hidden name="action" value="process">
<tr>
<td bgcolor=#f2f8ff valign=middle colspan=2>
<font color=#000000>
$tab_top
<b>请注意:</b></td></tr>
<tr><td bgcolor=#f2f8ff>
此功能是用来限定进入加密区用户。<BR><BR>输入的时候,每行输入一个用户名即可。<BR>
$tab_bottom <br><br>
</font></td>
</tr>
<tr>
<td bgcolor=#f2f8ff valign=middle colspan=2><b>请输入您要开放的注册名:</b><br><br><center>
<textarea cols=60 rows=6 name="userarray">$tbuser</textarea></center><BR>
</td>
</tr>
<tr>
<td bgcolor=#e8f4ff valign=middle align=center colspan=2>
<input type=submit value="提 交"></td></form></tr>$adminbottomad</table></td></tr></table>
</td></tr></table></body></html>
EOT;
exit;
} elseif ($action=="process") {
$tbuser="<?\n";
$userarray=str_replace("\n","",$userarray);
$userarray=explode("\r",$userarray);
$count=count($userarray);
for ($i=0; $i<$count; $i++) {
$tbuser.="\$tbuser[$i]='$userarray[$i]';\n";
}
writetofile($tbuserfile,$tbuser);
$userarray=implode("<br>",$userarray);
print <<<EOT
$admintopad
<tr>
<td bgcolor=f2f8ff valign=middle colspan=2>
<font color=#333333><center><b>所有的信息已经保存</b></center><br><br>
<b>你已经开放下列注册名进入认证版块</b><br><br>
$tab_top
<b>$userarray</b><br>
$tab_bottom
<br><br><center><a onfocus=this.blur() href="tbuser.php">增加更多注册名</a></center>
</td></tr>$adminbottomad</table></body></html>
EOT;
exit;
}
}
if($adminjob==tj)
{
$thisprog="admin.php?adminjob=tj";
?>
<table width=100% cellpadding=0 cellspacing=0 border=0 bgcolor=e8f4ff align=center>
<tr><td>
<table width=100% cellpadding=0 cellspacing=0 border=0>
<tr>
<td valign=top bgcolor=#e8f4ff>
<table width=100% cellpadding=6 cellspacing=0 border=0> <? echo"$admintopad";
if (empty($dir)) {
?>
<tr>
<td bgcolor=#e8f4ff valign=middle colspan=2 align=center><font color=#333333><b>请输入您要统计的目录</b></font></td></tr>
<form action=<?=$thisprog?> method="post">
<tr><td>
<br>
<table width=300 align=center cellspacing=1 cellpadding=0 bgcolor=333333>
<tr><td>
<table width=100% cellspacing=0 cellpadding=3>
<tr bgcolor=#e8f4ff>
<font face=verdana>
<td valign=middle align=center><font color=#555555><b>请输入欲统计的目录</b></font><br><input type=text size=45 name="dir" ><br></td></tr>
</table>
</td></tr></table>
</td></tr>
<tr bgcolor=#e8f4ff>
<td valign=middle colspan=2 align=center><input type=submit name="submit" value="确 认"></td></tr></form>
<tr>
<td bgcolor=#e8f4ff valign=middle align=left colspan=2><font color=#555555>
<blockquote><b>请注意</b><p><b>你可以使用绝对路径/相对路径</b><p>绝对路径请填写完整,UNIX下比如: /home/myaccount/tesdir 在NT下比如: C:/www/testdir 。<br>相对路径的填写是相对于本脚本存在位置的: 比如本脚本存在于 ftb 目录下,您欲统计 ftb/userdir, 则可以填写 userdir
<?
} else {
?>
<tr>
<td bgcolor=e8f4ff valign=middle colspan=2 align=center><font color=#333333><b>执行空间统计</b></font></td></tr>
<tr><td>
<br>
<table width=400 align=center cellspacing=1 cellpadding=0 bgcolor=333333>
<tr><td>
<table width=100% cellspacing=0 cellpadding=3>
<tr bgcolor=#e8f4ff><td valign=middle align=center>
<font face=verdana color=#555555>
<?
if (is_dir($dir)) {
getDirList($dir);
echo "<b>$dir</b> -- ";
echo "统计完成";
echo "<br>";
} else {
echo "<b>$dir</b> -- ";
echo $dir." ----> ";
$fs = filesize($realname);
$total=$fs;
echo $fs."<br>";
echo "统计完成";
echo "<br>";
}
echo "<br>".$total." 字节";
echo "<br>".$total/(1024*1024)." MB";
?><br>
<b>执行完成 ---- 输出统计结果</b></td></tr>
</table>
</td></tr></table>
</td></tr>
<tr>
<td bgcolor=#f2f8ff valign=middle align=left colspan=2><font color=#555555>
<blockquote><b>请注意</b><p><b>你可以使用绝对路径/相对路径</b><p>绝对路径请填写完整,UNIX下比如: /home/myaccount/tesdir 在NT下比如: C:/www/testdir 。<br>相对路径的填写是相对于本脚本存在位置的: 比如本脚本存在于 bbs 目录下,您欲删除 bbd/userdir, 则可以填写 userdir</td></tr>
<?
}
}
if($adminjob==share)
{
$thisprog="admin.php?adminjob=share";
$shareforumfile="bbsdata/shareforum.php";
print "$admintopad";
if (file_exists($shareforumfile)) {
$shareforumdata=file($shareforumfile);
$count=count($shareforumdata);
}
if (empty($action)) {
$shareforumselect="";
for($i=0; $i<$count; $i++) {
$detail=explode("|",$shareforumdata[$i]);
if($detail[0]==$shareid) {
$sharename=$detail[0];
$shareurl=$detail[1];
$sharetitle=$detail[2];
$sharelogo=$detail[3];
$shareforumselect.="<option value=\"$detail[0]\" selected>$detail[0]</option>";
}
else $shareforumselect.="<option value=\"$detail[0]\">$detail[0]</option>";
}
$shareforumselect.="</select>";
print <<<EOT
<script language=JavaScript>
<!--
function menu(){
var URL=document.mod.target.options[document.mod.target.selectedIndex].value;
URL="admin.php?adminjob=share&shareid="+URL;
top.location.href=URL;target='_self';
}
</script>
<tr><td bgcolor=#f2f8ff colspan=3>
<form action="$thisprog" method=POST><input type=hidden name="action" value="create">
$tab_top
<b>1.新建一个友情链接项目:</b>
</td></tr><tr><td bgcolor=#f2f8ff>
没什么要解释的吧<br>
名称<input type=text name="name" size=30> URL<input type=text name="url" size=30><br>
说明<input type=text name="title" size=30> LOGO<input type=text name="logo" size=30>(不填则为文字链接)<br>
<input type=submit value="提 交">
$tab_bottom</form>
<form action="$thisprog" method=POST name=mod><input type=hidden name="action" value="modify">
$tab_top
<b>2.修改/删除友情链接:</b>
</td></tr><tr><td bgcolor=#f2f8ff>
我看还是没什么要解释的。<br>
动作对象:<select name="target" onChange=menu()>$shareforumselect <input type=radio checked name="job" value="modify">修改 <input type=radio name="job" value="delete">删除 (下面资料不填则不做修改)<br>
名称<input type=text name="name" size=30 value=$sharename> URL<input type=text name="url" size=30 value=$shareurl><br>
说明<input type=text name="title" size=30 value=$sharetitle> LOGO<input type=text name="logo" size=30 value=$sharelogo>(填0则改为文字链接)<br>
<input type=submit value="提 交">
$tab_bottom</form>
</td></tr></td></tr>$adminbottomad</table></body></html>
EOT;
exit;
}elseif ($action=="create") {
//-------新建项目-----------
$newstring="";
print "<tr><td bgcolor=#e8f4ff valign=middle align=center colspan=2><b>新建友情链接</b></td></tr>
<tr><td bgcolor=#f2f8ff colspan=2>";
$name=str_replace("|","",$name);
$url=str_replace("|","",$url);
$title=str_replace("|","",$title);
$logo=str_replace("|","",$logo);
$newstring="$name|$url|$title|$logo|\n";
if (!empty($name) && !empty($url) && !empty($title)) {
$fp=fopen($shareforumfile,"a");
if (fwrite($fp,$newstring)) echo "<br><br>成功更新友情链接列表资料<b></b><br>";
else echo "<br><br>友情链接列表更新失败,请检查datafile目录属性<b></b><br>";
fclose($fp);
} else echo "<br><br>友情链接列表更新失败,请检查所提交数据是否完整<b></b><br>";
}elseif ($action=="modify") {
print "<tr><td bgcolor=#e8f4ff valign=middle colspan=2><b>修改/删除友情链接</b></td></tr>
<tr><td bgcolor=#f2f8ff valign=middle colspan=2>";
$name=str_replace("|","",$name);
$url=str_replace("|","",$url);
$title=str_replace("|","",$title);
$logo=str_replace("|","",$logo);
$new="";
for ($i=0; $i<$count; $i++) {
$detail=explode("|",$shareforumdata[$i]);
if ($target==$detail[0]) {
if ($job=="modify") {echo "$target";
if (!empty($name)) $detail[0]=$name;
if (!empty($url)) $detail[1]=$url;
if (!empty($title)) $detail[2]=$title;
if (!empty($logo)) $detail[3]=$logo."|";
if ($logo=="0") $detail[3]="|";
$new.=implode("|",$detail);
}
if ($job=="delete") $new.="";
} else $new.=$shareforumdata[$i];
}
writetofile($shareforumfile,$new);
}
print "<br><b> 操作完成</b><br><br> >> <a href=$thisprog>返回执行其他动作</a></td></tr></table></body></html>";
exit;
}
if($adminjob==setbwd)
{
$thisprog="admin.php?adminjob=setbwd";
if ($action!="process") {
if (file_exists("bbsdata/wordsfb.php")) {
include("bbsdata/wordsfb.php");
while (list($key, $value) = each ($wordsfb)) {
$echobadwords.="$key=$value\n";
}
} else $echobadwords="";
print <<<EOT
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -