📄 adminhyinfo.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!-- #include file="../inc/sessionType.asp" -->
<!-- #include file="../inc/conn.asp" -->
<%
HYKey=Request.Form("HYKey")
orderby=Request.QueryString("orderby")
if orderby="" then orderby="HYzhuchedate" end if
SET rs = Server.CreateObject("ADODB.Recordset")
if HYKey=""then
SQL="select * from HuiYuan order by "&orderby&" desc"
else
SQL="select * from HuiYuan where HYname like '%"&HYKey&"%' order by "&orderby&" desc"
end if
Rs.Open SQL,conn,1,1
%>
<HTML>
<HEAD>
<!--#include file="../../meta.htm"-->
<LINK href="../../image/css.css" rel=stylesheet type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
</HEAD>
<BODY leftMargin=2 topMargin=0 marginwidth="0" marginheight="0" onLoad="MM_preloadImages('../images/first_05.gif')" >
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="121" height="610" valign="top" background="../images/admin_12.gif"><!--#include file="../inc/adminleft.asp"--></td>
<td align="left" valign="top"><table width="100%" border="0" align="center" cellpadding="2" cellspacing="1">
<tr><form name="form1" method="post" action="">
<td height="30" bgcolor="C8E3C2">
<table width="100%" border="0" cellspacing="1" cellpadding="2">
<tr>
<td width="10%" height="30" align="right"> </td>
<td width="41%">会员名：
<input name="HYKey" type="text" id="HYKey" size="40">
</td>
<td width="49%"><input type="submit" name="Submit" value=" 搜 索 "></td>
</tr>
</table>
</td></form>
</tr>
</table>
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#EBEBEB">
<tr align="center" bgcolor="F6F6F6">
<td width="9%" height="25"><a href="adminHYinfo.asp?orderby=HYname">会员名</a></td>
<td width="9%"><a href="adminHYinfo.asp?orderby=HYpwd">密码</a></td>
<td width="5%"><a href="adminHYinfo.asp?orderby=HYsex">性别</a></td>
<td width="7%"><a href="adminHYinfo.asp?orderby=HYemail">找回密码</a></td>
<td width="6%"><a href="adminHYinfo.asp?orderby=HYvisitCount">访问次数</a></td>
<td width="15%"><a href="adminHYinfo.asp?orderby=HYlogondate">上次登录时间</a></td>
<td width="15%"><a href="adminHYinfo.asp?orderby=HYzhuchedate">注册时间</a></td>
<td width="12%"><a href="adminHYinfo.asp?orderby=HYip">ip地址</a></td>
<td><a href="adminHYinfo.asp?orderby=diary_title">日记本名称</a></td>
<td width="4%"><a href="adminHYinfo.asp?orderby=HYclass">积分</a></td>
<td width="6%"><a href="adminHYinfo.asp?orderby=HYquanXian">权限</a></td>
</tr>
<%if not rs.eof then%>
<%
MaxPerPage=20
page=Request("page")
if (page="" or isempty(page)) then page=1
rs.pagesize=MaxPerPage
j=1
i=(page-1)*maxPerPage+1
if not (rs.eof or err) then rs.move (page-1)*maxPerPage
do while not rs.eof
if (j mod 2)=1 then
%><tr bgcolor="#FFFEF7">
<%else%>
<tr bgcolor="#FFFFFF">
<%end if%>
<td height="20" ><a href="adminHYinfoShow.asp?HYname=<%=rs("HYname")%>"><span class="liuYanTitle"><%=rs("HYname")%></span></a></td>
<td class="down"><%=rs("HYpwd")%></td>
<td align="center" class="down"><%if rs("HYsex")=1 then%>男<%else%>女<%end if%></td>
<td class="down"><%=rs("HYemail")%></td>
<td align="center" class="down"><%=rs("HYvisitCount")%></td>
<td class="down"><%=rs("HYlogondate")%></td>
<td class="down"><%=rs("HYzhuchedate")%></td>
<td class="down"><%=rs("HYip")%></td>
<td align="center" class="down"><%=rs("diary_title")%></td>
<td align="center" class="down"><%=rs("HYclass")%></td>
<td align="center" class="liuYanTitle">
<%
select case rs("HYquanXian")
case "0"
Response.Write("会员")
case "1"
Response.Write("管理员")
case "10"
Response.Write("总版主")
end select
%>
</td>
</tr>
<%
j=j+1
if j>maxPerPage then exit do
rs.movenext
i=i+1
Loop
end if
%>
</table>
<form name="form2" method="post" action="">
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>共<span class="b9_02"><%=rs.recordCount%></span>个 页次<span class="b9_02"><%=page%></span>/<span class="b9_02"><%=rs.pagecount%></span>页 每页<span class="b9_02"><%=MaxPerPage%></span>个<br>
<br>
</td>
<td width="56%"><%if page>1 then%>
<a href="adminHYinfo.asp?page=1&orderby=<%=Request.QueryString("orderby")%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image91','','../images/first_05.gif',1)"><img src="../images/first_03.gif" name="Image91" width="49" height="21" border="0" align="absmiddle" id="Image91"></a> <a href="adminHYinfo.asp?page=<%=page-1%>&orderby=<%=Request.QueryString("orderby")%>"><img src="../images/pre_03.gif" width="49" height="21" border="0" align="absmiddle" style="cursor:hand" onMouseOver="this.src='../images/pre_05.gif'" onMouseOut="this.src='../images/pre_03.gif'" ></a>
<%else%>
<img src="../images/first_03_01.gif" width="49" height="21" border="0" align="absmiddle"> <img src="../images/pre_03_01.gif" width="49" height="21" border="0" align="absmiddle">
<%end if%>
<%if rs.recordCount>page*maxPerPage then%>
<a href="adminHYinfo.asp?page=<%=page+1%>&orderby=<%=Request.QueryString("orderby")%>"><img src="../images/next_03.gif" width="49" height="21" border="0" align="absmiddle" style="cursor:hand" onMouseOver="this.src='../images/next_05.gif'" onMouseOut="this.src='../images/next_03.gif'" ></a> <a href="adminHYinfo.asp?page=<%=rs.pagecount%>&orderby=<%=Request.QueryString("orderby")%>"><img src="../images/last_03.gif" width="49" height="21" border="0" align="absmiddle" style="cursor:hand" onMouseOver="this.src='../images/last_05.gif'" onMouseOut="this.src='../images/last_03.gif'" ></a>
<%else%>
<img src="../images/next_03_01.gif" width="49" height="21" border="0" align="absmiddle"> <img src="../images/last_03_01.gif" width="49" height="21" border="0" align="absmiddle">
<%end if%>
到
<input name="page" type="text" class="form1" id="page" size="3">
页
<input name="Submit" type="submit" class="form1" value="go">
</td>
</tr>
</table>
</form></td>
</tr>
<tr>
<td height="1" colspan="2" bgcolor="D6D3D6"></td>
</tr>
</table>
</BODY></HTML>
<%CloseDataConn%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -