📄 uid.asp
字号:
<!--#include file="conn.asp" -->
<HTML>
<HEAD>
<TITLE></TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
background-color: #FFffff;
}
-->
</style>
<link href="style.css" rel="stylesheet" type="text/css">
</HEAD>
<BODY bgcolor="#FF0000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" >
<div align="center">
<table width="100%" border="0" cellspacing="5" cellpadding="5">
<tr>
<td> <div align="right">
<% If session("admin")<>"yes" Then
response.write("系统超时，您需要<font color=red><b>重新登陆</font></b>。 ")
response.end
Else %>
您现在处于管理状态。
<%end if%>
<strong><a href="javascript:self.location.reload();"><font color="#FF0000">刷新</font></a></strong>
</div></td>
</tr>
<tr>
<td> <strong>修改帐号：</strong><br>
<br>
<%if session("name")="王 建 功" then%>
<%set rs=server.createobject("adodb.recordset")
sql="select * from config"
rs.open sql,conn,3,2
if request("uid")<>"" and request("psw")<>""and request("psw2")<>"" and request("act")<>"" then
if request("psw")<>rs("psw") then
ms=" <b>错误，旧密码不正确，请核实。</b>"
else
rs("uid")=request("uid")
'rs("name")=request("name")
rs("psw")=request("psw2")
rs.update
ms=" <b>修改成功</b>"
end if
end if
%>
<table width="98%" border="0" cellpadding="2" cellspacing="2" class="input">
<tr>
<td height="93">
<form name="form1" method="post" action="">
<div align="center"><br>
帐号：
<input name="uid" type="text" id="uid" value="<%=rs("uid")%>"" size="20" maxlength="20">
姓名 ：
<input name="name" type="text" id="name" value="<%=rs("name")%>"" size="20" maxlength="20" disabled>
<br>
<br>
旧密码：
<input name="psw" type="text" id="psw"" size="20" maxlength="20">
新密码：
<input name="psw2" type="text" id="psw2"" size="20" maxlength="20">
<br>
<br>
<input name="act" type="submit" id="act" value="修 改">
<%= ms %> </div>
</form></td>
</tr>
</table>
<%
rs.close
else
'如果不是超级管理元 王 建 功
end if%>
<br>
<%if session("name")<>"王 建 功" then%>
<%set rs=server.createobject("adodb.recordset")
sql="select * from user where uid like '"&session("uid")&"'"
rs.open sql,conn,3,2
if rs.eof or rs.bof then
response.write("error")
response.end
end if
if request("name")<>"" and request("psw")<>""and request("psw2")<>"" and request("act")<>"" then
if request("psw")<>rs("psw") then
ms=" <b>错误，旧密码不正确，请核实。</b>"
else
'rs("uid")=request("uid")
rs("name")=request("name")
rs("psw")=request("psw2")
rs.update
ms=" <b>修改成功</b>"
end if
end if
%>
<table width="98%" border="0" cellpadding="2" cellspacing="2" class="input">
<tr>
<td height="93"> <form name="form1" method="post" action="">
<div align="center"><br>
帐号：
<input name="uid2" type="text" id="uid2" value="<%=rs("uid")%>"" size="20" maxlength="20" disabled>
姓名 ：
<input name="name" type="text" id="name" value="<%=rs("name")%>"" size="20" maxlength="20" >
<br>
<br>
旧密码：
<input name="psw" type="text" id="psw"" size="20" maxlength="20">
新密码：
<input name="psw2" type="text" id="psw2"" size="20" maxlength="20">
<br>
<br>
<input name="act" type="submit" id="act" value="修 改">
<%= ms %> </div>
</form></td>
</tr>
</table>
<%
rs.close
else
'如果不是超级管理元 王 建 功
end if%>
<br>
</td>
</tr>
</table>
</div>
</BODY>
</HTML> <%
conn.close%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -