loginout.asp

来自「网站形式的客户系统,可直接提出问题,也可以查看各种问题的答案.」· ASP 代码 · 共 23 行

<!--#include file="config.asp"-->
<!--#include file="conn.asp"-->
<%
sql="select top 1 * from chatinfo order by puttime asc"
rs.open sql,conn,0,3
rs("userid")=""
rs("sayto")=""
rs("saycontent")="<span class=emtxt>"&session("userid")&"</span>离开了聊天室，欢迎下次再来！"
rs("ispublic")=true
rs("puttime")=now()
rs.update
rs.close
set rs=nothing
sql="update userinfo set isonline=false where userid='"&session("userid")&"'"
conn.execute(sql)
conn.close
set conn=nothing
session("loginstatus")=""
session("userid")=""
session("grade")=""
response.redirect "index.asp?ntime="&ntime
%>