📄 modify.asp

📁 用VB+JAVASCRIPT开发的一个仿QQ爱墙软件

💻 ASP

字号:

<!--#include file="conn.asp"-->
<%
if Session("open")<>True then
Response.Redirect "login.asp"
end if
%>
<title>HX33--华夏动漫网 Exobud MP 歌曲目录管理密码修改界面</title>
<meta charset=gb2312">
<link rel="stylesheet" type="text/css" href="site.css">
</head>

<body bgcolor="#FFFFFF" leftmargin="20" topmargin="20">
<%
    Set rs = conn.Execute("select * from admin")
%>
<form method="POST" action="post.asp?action=admin">
  <table width="250" border="1" cellspacing="1" cellpadding="2" bordercolorlight="7285CF" bordercolordark="7285CF">
    <tr bgcolor="7285CF"> 
      <td align="right" valign="bottom"><div align="center"><font color="#FFFFFF">修改密码 
          </font></div></td>
    </tr>
    <tr> 
      <td width="350" bordercolor="#E7E7E7" bgcolor="#E7E7E7"> 新帐号： 
        <input name="username" type="text" class="editbox1" value="<%=rs("username")%>" size="20"> 
      </td>
    </tr>
    <tr> 
      <td width="350" bordercolor="F2F2F2" bgcolor="F2F2F2"> 新密码： 
        <input name="password" type="password" class="editbox1" value="<%=rs("password")%>" size="20"> 
      </td>
    </tr>
    <tr> 
      <td width="350" bordercolor="#E7E7E7" bgcolor="#E7E7E7"> <input name="B1" type="submit" class="bottom" value="修改密码">
        <input name="B2" type="reset" class="bottom" value="重新设定"> </td>
    </tr>
  </table>
  <div align="center"><br>
    <br>
    <a href="http://www.hx33.net" target="_blank"><img src="img/power.gif" alt="HX33--华夏动漫网" width="108" height="24" border="0"></a> 
  </div>
</form>
<div align="center"> </div>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -