⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 list_fei_mem.asp

📁 1。超强文件读写锁定
💻 ASP
字号:
<%'创建时间:2004/07/05
'创建人:
'功能:显示属于此代理的会员列表
%>
<!--#include file="Include/conn.asp"-->
<!--#include file="Include/Islogin.asp"-->

<html>
<head>
<link href="include/css.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>会员列表</title>
</head>

<body style="background-color: #F2F2F2">
<table border="1" width="739" cellspacing="0" cellpadding="0" bordercolor="#E0E0E0" style="border-collapse: collapse" height="10%">
  <tr>
    <td width="731" valign="top">
<table width="704" height="50" align="center" border="1" cellspacing="1" bordercolor="#F2F2F2" bordercolorlight="#F2F2F2" bordercolordark="#9D9CA4">
  <tr align="center" bgcolor="#CCCCCC">
    <td height="22" bgcolor="#BCD5E4" width="92"><span class="style6">用户名</span></td>
    <td width="88" bgcolor="#BCD5E4" height="22"><span class="style6">真实姓名</span></td>
    <td width="80" bgcolor="#BCD5E4" height="22"><span class="style6">会员等级</span></td>
    <td width="93" bgcolor="#BCD5E4" height="22"><span class="style6">资金上限</span></td>
    <td width="78" bgcolor="#BCD5E4" height="22"><span class="style6">可用资金</span></td>
    <td width="162" bgcolor="#BCD5E4" height="22"><span class="style6">注册时间</span></td>
    <td width="73" bgcolor="#BCD5E4" height="22"><span class="style6">操作</span></td>
  </tr>
  <%second1=request.QueryString("second")
  set M_rs=server.createobject("adodb.recordset")
    M_sql="select Member_id,Member_name,Member_second,Member_realname,Member_rank,Member_total,Member_restart,Member_regtime from Member where Member_second='"&second1&"'"
	 M_sql=M_sql+" order by Member_id"
	   M_rs.open M_sql,conn,1,1
	   If M_rs.eof then 
	   Response.write " <tr bgcolor='#f2f2f2' ><td>记录暂无!</td></tr>"
	   else
	  M_rs.pagesize=20
			disnum=M_rs.pagesize
			dispage=M_rs.pagecount
			page=request.QueryString("page")
			if page="" then
			page=1
			end if
			 M_rs.absolutepage=page
			end if
 Do While Not M_rs.EOf and disnum>0
  %>
  <tr bgcolor="#f2f2f2">
    <td height="18" width="92"><span class="style6"><%=M_rs("Member_name")%></span></td>
    <td align="center" height="18" width="88"><span class="style6"><%=M_rs("Member_realname")%></span></td>
	 <td align="center" height="18" width="80"><span class="style6"><%=M_rs("Member_rank")%></span></td>
    <td align="center" height="18" width="93"><span class="style6"><%=M_rs("Member_restart")%></span></td>
    <td align="center" height="18" width="78"><span class="style6"><%=M_rs("Member_total")%></span></td>
    <td align="center" height="18" width="162"><span class="style6"><%=M_rs("Member_regtime")%></span></td>
    <td align="center" height="18" width="73"><span class="style6"><a href="A_Edit_Member.asp?id=<%=M_rs("Member_id")%>" target="_self">查看</a><a href="Del_Member.asp?id=<%=M_rs("Member_id")%>&name=<%=m_rs("member_name")%>" target="_blank"></a></span></td>
  </tr>
  <%M_rs.movenext
    disnum=disnum-1
  loop%>
</table>
<br>
<table width="80%"  border="0" align="center" cellpadding="1" cellspacing="0">
  <tr>
    <td align="right"> <%
for i=1 to dispage
%>
[<a href=list_Member.asp?page=<%=i%> target="_self"><%=i%></a>]
<%next
M_rs.close
set M_rs=nothing
conn.close
%></td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -