<!--#include file="inc_const.asp"-->
<%response.expires=0
Response.CacheControl = "Private"
application.lock

set cschat=server.createobject("ffcschat.cssbchat")
my_level=cschat.getLevel(Session,Application(ConstStr & "_user_list"),Application(ConstStr & "_room_list"))

set cschat=nothing
application.unlock
if  my_level-application( ConstStr & "_superlevel")<>0 then response.end

sql="select * from sysparam where ID>6"
if request("findkey")<>"" then sql=sql&" and guidetxt like '%"&request("findkey")&"%'"

Set Conn=Server.CreateObject("ADODB.Connection")
conn.open Application( ConstStr & "_connstr")
set rs=conn.execute(sql)%>
<html><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:left}a{color:blue}</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=80%>
 <tr><td>
   <table  class=navy2 border=0 cellpadding=2 cellspacing=0 width=100%>
    <tr><td width=100% class=navy2 style="text-align:center"><center>聊天室参数设置</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:history.go(-1);' 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><td colspan=4 class=navy1 nowrap><B style="COLOR: red;t"><center>☆错误的修改了聊天室参数将导致聊天室不可用☆
    <select name="findkey" onChange="window.open('dbshow.asp?findkey='+this.options[this.selectedIndex].value,'_self')">
    <option value="">查找</option>
    <option value="">----</option>
    <option value="禁止">禁止</option>
    <option value="允许">允许</option>
    <option value="级别">级别</option>
    <option value="房">房间</option>
    <option value="信息">信息</option>
    <option value="时间">时间</option>
    <option value="字符">字符</option>
    <option value="自动">自动</option>
    <option value="投票">投票</option>
    <option value="提议">提议</option>
    <option value="广告">广告</option>
    <option value="">全部</option>
    </select><center></B></td></tr>
    <script>function xx(c1,c2,c3){document.write("<tr><td>"+c2+"<td>"+c3+"<td nowrap><a href='setnewvalue.asp?alias="+c1+"'>修改</a><td nowrap><a href='setdefaultvalue.asp?alias="+c1+"' onclick='return confirm(\"您真的要缺省该参数吗？请确认！\");' >缺省</a>");}
<%do while not rs.eof
  response.write "xx("""&rs("alias")&""","""&rs("guidetxt")&""","""&server.HTMLEncode(rs("body"))&""");"
  rs.movenext
loop%></script>
    </table></table><center>[<a href="javascript:history.go(-1);">后 退</a>]
</table></body></html>























































