<!--#include file="conn.asp"-->
<!--#include file="icode.asp"-->
<%
if session("adminname") = "" or session("adminpassword") = "" then
%>
<script>alert('你没有登陆');history.back();</script>
<%
else
action = request.querystring("action")
%>

<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<link rel="stylesheet" href="images/style2.css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>免费 激情电影网 jqdy.com</title>
</head>

<body bgcolor="#DDDDDD" background="images/15.gif" topmargin="5" leftmargin="5">

<div align="center">
  <center>
  <table border="1" cellpadding="2" cellspacing="0" style="border-collapse: collapse" bordercolor="#006D91" width="650">
    <tr>
      <td width="100%" bgcolor="#FFFFFF">
      <table border="0" cellpadding="2" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" >
        <tr>
          <td width="99%" valign="top">
          <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#006D91" width="100%">
                  <tr> <a href="admincenter.asp">
                    <td width="12%" align="center" bgcolor="#EFEFEF" onmouseover="this.style.backgroundColor='#E2F1A6'" onmouseout="this.style.backgroundColor='#EFEFEF'"><p style="margin-top: 2">管理首页</td>
                    </a>
                   <a href="classmanage.asp?action=class">
                    <td width="12%" align="center" bgcolor="#EFEFEF" onmouseover="this.style.backgroundColor='#E2F1A6'" onmouseout="this.style.backgroundColor='#EFEFEF'"><p style="margin-top: 2">分类管理</td>
                    </a> 
                  <a href="moviemanage.asp?action=movie">
                    <td width="12%" align="center" bgcolor="#EFEFEF" onmouseover="this.style.backgroundColor='#E2F1A6'" onmouseout="this.style.backgroundColor='#EFEFEF'"><p style="margin-top: 2">电影管理</td>
                    </a> 
                  <a href="tvmanage.asp?action=tv">
                    <td width="12%" align="center" bgcolor="#EFEFEF" onmouseover="this.style.backgroundColor='#E2F1A6'" onmouseout="this.style.backgroundColor='#EFEFEF'"><p style="margin-top: 2">电视管理</td>
                    </a> 
                  <a href="manage.asp?action=manage">
                    <td width="12%" align="center" bgcolor="#EFEFEF" onmouseover="this.style.backgroundColor='#E2F1A6'" onmouseout="this.style.backgroundColor='#EFEFEF'"><p style="margin-top: 2">公告管理</td>
                    </a> 
                  <a href="admincenter.asp?action=password">
                    <td width="12%" align="center" bgcolor="#EFEFEF" onmouseover="this.style.backgroundColor='#E2F1A6'" onmouseout="this.style.backgroundColor='#EFEFEF'"><p style="margin-top: 2">修改密码</td>
                    </a> 
                    </a> 
                  <a href="users.asp?action=user">
                    <td width="12%" align="center" bgcolor="#EFEFEF" onmouseover="this.style.backgroundColor='#E2F1A6'" onmouseout="this.style.backgroundColor='#EFEFEF'"><p style="margin-top: 2">会员管理</td>
                   <a href="admincenter.asp?action=logout">
                    <td width="12%" align="center" bgcolor="#EFEFEF" onmouseover="this.style.backgroundColor='#E2F1A6'" onmouseout="this.style.backgroundColor='#EFEFEF'"><p style="margin-top: 2">退出管理</td>
                    </a> </tr>
                </table><br><br>
          <%
          if action = "seeuser" then
          userid = request.querystring("userid")
          sql = "select * from [user] where id=" & userid
          set rs = server.createobject("adodb.recordset")
          rs.open sql,conn,1,1
          if rs.eof or rs.bof then
          %>
          <script>alert('没有找到该会员');history.back();</script>
          <%
          else
          %>
          <table border="1" cellspacing="0" style="border-collapse: collapse; " width="100%" bgcolor="#FBFBFB" bordercolor="#006D91">
          <tr>
          <td width="100%">
          <table border="1" cellspacing="0" style="border-collapse: collapse; " width="100%" bgcolor="#FBFBFB" bordercolor="#006D91">
          <tr>
          <td width="90%">
          <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; " width="100%" bgcolor="#FBFBFB">
                          <tr> 
                            <td width="180" bgcolor="#9FD6F8" align="right">登录ID：</td>
                            <td width="320" bgcolor="#9FD6F8">&nbsp;&nbsp;<%=rs("username")%></td>
                          </tr>
                          <tr> 
                            <td width="180" bgcolor="#b4def8" align="right">E-mail：</td>
                            <td width="320" bgcolor="#b4def8">&nbsp;&nbsp;<%=rs("Email")%></td>
                          </tr>
                          <tr> 
                            <td width="180" bgcolor="#9FD6F8" align="right">称呼：</td>
                            <td width="320" bgcolor="#9FD6F8">&nbsp;&nbsp;<%=rs("Sex")%></td>
                          </tr>
                          <tr> 
                            <td width="180" bgcolor="#b4def8" align="right">真实姓名：</td>
                            <td width="320" bgcolor="#b4def8">&nbsp; 
                              <%if rs("Name")="" then%>
                              未填写 
                              <%else%>
                              <%=rs("Name")%>
                              <%end if%>
                            </td>
                          </tr>
                          <tr> 
                            <td width="180" bgcolor="#9FD6F8" align="right">身份证号：</td>
                            <td width="320" bgcolor="#9FD6F8">&nbsp; 
                              <%if rs("Shenfenzheng")="" then%>
                              未填写 
                              <%else%>
                              <%=rs("Shenfenzheng")%> 
                              <%end if%>
                            </td>
                          </tr>
                          <tr> 
                            <td width="180" bgcolor="#b4def8" align="right">联系电话：</td>
                            <td width="320" bgcolor="#b4def8">&nbsp; 
                              <%if rs("Tel")="" then%>
                              未填写 
                              <%else%>
                              <%=rs("Tel")%> 
                              <%end if%>
                            </td>
                          </tr>
                          <tr> 
                            <td width="180" bgcolor="#9FD6F8" align="right">详细地址：</td>
                            <td width="320" bgcolor="#9FD6F8">&nbsp; 
                              <%if rs("Address")="" then%>
                              未填写 
                              <%else%>
                              <%=rs("Address")%> 
                              <%end if%>
                            </td>
                          </tr>
                          <tr> 
                            <td width="180" bgcolor="#b4def8" align="right">邮政编码：</td>
                            <td width="320" bgcolor="#b4def8">&nbsp; 
                              <%if rs("Youbian")="" then%>
                              未填写 
                              <%else%>
                              <%=rs("Youbian")%> 
                              <%end if%>
                            </td>
                          </tr>
                          <tr> 
                            <td width="180" bgcolor="#9FD6F8" align="right">加入时间：</td>
                            <td width="320" bgcolor="#9FD6F8">&nbsp;&nbsp;<%=rs("AddDate")%></td>
                          </tr>
                          <tr> 
                            <td width="180" bgcolor="#b4def8" align="right">最后登录IP地址：</td>
                            <td width="320" bgcolor="#b4def8">&nbsp;&nbsp;<%=rs("LoginIP")%></td>
                          </tr>
                          <tr> 
                            <td width="500" bgcolor="#67BDF1" align="center" colspan="2"> 
                              <input class="main" type="button" size="3" value="返回" name="Submit2" onclick="javascript:window.history.go(-1)">
                            </td>
                          </tr>
                        </form>
                              </table></td>
                          </tr>
                      </table>
          </td>
          </tr>
          </table>
         <%
          end if
          end if
          action=request("action")
          if action = "user" then
		  page = request.querystring("page")
          keyword = request.form("keyword")
          if keyword = "" then
           
          sql = "select * from [user]  order by id desc"
          else
          
          sql = "select * from [user]  where username='"&keyword&"' order by id desc"
          end if
          set rs = server.createobject("adodb.recordset")
          rs.open sql,conn,1,1
          if rs.eof or rs.bof then
          %> 
		  
		  
		  
		  
		  
		  
		  
		  
          <p style="margin-top: 2" align=center>没有找到相关会员
       <%
          else
          rs.pagesize = "20"
          if page = "" or page < "1" then
          page = "1"
          end if
          if rs.pagecount > "0" then
          rs.absolutepage = page
          end if
          i = "0"
          %>
		  <center>
                <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="300">
                  <form method="post" action="users.asp?action=user" name="search">
                    <tr> 
                      <td width="100" align="center"><p style="margin-top: 2">搜索会员</td>
                      <td width="100" align="center"> <input type="text" size="20" name="keyword" style="width: 100; height: 16" onmouseover="this.style.borderColor='#486841';this.style.backgroundColor='#E2F1A6'" onmouseout="this.style.borderColor='#006D91';this.style.backgroundColor='#EFEFEF'"></td>
                      <td width="100" align="center"> <a href="javascript:document.search.submit()"> 
                        <img border="0" src="images/20.gif" alt="搜索"></a></td>
                    </tr>
                  </form>
                </table> 
                <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" height="3">
            <tr>
              <td width="100%"></td>
            </tr>
          </table>
        <%
          do while not rs.eof or rs.bof
          i = i + 1
          if i > rs.pagesize then
          exit do
          end if
          %>
          <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#006D91" width="100%">
            <tr>
              <td width="25%" bgcolor="#E2F1A6"><p style="margin-top: 2">&nbsp;<img border="0" src="images/14.gif">&nbsp;<%=rs("username")%></a></td>
              <td width="25%" bgcolor="#E2F1A6"><p style="margin-top: 2">&nbsp;<img border="0" src="images/14.gif">&nbsp;<%=rs("tjrs")%></a></td>
              <td width="25%" bgcolor="#E2F1A6"><p style="margin-top: 2">&nbsp;<img border="0" src="images/14.gif">&nbsp;<%=rs("kps")%></a></td>
          <td width="22%" bgcolor="#FBFBFB" align="center"><p style="margin-top: 2">
          <a href="users.asp?action=seeuser&userid=<%=rs("id")%>">详细资料</a>
　        <a href="users.asp?action=deluser&userid=<%=rs("id")%>">删除</a></td>
            </tr>
          </table>
          <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" height="3">
            <tr>
              <td width="100%"></td>
            </tr>
          </table>
          <%
          rs.movenext
          loop
          %>
          <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#006D91" width="100%">
            <tr>
<td width="100%" bgcolor="#EFEFEF" align="center"><p style="margin-top: 2">[第<%=page%>页/共<%=rs.pagecount%>页] 跳到第<%for go=1 to Rs.pagecount%> <a href=users.asp?page=<%=go%>&action=user><%=go%></a> <%next%>页 <%if page = "1" then%>[首页] [上一页] <%else%>[<a href="users.asp?action=user">首页</a>] [<a href="users.asp?page=<%=page-1%>&action=user">上一页</a>] <%end if%><%if rs.pagecount-page < 1 then%>[下一页] [尾页]<%else%>[<a href="users.asp?page=<%=page+1%>&action=user">下一页</a>] [<a href="users.asp?page=<%=rs.pagecount%>&action=user">尾页</a>]<%end if%></td>
            </tr>
          </table>
          <%
          end if
          rs.close
          set rs = nothing
          %>
          <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" height="3">
            <tr>
              <td width="100%"></td>
            </tr>
          </table>
          <%
          end if
          if action = "deluser" then
          userid = request.querystring("userid")
          sql = "select * from [user] where id=" & userid
          set rs = server.createobject("adodb.recordset")
          rs.open sql,conn,3,3
          if rs.eof or rs.bof then
          %>
          <script>alert('找不到该会员');history.back();</script>
          <%
          else
          rs.delete
          rs.close
          set rs = nothing
          %>
          <script>alert('删除成功 请刷新页面看看');history.back();</script>
          <%
          end if
          end if
          %>
          </td>
        </tr>
      </table>
      </td>
    </tr>
  </table>
  </center>
</div>

</body>

</html>
<%
end if
conn.close
set conn = nothing
%>