regtips.php

bmb的论坛

<?
/*
 BMForum Plus! Bulletin Board Systems
 Version : Plus!
 
 This is a freeware, but don't change the copyright information.
 A SourceForge Project - GNU Licence project.
 Web Site: http://www.bmforum.com
 Copyright (C) Bluview Technology
*/

$thisprog="regtips.php";
require("adminglobal.php");
if($useraccess!="1" || $admgroupdata[10]!="1") {
adminlogin();
}
if (file_exists('datafile/reginfo.php')) require("datafile/reginfo.php");

print "<tr><td bgcolor=#0041BD colspan=2><font color=#D6DFF7>
		<b>$arr_ad_lng[320] $arr_ad_lng[198]</b>
		</td></tr>";
if ($action!="process") {
	if (file_exists("datafile/ipbans.php")) {
		$bannedips=readfromfile("datafile/ipbans.php");
		$bannedips=str_replace("\n","\r\n",$bannedips);
	} else $bannedips="";
print <<<EOT
		<tr>
		<td bgcolor=#F9FAFE valign=middle align=center colspan=2>
		<b>$arr_ad_lng[198]</b>
		</td></tr>
		<form action="$thisprog" method="post">
		<input type=hidden name="action" value="process">
		<tr>
		<td bgcolor=#D6DFF7 valign=middle colspan=2>
		<font color=#000000>

		<b>$arr_ad_lng[504]</b><br><br><center>
		<textarea cols=60 rows=6  name="ereginfo">$reginfo</textarea></center><BR>
		</td>
		</tr>
		<tr>
		<td bgcolor=#D6DFF7 valign=middle align=center colspan=2>
		<input type=submit value="$arr_ad_lng[66]"></td></form></tr></table></td></tr></table>
</td></tr></table></body></html>
EOT;
exit;
} elseif ($action=="process") {
		unlink("datafile/reginfo.php");
	$fp=fopen("datafile/reginfo.php","w");
	fputs($fp,'<?  $reginfo=\''.str_replace("'","\'",stripslashes($ereginfo)).'\';');
	fclose($fp);
  	print <<<EOT
		<tr>
		<td bgcolor=#F9FAFE valign=middle colspan=2>
		<center>$arr_ad_lng[505]<br><br>
		$tab_top
		<b>$ereginfo</b><br>
		$tab_bottom
		</td></tr></table></body></html>
EOT;
	exit;
}