📄 user.asp
字号:
<%@language=vbscript%>
<%
if session("admin")="" then
response.redirect "admin.asp"
end if
%>
<!--#include file="conn.asp"-->
<html>
<head>
<title>用户管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<%
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from admin order by id"
rs.Open sql,conn,1,1
%>
<body>
<br><br>
<div align="center"><center>
<form name="user" method="POST" action="userok.asp">
<table cellspacing="0" width="80%" border="1" cellpadding="0" cellspacing="0" bordercolor="#999999">
<tr>
<td width="100%" bgcolor="#999999" height="20">
<font color="#FFFFFF"><center><p><b>管理员信息修改</b></font>
</td>
</tr>
<tr align="center">
<td width="100%">
<table border="0" cellspacing="1" width="100%">
<tr><td width="50%" align="right">
原用户名:</td><td><%=rs("username")%></td></tr>
<input type="hidden" name="old" value="<%=rs("username")%>">
<tr><td align="right">
新用户名:</td><td><input name="username" type="text" emptyok="true" maxlength="30" value="<%=rs("username")%>"/></td></tr>
<tr><td align="right">
新的密码:</td><td><input name="password" type="password" emptyok="true" maxlength="12" value="<%=rs("password")%>"/></td></tr>
<tr><td align="right">
确认密码:</td><td><input name="pw" type="password" emptyok="true" maxlength="12" value="<%=rs("password")%>"/></td></tr>
<tr><td colspan="2" align="center"><input type="submit" value="提 交" name="title"></td></tr>
</form>
</table>
</center>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -