⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 change.asp

📁 一套完整的毕业论文。物资管理信息系统。 请大家指点
💻 ASP
字号:
<%
if session("admin_name")="" then
    response.redirect "login.asp"
    response.end 
end if
%>

<head>
<link href=../style.css rel=STYLESHEET type=text/css>
<!--#include file="conn.asp"-->
<%set rs=server.createobject("adodb.recordset")%>
</head>
<%
if request("action")="change" then

sql="select top 1 * from admin"
rs.open sql,conn,3,3
rs("admin_name")=request("admin_name")
rs("admin_pass")=request("admin_pass")
rs.update
rs.close
response.write "密码更改成功"
else

%>

<table border="0" width="100%" cellspacing="1">
  <tr>
    <td width="100%">
      <form method="POST" action="change.asp?action=change">
        <table border="0" width="100%" cellspacing="0" cellpadding="0">
          <tr><%sql="select top 1 * from admin"
          rs.open sql,conn,3,3%>
            <td width="9%">用户名</td>
            <td width="91%"><input type="text" name="admin_name" size="20" value="<%=rs("admin_name")%>" class=input></td>
          </tr>
          <tr>
            <td width="9%">密码</td>
            <td width="91%"><input type="text" name="admin_pass" size="20" value="<%=rs("admin_pass")%>" class=input></td>
          </tr>
        </table><%rs.close
        %>
        <p><input type="submit" value="提交" name="B1" class=input></p>
      </form>
      <p> </td>
  </tr>
</table>
<%end if
set rs=nothing
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -