<!-- #include file=../../inc/BBSsetup.asp -->
<!-- #include file=../../inc/Board_popfun.asp -->
<!-- #include file=../../inc/ubbcode.asp -->
<!--#include file="conn.asp"-->

<script language="javascript">
function bs() {
  document.formtalk.saystemp.focus();
}

function checksays(theForm) {
  if (document.formtalk.saystemp.value==""){
     return false;
}
document.formtalk.says.value=document.formtalk.saystemp.value;
  document.formtalk.saystemp.value='';
  return true;
}
function show_user(mylink){
window.open(mylink,"","top=20,left=150,width=250,height=120,resizable=no,status=0,menubar=0,location=0,scrollbars=no")
}
</script>
<html>

<head>
<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<link rel="stylesheet" href="chat.css">
<title>在线聊天室</title>
<base target="_self">
</head>


<body topmargin="2" bgcolor="<%=GBL_TableHeadString%>" class="TBBG9">
<!--<body topmargin="2" BGCOLOR="#000000">-->

<form method="POST" name="formtalk" action="chk.asp" target="list" onsubmit="return(checksays(this));" >

  <br><p align="center">

<input type=hidden name="says" value="">

  <%
  if GBL_CHK_User="" then
  response.write "欢迎<font color=red>" + session("chatname")%></font>发言<br>
  
<input type="text" name="saystemp" size="25">
  
  <input type="submit" value="发送" name="B1" class="fmbtn" style="border: 0 solid #87CEEB">

  <br><p align="center">

  <a href=list.asp target="list"> <font color=#2E8B57 face="宋体">
  刷新</font></a> &nbsp<a href="default.asp" target="_blank"><font color=#2E8B57>大窗</font></a> 
 
  <%else
dim username,sql,rs
session("username")=GBL_CHK_User
  response.write "欢迎<font color=red>" + GBL_CHK_User + "</font>"
 
 sql="select * from forbid where name='"&username&"'"
 set rs=conn.execute(sql)
 if not rs.eof and not rs.bof then
 if rs("time")<time() then
response.write "你现在被关小黑屋中，请稍后再来...."
else
sql="delete * from forbid where name='"&username&"'"
conn.execute(sql)
sql=nothing
end if
else%>发言<br>

  <input type="text" name="saystemp" size="25">

  <input type="submit" value="发送" name="B1" class="fmbtn" style="border: 0 solid #87CEEB">

  <br><p align="center">
  
  <a href=list.asp target="list"> <font color=#2E8B57>刷新</font></a>&nbsp<a href=javascript:show_user("help.htm")><font color=#2E8B57>帮助</font></a> 
  &nbsp<a href="default.asp" target="_blank"><font color=#2E8B57>大窗</font></a> 
  <%sql="select * from admin where name='"&session("username")&"'"    
set rs=conn.execute(sql)
if not rs.eof and not rs.bof then
response.write "<a href=cls.asp target='list'><font color=#2E8B57>清屏</font></a>&nbsp"
response.write "<a href=manage.asp target='_black'><font color=#2E8B57>管理</font></a>&nbsp"
end if
end if
 end if

%></form>
 
</body>
</html>
