<!--#include file="inc_const.asp"-->
<%
response.expires=0
Response.CacheControl = "Private"
application.lock
room_array=split(Application( ConstStr & "_room_list"),"$><$")
application.unlock
set cschat=server.createobject("ffcschat.cssbchat")
room_array2=split(room_array(0),"$>")
room_name_title=room_array2(1)
%>
<html><title>〖<%=room_name_title%>〗</title>
<META content="text/html; charset=gb2312" http-equiv=content-type><meta HTTP-EQUIV='Pragma' CONTENT='no-cache'>
<link rel="stylesheet" type="text/css" href="chat.css"></head>
<style>td{text-align:right;}</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 onload="this.focus();">
<table align=center border=1 bordercolordark=#ffffff bordercolorlight=#000000 cellspacing=0 width=90% >
 <tr><td>
  <table class=navy2 border=0 cellpadding=2 cellspacing=0 width=100% >
    <tr><td width=100% class=navy2 style="text-align:center">查看房间信息
    <td><table border=1 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;"  bordercolordark=#ffffff bordercolorlight=#666666 cellpadding=0 cellspacing=0 width=18>
    <tr><td width=16><b><a href='javascript:window.close()' title=退出><font color=#000000>×</font></a></b>
      </table>
  </table>
  <table 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;" border=0 bordercolordark=#ffffff bordercolorlight=#000000 cellpadding=5 cellspacing=0 width=100%>
   <tr align=middle valign=center>
    <td>
    <table align=center border=1 bordercolordark=#ffffff bordercolorlight=#ccccff cellspacing=0 width=100%>
    <tr class=navy1><td nowrap>名称<td nowrap>在线<td nowrap>房主<td nowrap>机器人<td nowrap>限制<td nowrap>生命<td nowrap>人气<td nowrap>建立时间<td nowrap>最后访问</td></tr>
<%
  for i=0 to UBound(room_array) step 2
    room_array2=split(room_array(i),"$>")
    room_name=room_array2(1)
    room_owner=room_array2(2)
    room_auto=room_array2(3)
    room_time=cschat.alldatestr(room_array2(8))
    room_exp=room_array2(11)
    room_build_time=cschat.alldatestr(room_array2(12))
    if trim(room_array2(13))="" then
      online_num=0
    else
      online_arr=split(trim(room_array2(13))," ")
      online_num=ubound(online_arr)+1
    end if
    if room_array2(7)="1" then
      room_life="永久"
    else
      room_life=application( ConstStr & "_roomtimeout")-application( ConstStr & "_roomexpperday")*DATEDIFF("d",room_build_time,now())+room_exp
    end if
%>
    <tr><td><%=room_name%><td><%=online_num%><td><%=room_owner%><td><%=room_auto%><td><%=room_array2(15)%>级<td><%=room_life%><td><%=room_exp%><td><%=room_build_time%><td><%=room_time%></td></tr>
  <%next%>
   </table></table>
</table>
<center style=color:blue><br><%=room_name_title & " " & cschat.getver() %> 开放时间：<%=Application( ConstStr & "_opendate")%>　访问人数：<%=Application( ConstStr & "_visitor")%></center></body></html>
<%set cschat=nothing%>































