ad_changall_html.pl

这个社区是虚拟社区使用的程序

##########  全部修改界面  ##################
sub changall_html{
print qq~
        <form method="POST" action="$fullurl?changall&id=$id"><div align="center">
        在这里修改所有的注册资料,但建议不要修改姓名,经验值和级别保持不变<br>
        姓名不超过10字节,密码不超过20字节,超过部分将不接受,但不少于3字节
        <hr align="center" width="50%">
        <input type=hidden name="username" size=30 minlength="3" maxlength="10" value="$username">
        <input type=hidden name="password" size=30 minlength="3" maxlength="20" value="$password">
        <center>聊天姓名:<input type=text name="newname" size=30 minlength="3" maxlength="10" value="$chkuserid"><BR>
        聊天密码:<input type=text name="newpass" size=30 minlength="3" maxlength="20" value="$password"><br>
        你的妹儿:<input type=text name="email" size=30 value="$chkuseremail" ><br>
        个人网址:<input type=text name="url" size=30  value="$chkurl"><br>
        你的格言:<input type=text name="geyan" size=30  value="$chkgeyan" maxlength="40"><br>
        照片网址:<input type=text name="potourl" size=30  value="$chkpotourl"><br>
        <table border = "0"><tr><td>
        注册用IP:&nbsp;&nbsp;$chkuserip<br>
        修改用IP:&nbsp;&nbsp;$chkmdfip<br>
        注册时间:&nbsp;&nbsp;$chklasttime<br>
        修改时间:&nbsp;&nbsp;$chktime<br>
        经验总值:&nbsp;&nbsp;$chkjingyan<br>
        目前等级:&nbsp;&nbsp;$chkuserlevel<p></td></tr></table></div>
        <div align="center"><center><input type=submit value="确定">
        &nbsp;&nbsp;<input type=reset value="清除">
       </div><div align="center"></form>
~;
}