看下这段代码(gobal.asa文件)????(一直在线.快....)

luluso 2003-10-17 12:05:57
<scrip language="vbscript" runat="server">
sub application_onstart
application("allusername")=""
end sub
sub session_onstart()
application("allusername")=application("allusername")&","&session("username")
session.timeout=5
end_sub
sub session_onend
application("allusername")=replace(application("allusername"),","&session("username"),"")
end_sub
sub application_onend()
end sub
</script>
上面代码可以把登陆的人员加到application("allusername")但是.如果用户关闭浏览器的话.或怎么样的话.怎么把退出的移除掉.
不单止这样在本地调试的时候.我把所有的ie都关了.然后再重新打开一个.为什么会把这次的用户名和以前的application("allusername")的值相加.也就是说.application的值没失效.
该怎么样才能把退出的人员从application("allusername")的名单中除掉.
session_onend
application("allusername")=replace(application("allusername"),","&session("username"),"")
end_sub
这段代码有什么问题.帮忙改下.也就是说session失效的问题.
...全文
37 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
luluso 2003-10-17
  • 打赏
  • 举报
回复
我调没报错啊.就是把用户名都加上了.就没把退出的用户减去而以.造成用户不断加.不知如何解决.
avonqin 2003-10-17
  • 打赏
  • 举报
回复
你上面的程序没有报错?反正在我本机运行不了;
修改正确后
怎么application("allusername")=application("allusername")&","&session("username")得出结果是","而没有session("username")的值?
我的test.asp代码是:
<%
a="test"
session("username")=a
%>
<% response.write application("allusername") %>
401377 2003-10-17
  • 打赏
  • 举报
回复
不如在关闭前给它们设个空值再关好了!这样不是没问题了吗
zykj_2000 2003-10-17
  • 打赏
  • 举报
回复
就算是关闭浏览器,session也是要过一会失效的
ttt2 2003-10-17
  • 打赏
  • 举报
回复
在application_onstart时设置一下session.timeout=2为2钟

打开浏览器时,
session onstart
用instr判断有没能该用户
没有再加进application

session onend时
再替换掉

不用关掉浏览器,等超时后再看 applicstion的值
zhanghuazhanghome 2003-10-17
  • 打赏
  • 举报
回复
关注
avonqin 2003-10-17
  • 打赏
  • 举报
回复
end_sub也可以?我这end sub才可以

28,390

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧