📄 user_set.asp
字号:
<!--#include file="../config/sys.asp"-->
<%
if session("user_name")="" then
response.Redirect url&"error.asp?msg=您这样的操作本系统令人感到耻辱！&logout=true"
end if
if not selectROLE1(session("user_name")) then
response.Redirect url&"error.asp?msg=您这样的操作本系统令人感到耻辱！&logout=true"
end if
if request("del")="yes" then
a=del_data("user_info",cint(request("id")))
end if
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../style.css" rel="stylesheet" type="text/css" />
</head>
<body>
<div align="center">
<TABLE style="TABLE-LAYOUT: fixed" height=100% cellSpacing=0 cellPadding=0 width="98%" border=0>
<TBODY>
<TR height=3 width="100%">
<TD> <TABLE style="TABLE-LAYOUT: fixed" height=3 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR height=1>
<TD width=1></TD>
<TD width=1></TD>
<TD width=1></TD>
<TD bgColor=#DCDCDC></TD>
<TD width=1></TD>
<TD width=1></TD>
<TD width=1></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD bgColor=#f7f8f9></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC></TD>
<TD bgColor=#f7f8f9 colSpan=3></TD>
<TD bgColor=#DCDCDC></TD>
<TD></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD> <TABLE style="TABLE-LAYOUT: fixed" height="100%" cellSpacing=0 cellPadding=0 border=0>
<TBODY>
<TR>
<TD width=1 bgColor=#DCDCDC></TD>
<TD id=oINNER bgColor=#FFFFFF>
<table border="0" width="100%" id="table1" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td height="24" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px" colspan="3">
<font color="#999999"><b> 用户管理</b></font></td>
</tr> <tr>
<td bgcolor="#FFFFFF" valign="top">
<table border="0" width="100%" id="table2" height="100%" cellspacing="0" cellpadding="0">
<tr>
<td>
<table border="0" width="100%" id="table3" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td valign="top">
<div align="center">
<table border="0" width="100%" id="table5" height="30">
<tr>
<td align="right">
<form method="POST" action="?flog=chazhao">
<p>要查找指定会员请输入用户名：<input type="text" name="user_name" size="20"> <input type="submit" value="查找" name="B1"> </p>
</form>
</td>
</tr>
</table>
<table border="0" width="98%" id="table4" bordercolorlight="#F1F0F0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">
<b>用户名</b></td>
<td align="center" height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">
<b>别称</b></td>
<td align="center" height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">
<b>邮箱</b></td>
<td align="center" height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">
<b>QQ</b></td>
<td align="center" height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">
<b>访问次数</b></td>
<td align="center" height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">
<b>最后登陆IP</b></td>
<td align="center" height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">
<b>最后登陆时间</b></td>
<td align="center" height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">
<b>删除</b></td>
</tr>
<%s =cint( request.querystring("s"))
if len(s)<1 then s = 0
s=s*13
a="0"
if request("flog")<>"chazhao" or Request.Form("user_name")="" then
sql = "select * from USER_INFO order by id desc"
else
sql = "select * from USER_INFO where u_id='"&selectWord(Trim(Request.Form("user_name")))&"' order by counts desc"
end if
set rs = conn.Execute(sql)
while not rs.eof
count = count +1
if count>s and count<=(s+13) then
if count mod 2 = 0 then
bgcolor = "a3"
else
bgcolor = "a4"
end if%> <tr>
<td align="center" height="24" style="border-left-width: 1px; border-right-style: dotted; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px">
<a href="../other_user.asp?user_name=<%=rs("u_id")%>"><%=rs("u_id")%></a></td>
<td align="center" style="border-left-width: 1px; border-right-style: dotted; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><%=rs("user_name")%></td>
<td align="center" style="border-left-width: 1px; border-right-style: dotted; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><%=rs("email")%></td>
<td align="center" style="border-left-width: 1px; border-right-style: dotted; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><%=rs("qq")%></td>
<td align="center" style="border-left-width: 1px; border-right-style: dotted; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><%=rs("counts")%></td>
<td align="center" style="border-left-width: 1px; border-right-style: dotted; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><%=rs("login_ip")%></td>
<td align="center" style="border-left-width: 1px; border-right-style: dotted; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><%=rs("login_time")%></td>
<td align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><a href="?del=yes&id=<%=rs("id")%>">
<img border="0" src="../images/pic/delete.gif" width="18" height="18"></a></td>
</tr>
<%end if
rs.movenext
wend
%>
</table>
</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</TD>
<TD width=1 bgColor=#DCDCDC></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR height=3 width="100%">
<TD> <TABLE style="TABLE-LAYOUT: fixed" height=3 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR height=1>
<TD width=1></TD>
<TD width=1 bgColor=#DCDCDC></TD>
<TD width=1 bgColor=#f7f8f9></TD>
<TD bgColor=#f7f8f9></TD>
<TD width=1 bgColor=#f7f8f9></TD>
<TD width=1 bgColor=#DCDCDC></TD>
<TD width=1></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD bgColor=#f7f8f9></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD></TD>
</TR>
<TR height=1>
<TD colSpan=3></TD>
<TD bgColor=#DCDCDC></TD>
<TD colSpan=3></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
</div>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -