📄 admpwd.asp
字号:
<!--#include file="admcheck.asp"-->
<!--#include file="dbpath.asp"-->
<%
if request("d")="save" then
if request.form("pwd")="" or request.form("user")="" then
response.write "<font color=""#FF0000""><b>错误：</b>不能有空项!</font>"
else
set rs=server.CreateObject("ADODB.RecordSet")
rs.open "select * from admin",conn,1,3
rs("pwd")=request.form("pwd")
rs("user")=request.form("user")
rs.Update
response.write "操作成功！"
end if
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改密码</title>
<style type="text/css"><!--
body{font-size: 9pt;line-height: 13pt}
td {font-size: 9pt;line-height: 13pt}
--></style>
</head>
<body>
<form name=pwd method="post" action="admpwd.asp?d=save">
<div align="center">
<center>
<table border="0" width="30%" cellspacing="1" cellpadding="0" bgcolor="#D4D4D4">
<%
dim rs
set rs=server.CreateObject("ADODB.RecordSet")
rs.open "select * from admin",conn,1
%>
<tr>
<td width="50%">
<b>修改密码</b>
</td>
</tr>
<tr>
<td width="50%" height="26" bgcolor="#FFFFFF">
<table border="0" width="100%" cellspacing="1" cellpadding="0">
<tr>
<td nowrap align="right">用户名：</td>
<td nowrap>
<input type="text" size=12 name="user" value="<%=rs("user")%>" maxlength="12">
</td>
</tr>
<tr>
<td nowrap align="right">管理密码：</td>
<td nowrap>
<input type="password" size=12 name="pwd" value="<%=rs("pwd")%>" maxlength="12">
</td>
</tr>
<tr>
<td nowrap colspan="2">
<p align="center">
<input name="change" class=buttonface value="修改" type='submit'> <input type="reset" value="还原" name="B2"></td>
</tr>
</table>
</td>
</tr>
</table>
</center>
</div>
<div align="center">
<a href="admlist.asp">< 返回 ></a><% rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</div>
</form>
</body>
</html> ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -