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

📄 starlist.asp

📁 中文bux点击站源码。配合其他站点用
💻 ASP
字号:
🔍 
<%@ LANGUAGE = VBScript %>
<!--#include file="conn.asp"-->

<!--#include file="checklogin.asp"-->

<%
  rs.Open "Select * From member where MemberShip > 0 order by MemberShip DESC, MemberPriority DESC, ID",Conn
%>

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link REL="StyleSheet" HREF="../tjscripts.css" TYPE="text/css" MEDIA="screen">
<title><%= SiteTitle %>后台管理系统</title>
</head>

<body topmargin="0" leftmargin="0">

 
 
<div align="center"> 
  <table border="1" cellspacing="1" width="100%" bordercolor="#0033CC"> 
    <tr> 
      <td width="100%" height="31" bgcolor="#FFCC00"><b>星级会员列表</b></td> 
    </tr> 
    <tr> 
      <td width="100%"> 
        <div align="center"> 
          <table border="1" cellspacing="1" width="100%" bordercolor="#A50F18"> 
            <tr>   
              <td height="30" align="center">编号</td>  
              <td height="30" align="center">星级</td>
              <td height="30" align="center">电子邮件地址</td>   
              <td height="30" align="center">用户名</td>   
              <td height="30" align="center">密码</td>  
              <td height="30" align="center">姓名</td>  
              <td height="30" align="center">城市</td>
              <td height="30" align="center">个人佣金</td>   
              <td height="30" align="center">VIP优先级</td>   
              <td height="30" align="center">QQ/MSN</td>
            </tr> 
            <% 
              While Not rs.EOF 
                     
              SignupBonus = rs ("SignupBonus")
  Dollars = rs ("Dollars")
  Dollars1 = rs ("Dollars1")
  Dollars2 = rs ("Dollars2")
  Dollars3 = rs ("Dollars3")
  Dollars4 = rs ("Dollars4")
  Dollars5 = rs ("Dollars5")
  Dollars6 = rs ("Dollars6")
  DollarsCredits = rs ("DollarsCredits")
  DollarsDebits = rs ("DollarsDebits")
  AllDollars = SignupBonus + Dollars + Dollars1 + Dollars2 + Dollars3 + Dollars4 + Dollars5 + Dollars6 + DollarsCredits - DollarsDebits
              ID = rs ("ID") 
              MemberShip = rs ("MemberShip") 
              Email = rs ("Email") 
              UserName = rs ("UserName") 
              PassWord = rs ("PW")
  FirstName = rs ("FirstName")
  LastName = rs ("LastName")
  City = rs ("City")
              MemberPriority = rs ("MemberPriority")  
              QQMSN = rs ("QQMSN")
               %> 
            <tr>    
              <td height="30" align="center"><%= ID %></td>  
              <td height="30" align="center"><%= MemberShip %></td>   
              <td height="30" align="center"><%= Email %></td>   
              <td height="30" align="center"><%= UserName %></td>   
              <td height="30" align="center"><%= PassWord %></td>  
              <td height="30" align="center"><%= FirstName & LastName %></td>   
              <td height="30" align="center"><%= City %></td> 
              <td height="30" align="center"><% = FormatNumber (AllDollars, 4, -1) %></td>   
              <td height="30" align="center"><%= MemberPriority %></td>   
              <td height="30" align="center"><%= QQMSN %></td>
            </tr> 
            <% 
              rs.MoveNext 
              Wend 
              rs.Close 
              Set rs = nothing 
              Conn.Close 
              Set Conn = nothing 
            %> 
          </table> 
        </div> 
      </td>   
    </tr> 
    <tr> 
      <td width="100%" align="center"><a href="javascript:history.back();"><b>返回</b></a></td> 
    </tr>  
  </table>   
</div> 
 
</body> 
 
</html>

⌨️ 快捷键说明

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