📄 manuser.asp
字号:
<!--#include file="config.asp"-->
<%xian=session("xian")
ljl_xian=mid(xian,1,1)
if ljl_xian<>1 then%>
<script language=vbscript>
MsgBox "错误：您无权使用本功能模块，如果确实需要操作本模块的权限，请与管理员联系！"
location.href = "txt.asp"
</script>
<%end if
nickname=Session("hxf_u_nickname")
grade=Int(Session("hxf_u_grade"))
username=Request.Form("search")
if username="" then username=session("hxf_u_nickname")
Set conn=Server.CreateObject("ADODB.CONNECTION")
connstr=Application("hg_connstr")
conn.open connstr
Set rst=Server.CreateObject("ADODB.RecordSet")
sqlstr="SELECT * FROM 用户 where 姓名='"&username&"'"
rst.Open sqlstr,conn
if rst.EOF or rst.BOF then
Response.Write "<script language=javascript>alert('对不起！找不到您要的资料，请确认！');history.back();</script>"
else
%>
<html>
<head>
<title>用户管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="setup.css">
</head>
<BODY background=READONLY/bg.gif text=#000000>
<form method="post" action="upmanuser.asp">
<table width="463" border="1" cellspacing="0" cellpadding="5" height="1" align="center" bordercolorlight="#000000" bordercolordark="#FFFFFF">
<tr align="center">
<td height="1" width="153">用户名
<input type="text" name="1" readonly size="10" maxlength="4" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'" value="<%=username%>">
</td>
<td height="1" width="146">身 份
<input type="text" name="2" size="10" maxlength="5" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'" value="<%=rst("身份")%>"></td>
<td height="1" width="162">等 级
<input type="text" name="3" size="10" maxlength="10" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'" value="<%=rst("grade")%>">
</td>
</tr>
<tr>
<td height="0" width="153" align="center">
<span lang="zh-cn">部</span> <span lang="zh-cn">门</span><input type="text" name="4" size="10" maxlength="10" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'" value="<%=rst("门派")%>"></td>
<td height="0" width="146" align="center">
提 示<span lang="en-us"> </span>
<input type="text" name="5" size="10" maxlength="10" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'" value="<%=rst("ljl_pwd")%>"></td>
<td height="0" width="162" align="center">
答 案<input type="text" name="6" size="10" maxlength="10" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'" value="<%=rst("ljl_key")%>"></td>
</tr>
<tr>
<td height="-1" width="153" align="center">
<span lang="zh-cn">次</span> <span lang="zh-cn">数</span>
<input type="text" readonly name="7" size="10" maxlength="10" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'" value="<%=rst("times")%>"></td>
<td height="-1" width="146" align="center">
最后登陆<span lang="en-us"> </span>
<input type="text" readonly name="8" size="10" maxlength="10" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'" value="<%=rst("lasttime")%>"></td>
<td height="-1" width="162" align="center">
最后<span lang="en-us">IP</span><input type="text" readonly name="9" size="10" maxlength="10" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'" value="<%=rst("lastip")%>"></td>
</tr>
<tr>
<td height="18" width="153">
<p align="center">状 态
<input type="text" name="10" size="10" maxlength="10" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'" value="<%=rst("状态")%>">
</td>
<td height="18" width="308" colspan="2">
<span lang="en-us"> </span><font color="#FF0000"><span lang="zh-cn">提示:</span>所有项目都
非空，且不能带有空格和非法字符</font><span lang="zh-cn"> </span></td>
</tr>
<tr>
<td height="1" width="142">
<p align="center">
<input type="submit" name="Submit" value="确 定" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'"></td>
<td height="1" width="134">
<p align="center">
<input type="reset" name="Submit2" value="还 原" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'">
</td>
<td height="1" width="149">
<p align="center"> <input type="submit" name="Submit3" value="删 除" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'">
</td>
</tr>
</table>
</form>
<form method="POST" action="manuser.asp">
<div align="center">
<p align="left"> 请在这里输入用户名
<input type="text" name="search" size="10" maxlength="10" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'" >
<input type="submit" value="查询" name="B1" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'">
<input type="reset" name="Submit3" value="清空" style="color: #000000; background-color: #88B0D8; text-decoration: blink; border: 1px solid #000080" onMouseOver="this.style.backgroundColor = '#FFCC00'" onMouseOut="this.style.backgroundColor = '#88B0D8'">
<span lang="en-us">>>>></span><a href="modifypass.asp">更改用户密码</a><span lang="en-us"><<<<</span></p>
</div>
</form>
<div align="center">
<center>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="470" id="AutoNumber1">
<tr>
<td width="468"><font color="#FF0000">用户管理说明：查到用户资料后，状态为此用户的使用标志，具体含义如下<br>
</font>状态：正常 改用户帐号可以正常登陆<span lang="en-us">OA</span>办公系统<br>
无 表明改用户帐号正在审核中，还未通过审核成功<br>
0 该用户帐号暂时停用<br>
1
该用户帐号已经作废，该用户资料从数据库中删除了。<br>
2
该用户申请开通帐号，但管理员拒绝了申请。<%=ljl_xian%></td>
</tr>
</table>
</center>
</div>
</body>
</html>
<%
end if
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -