change.asp

来自「这是聊天室的源代码 很好实现的 看看吧」· ASP 代码 · 共 12 行

<!--#INCLUDE FILE="function.asp"-->
<%
'调用函数，从当前聊天室名单中删除自己
'这一句可以不要，因为只要切换聊天室，f4.asp就会被关闭，就会调用exit.asp，在其中就会将自己从名单中删除。
'不过由于此时调用exit.asp有滞后效应，客户反到首页后，会看到不准确的在线人员数字，所以这里也执行一次删除。
'当然这个删除子程序会自动决定，有才删除，没有该用户就不删除，所以多执行一遍没有关系。
Call DelUserName(Session("username"),Session("chatroom"))

'重定向首页
response.redirect "index.asp"
%>