ad_search.pl

来自「这个社区是虚拟社区使用的程序」· PL 代码 · 共 15 行

########## 资料管理界面 #############
sub search {

print qq~
        <form method="POST" action="$fullurl?changpass&id=$id"><div align="center">
        <center>如果你不填新密码,将会进入完全修改界面,修改更多的资料<br>
        如果你是管理员,系统会自动识别你的身份,并进入管理界面
        <hr align="center" width="50%">
        <center>姓&nbsp;&nbsp;&nbsp;&nbsp;名:<input type=text name="username" size=30 minlength="3" maxlength="10" value=""><BR>
        密&nbsp;&nbsp;&nbsp;&nbsp;码:<input type=password name="password" size=30 minlength="3" maxlength="20" value=""><br>
        <div align="center"><input type=submit value="确定">
        &nbsp;&nbsp;<input type=reset value="清除">
       </div><div align="center"></form></span>
~;
 }