📄 admin_searchuser.asp
字号:
<HTML>
<%
set strconn=server.createobject("ADODB.CONNECTION")
connstr="DBQ="+server.mappath("bookstore.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
strconn.open connstr
set rst=Server.createobject("adodb.recordset")
sql="select * from userinfo "
rst.open sql,strconn,1,1
pages=cint(request.QueryString("pages"))
rst.pagesize=10
if pages=0 then
pages=1
else
rst.move(pages-1)*rst.pagesize
end if
if pages<rst.pagecount then
currencount=rst.pagesize
else
currentcount=rst.recordcount-(pages-1)*rst.pagesize
end if
%>
<HEAD>
<TITLE>管理员操作平台</TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<style type="text/css">
<!--
.style1 {color: #FFFFFF;
font-family: "宋体";
font-size: 12px;
font-style: normal;
line-height: normal;
font-weight: normal;
font-variant: normal;
text-transform: capitalize;
}
.title {
color: #000000;
font-family: "方正姚体";
font-size: 20px;
font-style: normal;
line-height: normal;
font-weight: normal;
font-variant: normal;
text-transform: capitalize;
letter-spacing: 16px;
text-decoration: none;
}
.style2 {
font-size: 12px;
font-family: "宋体";
font-style: normal;
line-height: normal;
font-weight: normal;
font-variant: normal;
text-transform: capitalize;
color: #000000;
text-decoration: none;
}
-->
</style>
</HEAD>
<BODY scroll=no BGCOLOR=#FFFFFF LEFTMARGIN=0 TOPMARGIN=0 MARGINWIDTH=0 MARGINHEIGHT=0>
<!-- ImageReady Slices (管理员操作平台.psd) -->
<TABLE WIDTH=1024 BORDER=0 CELLPADDING=0 CELLSPACING=0>
<TR>
<TD ROWSPAN=4>
<IMG SRC="images/admini_1.jpg" WIDTH=121 HEIGHT=178 ALT=""></TD>
<TD ROWSPAN=4>
<IMG SRC="images/admini_2.jpg" WIDTH=146 HEIGHT=178 ALT=""></TD>
<TD COLSPAN=5>
<IMG SRC="images/admini_3.jpg" WIDTH=757 HEIGHT=13 ALT=""></TD>
<TD>
<IMG SRC="images/spacer.gif" WIDTH=1 HEIGHT=13 ALT=""></TD>
</TR>
<TR>
<TD COLSPAN=4 background="images/admini_4.jpg"><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="15%"> </td>
<td width="80%" valign="bottom"><span class="style1">
<marquee class="style1">
当前位置—>管理员操作平台—>查询用户 此平台用于查询图书馆内的会员用户信息
</marquee>
</span></td>
<td width="5%"> </td>
</tr>
</table></TD>
<TD ROWSPAN=2>
<IMG SRC="images/admini_5.jpg" WIDTH=100 HEIGHT=83 ALT=""></TD>
<TD>
<IMG SRC="images/spacer.gif" WIDTH=1 HEIGHT=21 ALT=""></TD>
</TR>
<TR>
<TD ROWSPAN=2>
<IMG SRC="images/admini_6.jpg" WIDTH=165 HEIGHT=144 ALT=""></TD>
<TD ROWSPAN=2>
<IMG SRC="images/admini_7.jpg" WIDTH=240 HEIGHT=144 ALT=""></TD>
<TD ROWSPAN=2>
<IMG SRC="images/admini_8.jpg" WIDTH=221 HEIGHT=144 ALT=""></TD>
<TD ROWSPAN=4>
<IMG SRC="images/admini_9.jpg" WIDTH=31 HEIGHT=390 ALT=""></TD>
<TD>
<IMG SRC="images/spacer.gif" WIDTH=1 HEIGHT=62 ALT=""></TD>
</TR>
<TR>
<TD ROWSPAN=3>
<IMG SRC="images/admini_10.jpg" WIDTH=100 HEIGHT=328 ALT=""></TD>
<TD>
<IMG SRC="images/spacer.gif" WIDTH=1 HEIGHT=82 ALT=""></TD>
</TR>
<TR>
<TD ROWSPAN=2>
<IMG SRC="images/admini_11.jpg" WIDTH=121 HEIGHT=246 ALT=""></TD>
<TD>
<IMG SRC="images/admini_12.jpg" ALT="" WIDTH=146 HEIGHT=223 border="0" usemap="#Map"></TD>
<TD>
<IMG SRC="images/admini_13.jpg" ALT="" WIDTH=165 HEIGHT=223 border="0" usemap="#Map2"></TD>
<TD COLSPAN=2 background="images/admini_14.jpg"><form name="form1" method="post" action="admin_addbooksuccess.asp">
<br>
<span class="style2">一共有<%=rst.recordcount%>条记录，分<%=rst.pagecount%>页，本页为第<%=pages%>页</span><br>
<span class="style2"><table width="0" height="0" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#ffffff" id="AutoNumber3" style="border-collapse: collapse" class="style2">
<tr>
<td align="center" width="89" height="13">学号</td>
<td align="center" width="105" height="13">姓名</td>
<td align="center" width="102" height="13">专业</td>
</tr>
<%
for i=1 to rst.pagesize
%>
<tr>
<td width="89" height="11"><center><%=rst("userno")%></center></td>
<td width="89" height="11"><center><%=rst("username")%></center></td>
<td width="89" height="11"><center><%=rst("userzhuanye")%></center></td>
</tr>
<%
if not rst.eof then rst.movenext
if rst.eof then exit for
next
%>
<%
if pages>1 then
response.write "<a href='admin_searchuser.asp?pages="&pages-1&"'>前一页</a> "
else
response.write"前一页 "
end if
for i=1 to rst.pagecount
if pages=i then
response.write"第"&i&"页"
else
response.write"<a href='admin_searchuser.asp?pages="&i&"'>第"&i&"页</a>"
end if
response.write" "
next
if pages<rst.pagecount then
response.write"<a href='admin_searchuser.asp?pages="&pages+1&"'>下一页</a>"
else
response.write"下一页"
end if
%>
<%
rst.close
set rst=nothing
strconn.close
set strconn=nothing
%>
</table></span>
</form></TD>
<TD>
<IMG SRC="images/spacer.gif" WIDTH=1 HEIGHT=223 ALT=""></TD>
</TR>
<TR>
<TD ROWSPAN=2>
<IMG SRC="images/admini_15.jpg" WIDTH=146 HEIGHT=172 ALT=""></TD>
<TD ROWSPAN=2>
<IMG SRC="images/admini_16.jpg" WIDTH=165 HEIGHT=172 ALT=""></TD>
<TD ROWSPAN=2>
<IMG SRC="images/admini_17.jpg" WIDTH=240 HEIGHT=172 ALT=""></TD>
<TD ROWSPAN=2>
<IMG SRC="images/admini_18.jpg" WIDTH=221 HEIGHT=172 ALT=""></TD>
<TD>
<IMG SRC="images/spacer.gif" WIDTH=1 HEIGHT=23 ALT=""></TD>
</TR>
<TR>
<TD>
<IMG SRC="images/admini_19.jpg" WIDTH=121 HEIGHT=149 ALT=""></TD>
<TD COLSPAN=2>
<IMG SRC="images/admini_20.jpg" WIDTH=131 HEIGHT=149 ALT=""></TD>
<TD>
<IMG SRC="images/spacer.gif" WIDTH=1 HEIGHT=149 ALT=""></TD>
</TR>
</TABLE>
<!-- End ImageReady Slices -->
<map name="Map">
<area shape="rect" coords="26,180,124,207" href="admin_addbook.asp">
<area shape="rect" coords="26,141,124,168" href="guest.asp">
<area shape="rect" coords="26,101,124,128" href="admin_xvjiebook.asp">
<area shape="rect" coords="27,62,125,89" href="huanshu.asp">
<area shape="rect" coords="26,20,124,47" href="jieshu.asp">
</map>
<map name="Map2">
<area shape="rect" coords="20,180,119,208" href="admin_deleteuser.ASP">
<area shape="rect" coords="20,142,119,170" href="adduser.asp">
<area shape="rect" coords="20,60,119,88" href="guanliyuan.asp">
<area shape="rect" coords="21,101,120,129" href="admin_searchuser.asp">
<area shape="rect" coords="20,21,119,49" href="guanliyuan.asp">
</map>
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -