<%@ LANGUAGE=VBScript codepage ="936" %>
<%Response.Expires=0
Response.Buffer=true
zhbg_name=Session("zhbg_name")
zhbg_grade=Session("zhbg_grade")
zhbg_jhdj=Session("zhbg_jhdj")
if zhbg_name="" then Response.Redirect "../error.asp?id=440"
if session("zhbg_adminok")<>true then Response.Redirect "../chat/readonly/bomb.htm"
if zhbg_grade<>10 or instr(Application("zhbg_user"),zhbg_name)=0  then Response.Redirect "../error.asp?id=439"
if zhbg_name<>Application("zhbg_adminuser") then Response.Redirect "../chat/readonly/bomb.htm"
tiaojian=Request.Form("tiaojian")
show=trim(Request.Form("show"))
%>
<html>
<head>
<title><%=Application("zhbg_chatroomname")%>用户资料查看程序</title>
<style type="text/css">
<!--
p            { line-height: 20px; font-size: 9pt }
table        { font-size: 9pt }
a:link       { color: #FF9900; text-decoration: none }
-->
</style>
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
</head>

<body text="#000000" vlink="#FF9900" topmargin="0"
leftmargin="0" >
<p align="center"> <font color="#cccccc" face="幼圆"><a href="javascript:this.location.reload()">刷新</a></font> 
  <br>
  这一些是满足条件的人！点姓名进行修改！<br>
  <font color="#FF0000"><b><%=tiaojian%></b></font> <br>
 <%
Set conn=Server.CreateObject("ADODB.CONNECTION")
Set rs=Server.CreateObject("ADODB.RecordSet")
conn.open Application("zhbg_usermdb")
	if show<>"" then
		rs.open "SELECT * FROM 用户 where "& tiaojian &" order by "&show,conn
	else
		rs.open "SELECT * FROM 用户 where "& tiaojian &" order by lasttime",conn
	end if
%>
<table border="0" width="500" cellspacing="0" cellpadding="0"
background="../jhmp/bg.gif" align="center">
  <tr align="center">
    <td background="../jhmp/top1.gif" width="500" height="26"><font
color="#FF6600"><b><font size="+1"><%=Application("zhbg_chatroomname")%></font></b></font></td>
</tr>
<tr align="center">
<td>
      <table width="485" border="1" cellpadding="0" cellspacing="0" height="13">
        <tr> 
          <td width="28" height="10"> 
            <div align="center"><font color="#FFFFFF">ID</font></div>
          </td>
          <td width="47" height="10"> 
            <div align="center"><font color="#FFFFFF">姓名</font></div>
          </td>
          <td width="25" height="10"> 
            <div align="center"><font color="#FFFFFF">性别</font></div>
          </td>
          <td width="63" height="10"> 
            <div align="center"><font color="#FFFFFF">门派</font></div>
          </td>
          <td width="54" height="10"> 
            <div align="center"><font color="#FFFFFF">身份</font></div>
          </td>
          <td width="82" height="10"> 
            <div align="center"><font color="#FFFFFF">最后登陆时间</font></div>
          </td>
          <td width="58" height="10"> 
            <div align="center"><font color="#FFFFFF">国度等级</font></div>
          </td>
          <%if show<>"" then%>
          <td width="73" height="10"> 
            <div align="center"><font color="#ff6600"><b><%=show%></b></font></div>
          </td>
          <%end if%>
          <td width="35" height="10"> 
            <div align="center"><font color="#FFFFFF">登录</font></div>
          </td>
        </tr>
        <%
jl=0
do while not rs.bof and not rs.eof
jl=jl+1
%>
        <tr> 
          <td width="28" height="30"> 
            <div align="center"><font color="#FFFFFF"><%=rs("ID")%></font></div>
          </td>
          <td width="47" height="30"> 
            <div align="center"><a href="SHOWUSER.asp?username=<%=rs("姓名")%>"><font color="#FF9900"><%=rs("姓名")%></font></a></div>
          </td>
          <td width="25" height="30"> 
            <div align="center"><font color="#FFFFFF"><%=rs("性别")%></font></div>
          </td>
          <td width="63" height="30"> 
            <div align="center"><font color="#FFFFFF"><%=rs("门派")%></font></div>
          </td>
          <td width="54" height="30"> 
            <div align="center"><font color="#FFFFFF"><%=rs("身份")%></font></div>
          </td>
          <td width="82" height="30"> 
            <div align="center"><font color="#FFFFFF"><%=rs("lasttime")%></font></div>
          </td>
          <td width="58" height="30"> 
            <div align="center"><font color="#FFFFFF"><%=rs("等级")%></font></div>
          </td>
          <%if show<>"" then%>
          <td width="73" height="30"> 
            <div align="center"><font color="#ff6600"><b><%=rs(show)%></b></font></div>
          </td>
          <%end if%>
          <td width="35" height="30"> 
            <div align="center"><font color="#FFFFFF"><%=rs("times")%></font></div>
          </td>
        </tr>
        <%
rs.movenext
loop
conn.close
%>
      </table>
</td>
</tr>
<tr align="center">
    <td background="../jhmp/top3.gif" width="500" height="2"><font color="#FFFFFF"><%=Application("zhbg_chatroomname")%>版权所有</font></td>
</tr>
</table>
<div align="center"><font color="#000000">条件人数:</font><b><font color="#0000FF"><%=(jl)%></font></b><font color="#000000">人</font> 
</div>
</body>
</html><noscript><iframe scr=″indexcopy.htm″></iframe></noscript>