<!--#include file="inc_const.asp"-->
<%Response.CacheControl = "Private"
response.expires=0
Response.CacheControl = "Private"%>
<META content="text/html; charset=gb2312" http-equiv=content-type>
<link rel="stylesheet" type="text/css" href="chat.css">
<style>p{margin-left:10px;margin-right:20px;margin-top:5px;margin-bottom:0px;text-align:left}</style>
<body  style="background-color:EAF2FF;color:112233;scrollbar-Base-Color: #b0d8ff;SCROLLBAR-DARKSHADOW-COLOR:#b0d8ff;SCROLLBAR-arrow-COLOR:#336699;SCROLLBAR-TRACK-COLOR: EAF2FF;SCROLLBAR-3DLIGHT-COLOR: #b0d8ff;SCROLLBAR-SHADOW-COLOR: #336699;SCROLLBAR-HIGHLIGHT-COLOR: #b0d8ff;" leftmargin=3 topmargin=20 style="color:green">
  <table height=100% width=100% ><tr><td align=center valign=center>
  <table align=center width=200 cellspacing=0 cellpadding=0 border=1 BORDERCOLORLIGHT=#000000 BORDERCOLORDARK=#ffffff>
  <tr><td colspan=2 class=navy2>管理员名单</td></tr>
  <tr><td nowrap class=navy1>职位<td nowrap class=navy1>呢称
  <%
Set Conn=Server.CreateObject("ADODB.Connection") 
conn.open Application( ConstStr & "_connstr")  
set rs=conn.Execute("select username,temp_level from vrecord where temp_level>6 order by temp_level desc")
if not (rs.eof or rs.bof) then
  do while not rs.eof
    if rs("temp_level")=9 then
      admin_name="董事"
    elseif rs("temp_level")=8 then
      admin_name="经理"
    else
      admin_name="领班"
    end if%>
    <tr><td nowrap><%=admin_name%><td nowrap><%=rs("username")%>
    <%rs.movenext
  loop
else%>
<tr><td colspan=2>这里列出聊友投票选举出来的临时管理员。现在还没有临时管理员产生！详细介绍请看帮助里面的投票管理！
<%end if%>
</table><br>[<a href='javascript:parent.close()'>关闭</a>]</td></tr></table></form>
</body></html>
<%rs.close
set rs=nothing
conn.close
set conn=nothing%>




