📄 admin_user_ask.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<% Option Explicit %>
<%
if request.cookies("admin_OK")="" then
response.redirect("admin_login.html")
end if
%>
<%
dim db
db=0
%>
<!-- 后台用户管理->查找用户 -->
<!--#include file="../config/db.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<form id="form" name="form" method="post" action="admin_user_ask.asp?act=ask">
<table width="579" height="51" border="1" cellpadding="0" cellspacing="0">
<tr>
<td width="244">请输入用户名所包含的内容：</td>
<td width="256"><input name="f_name" type="text" id="f_name" />
<input type="submit" name="Submit" value="查找用户" /></td>
</tr>
</table>
</form>
<p>查找到的用户列表：</p>
<table width="922" height="75" border="1" cellpadding="0" cellspacing="0">
<tr>
<td width="41">ID</td>
<td width="78">用户名</td>
<td width="83">密码</td>
<td width="58">姓名</td>
<td width="29">性别</td>
<td width="113">电话</td>
<td width="144">E-mail</td>
<td width="78">密码提示</td>
<td width="78">密码答案</td>
<td width="97">加入时间</td>
<td width="99">操作</td>
</tr>
<%
'查找用户
dim sql,rst,rc
set rst=server.CreateObject("adodb.recordset")
if request.QueryString("act")="ask" then
sql="select * from shop_user where u_name like '%"&request.form("f_name")&"%' order by u_name"
rst.open sql,conn,1,1
rc=rst.recordcount
do while not rst.eof
%>
<tr>
<td><%=rst("u_id")%></td>
<td><%=rst("u_name")%></td>
<td><%=rst("u_password")%></td>
<td><%=rst("u_realname")%></td>
<td><%=rst("u_sex")%></td>
<td><%=rst("u_tel")%></td>
<td><%=rst("u_email")%></td>
<td><%=rst("u_question")%></td>
<td><%=rst("u_answer")%></td>
<td><%=rst("u_adddate")%></td>
<td><a href="admin_user_modify.asp?act=modify&id=<%=rst("u_id")%>" target="_blank">修改</a> <a href="admin_user_del.asp?id=<%=rst("u_id")%>&force=no" onclick="javascipt:return confirm('您确定您要删除此用户吗？');">删除</a> <a href="admin_user_del.asp?id=<%=rst("u_id")%>&force=yes" onclick="javascript:return confirm('您确定要删除此用户以及和用户相关的信息比如留言等吗？');">强制删除</a></td>
</tr>
<%
rst.movenext
loop
rst.close
set rst=nothing
end if
%>
<tr>
<td colspan="11"><div align="center">查找到<%=rc%>个用户</div></td>
</tr>
</table>
<%
conn.close
set conn=nothing
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -