📄 list.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="ConnUser.asp"-->
<!--#include file="config.asp"-->
<!--#include file="char.inc"-->
<!--#include file="chkuser.asp" -->
<!--#include file="ChkManage.asp" -->
<!--#include file="ChkURL.asp" -->
<%
if not(request.cookies(eChuang)("ManageKEY")="super" or request.cookies(eChuang)("ManageKEY")="typemaster" or request.cookies(eChuang)("ManageKEY")="bigmaster") then
Show_Err("对不起，您的后台管理权限不够操作！")
response.end
else
dim sql
dim rst
set rst=server.createobject("adodb.recordset")
sql="select * from "& db_User_Table &" where "&Db_User_ID&"="&ChkRequest(request("id"),1) '防注入
rst.open sql,ConnUser,1,1
if UserTableType = "Dvbbs" then
photowidth=rst(db_User_FaceWidth) ''取论坛设定的图片宽度
photoheight=rst(db_User_FaceHeight) ''取论坛设定的图片高度
end if
%>
<html><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")%> 的详细资料_建站铺修正版_bbs.jzpu.com</title>
</head>
<body topmargin="0">
<!--#include file="Admin_Top.asp"-->
<table border="1" cellpadding="3" cellspacing="0" style="border-collapse: collapse" bordercolor="#FFDFBF" width="100%" id="AutoNumber1">
<tr>
<td colspan="2">
<div align="right">
编号：<%=rst(db_User_Id)%>
<%if rst(db_User_RegDate)<>"" then%>
注册日期：<%=rst(db_User_RegDate)%>
<%end if%>
</div>
</td>
</tr>
<tr>
<td width="614">
<%if rst("fullname")<>"" then%>
姓 名：<%=rst("fullname")%><br> <br>
<%end if%>
<%if db_Sex_Select = "EChuang" then%>
性 别：<%=rst(db_User_sex)%>
<%else%>
<%if db_Sex_Select = "Number" then%>
性 别：
<%if rst(db_User_Sex)="0" then%>
女
<%else%>
男
<%end if%>
<%end if%>
<%end if%>
<br> <br>
<%if db_Birthday_Select = "EChuang" then%>
生 日：<%=rst(db_User_Birthyear)%>年<%=rst(db_User_Birthmonth)%>月<%=rst(db_User_Birthday)%>日
<%else%>
<%if db_Birthday_Select = "Text" then
Dim strUserBirthday
strUserBirthday = rst(db_User_birthday)
If (strUserBirthday="" OR IsNull(strUserBirthday)) Then
strUserBirthday = "1980-01-01"
End if
%>
生 日：<%=year(strUserBirthday)%>年<%=month(strUserBirthday)%>月<%=day(strUserBirthday)%>日
<%end if%>
<%end if%>
<br> <br>
<%if rst(db_User_Email)<>"" then%>
电子邮件：<a href=mailto:<%=rst(db_User_Email)%>><%=rst(db_User_Email)%></a><br>
<br>
<%end if%>
<%if rst("tel")<>"" then%>
联系电话：<%=rst("tel")%><br> <br>
<%end if%>
权 限：
<%oskey1=rst("oskey")
select case oskey1
case "super"
if rst("purview")="99999" then
response.write "超级用户"
else
response.write "系统用户"
end if
case "typemaster" response.write "总栏用户"
case "bigmaster" response.write "大类用户"
case "smallmaster" response.write "小类用户"
case "selfreg" response.write "注册用户"
case "checkf" response.write "审核用户"
end select%>
<br> <br> 工作单位：<%=rst("depname")%><br> <br>
所在部门：<%=rst("deptype")%><br> <br> 登录次数：<%=rst(db_User_LoginTimes)%><br>
<br> 文 章 数：<%=rst("number")%><br> <br>
最近地址：<%=rst(db_User_LastLoginIP)%><br> <br> 最近登录：<%=rst(db_User_LastLoginTime)%><br>
<br> 自我介绍：<%=rst("content")%> </td>
<td width="137"><div align="center">
<%if rst(db_User_Face) <> "" then
if UserTableType = "EChuang" then%>
<img src="<%=rst(db_User_Face)%>" border="0" width="120">
<%else
if UserTableType = "Dvbbs" then%>
<img src="<%=Bbspath%><%=rst(db_User_Face)%>" border="0" width="<%=rst(db_User_FaceWidth)%>" height="<%=rst(db_User_FaceHeight)%>">
<%''显示用户头像，加'bbs/'前缀路径,使图文系统直接显示定向到论坛头像%>
<%end if
end if
else%>
<img src="images/nopic.gif" border="0">
<%end if%>
<br>
<br>
用户头像</div></td>
</tr>
<tr>
<td colspan="2">
<div align="right">[<a href="UserEdit.asp?id=<%=rst(db_User_Id)%>">修改</a>]
<%if trim(session("username"))<>trim(rst(db_User_Name)) then%>
<% if trim(request.cookies(eChuang)("username"))=trim(rst(db_User_Name)) then %>
<%response.write "[----]"%>
<%else%>
[<a href="UserDel.asp?id=<%=rst(db_User_Id)%>&name=del">删除</a>]
<%end if%>
<%end if%>
[<a href="javascript:history.go(-1)">返回</a>]</div></td>
</tr>
</table>
</body>
</html>
<!--#include file=Admin_Bottom.asp-->
<%
rst.close
set rst=nothing
conn.close
set conn=nothing
end if%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -