📄 user.asp
字号:
<!--#include file="adminsession.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<%pageno=request("pageno")
submit=request("submit")
if submit="通过" then
id=request("id")
photoflag=request("photoflag")
if photoflag="" then
photoflag=0
end if
sql="select photoflag from [admin] where id="&id
rs.open sql,conn,2,3
rs("photoflag")=photoflag
rs.update
rs.close
end if%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<link href="css.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="100%" height="100%" border="0" cellspacing="1" bgcolor="<%=tdbgcolor%>">
<tr>
<td bgcolor="<%=tdbgcolor%>"><table width="89%" border="0" align="center">
<tr>
<td><div align="center">此验证为是否具有上传图片的权利 (选中为具有)</div></td>
</tr>
</table>
<br>
<table width="89%" border="0" align="center" cellspacing="1" bgcolor="<%=tabbgcolor%>">
<tr bgcolor="<%=tdbgcolor%>">
<td width="18%" height="20">
<div align="center">用户名</div></td>
<td width="18%">
<div align="center">真实姓名</div></td>
<td width="18%">
<div align="center">昵称</div></td>
<td width="18%">
<div align="center">身份</div></td>
<td width="28%">
<div align="center">操作</div></td>
</tr>
<%sql="select * from [admin] order by id"
rs.open sql,conn,1,1
if not rs.eof then
rs.pagesize=9
if request("pageno")="" then
pageno=1
else
rs.absolutepage=pageno
end if
lineno=1
do while not rs.eof and lineno<=rs.pagesize
if rs("flag")>session("flag") or session("user")=rs("username") then%>
<form name="form1" method="post" action="">
<tr bgcolor="<%=tdbgcolor%>">
<td>
<div align="center"><%=rs("username")%>
<input name="id" type="hidden" id="id" value="<%=rs("id")%>">
</div></td>
<td>
<div align="center"><%=rs("realname")%></div></td>
<td>
<div align="center"><%=rs("nickname")%></div></td>
<td>
<div align="center">
<%if rs("flag")=1 then%>管理员<%elseif rs("flag")=2 then%>版主<%elseif rs("flag")=3 then%>普通用户<%end if%></div></td>
<td>
<div align="center">
<%if rs("photoflag")=1 then%>
<input name="photoflag" type="checkbox" id="photoflag" value="1" checked>
<%elseif rs("photoflag")=0 then%>
<input name="photoflag" type="checkbox" id="photoflag" value="1">
<%end if%>
<input type="submit" name="Submit" value="通过">
</div></td>
</tr></form>
<%end if
lineno=lineno+1
rs.movenext
loop%>
</table>
<br>
<table width="89%" border="0" align="center">
<tr>
<td>
<div align="right">第<%=pageno%>/<%=rs.pagecount%>页 共<%=rs.recordcount%>个用户
<%if pageno>1 then%>
<a href="?pageno=1" onFocus="if(this.blur)this.blur()">首页</a>
<%else%>
首页
<%end if%>
<%if pageno>1 then%>
<a href="?pageno=<%=pageno-1%>" onFocus="if(this.blur)this.blur()">上一页</a>
<%else%>
上一页
<%end if
if pageno<rs.pagecount then%>
<a href="?pageno=<%=pageno+1%>" onFocus="if(this.blur)this.blur()">下一页</a>
<%else%>
下一页
<%end if
if pageno<rs.pagecount then%>
<a href="?pageno=<%=rs.pagecount%>" onFocus="if(this.blur)this.blur()">尾页</a>
<%else%>
尾页
<%end if%>
</div></td>
</tr>
</table>
<%else%>
没有用户
<%end if
rs.close
set rs=nothing
conn.close
set conn=nothing%>
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -