📄 list.asp
字号:
<!--#include file="conn.asp"--><!--#include file="chkuser.asp" --><!--#include file=../include/config.asp --><!--#include file="char.inc"-->
<%
IF not(request.cookies("KEY")="super" or request.cookies("key")="typemaster" or request.cookies("key")="bigmaster") THEN
response.redirect "index_face.asp"
response.end
else
usernamecookie=CheckStr(request.cookies("UserName"))
passwdcookie=replace(trim(Request.cookies("passwd")),"'","''")
KEYcookie=replace(trim(request.cookies("KEY")),"'","''")
if usernamecookie="" or passwdcookie="" then
response.redirect "login.asp"
response.end
else
'判断用户的合法性
set rs=server.createobject("adodb.recordset")
sql="select * from admin where username='"&usernamecookie&"'"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.redirect "login.asp"
response.end
end if
IF passwdcookie<>rs("passwd") THEN
response.redirect "login.asp"
response.end
END IF
'下面判断用户级别实际在有用户级别是都应该判断
if KEYcookie<>rs("OSKEY") then
response.redirect "index_face.asp"
response.end
end if
rs.close
set rs=nothing
END IF
END IF
%>
<html>
<%
dim sql
dim rst
set rst=server.createobject("adodb.recordset")
sql="select * from admin where id="&request("id")
rst.open sql,conn,1,1
%>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href=site.css rel=stylesheet>
<title><%=copyright%><%=version%> <%=ver%> - <%=rst("fullname")%> 的详细资料</title>
</head>
<body topmargin="0"><!--#include file=top.asp-->
<div>
<p align=right>编号：<%=rst("id")%> <%if rst("dateandtime")<>"" then%>注册日期：<%=rst("dateandtime")%><%end if%>
</p>
<%if rst("fullname")<>"" then%> 姓 名：<%=rst("fullname")%><br><br><%end if%><%if rst("sex")<>"" then%> 性 别：<%=rst("sex")%><br><br><%end if%>
<%if rst("birthyear")<>"" then%> 生 日：<%=rst("birthyear")%>年<%=rst("birthmonth")%>月<%=rst("birthday")%>日<br><br><%end if%><%if rst("email")<>"" then%> 电子邮件：<a href=mailto:<%=rst("email")%>><%=rst("email")%></a><br><br><%end if%><%if rst("tel")<>"" then%> 联系电话：<%=rst("tel")%><br><br><%end if%>
权 限：<%if rst("oskey")="super" and rst("purview")="99999" then%>超级管理员<%end if%><%if rst("oskey")="super" and rst("purview")<>"99999" then%>系统管理员<%end if%><%if rst("oskey")="typemaster" then%>总栏管理员<%end if%><%if rst("oskey")="bigmaster" then%>大类管理员<%end if%>
<%if rst("oskey")="smallmaster" then%>小类管理员<%end if%><%if rst("oskey")="selfreg" then%>注册用户<%end if%><%if rst("oskey")="self" then%>未审核用户<%end if%><br><br> 工作单位：<%=rst("depname")%><br><br> 登录次数：<%=rst("logins")%><br><br>
文 章 数：<%=rst("number")%><br><br> 最近地址：<%=rst("ip")%><br><br> 最近登录：<%=rst("lastlogin")%><br><br><%if rst("email")<>"" then%> 自我介绍：<%=rst("content")%><%end if%>
<p align=right>
『<a href="useredit.asp?id=<%=rst("id")%>">修改</a>』<%if trim(session("username"))<>trim(rst("username")) then%>『<a href="userdel.asp?id=<%=rst("id")%>&name=del">删除</a>』<%end if%>『<a href="javascript:history.go(-1)">返回</a>』</b></p>
</div>
</body>
</html>
<%
rst.close
set rst=nothing
conn.close
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -