Sign-up....

关于一个用户登录后注销的问题!!!急!!!!!!!!!!!!!

我做的毕业设计,会员登录后把会员的资料存在这里

response.Cookies("huiyuan")("username")=trim(request("username"))

response.Cookies("huiyuan")("jifen")=rs("jifen")

response.Cookies("huiyuan")("jiaoyijine")=rs("jiaoyijine")

同时,把字段isonline设置为1表示在线。用户点击注销的时候,再把isonline设置回0,表示不在线。

问题是,如果会员不点击注销,直接关闭浏览器,怎么将数据库里的isonline改为0,即不在线。

下面是我写的global文件,

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

sub Application_OnStart

End sub

</SCRIPT>

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Sub Session_OnStart

Session.Timeout=1

End Sub

</SCRIPT>

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Sub Session_OnEnd

set conn = server.createobject("adodb.connection")

conn.ConnectionString = "Provider=SQLOLEDB.1;Password=sa; Persist Security Info=Ture;User ID=sa;Initial Catalog=bysj;Data Source=(local)"

conn.CommandTimeout = 900

conn.ConnectionTimeout = 900

conn.open

sql="select * from [user] where username='"&request.cookies("huiyuan")("username")&"'"

set rs = server.createobject("adodb.recordset")

rs.open sql,conn,1,3

rs("isonline")=0

rs.update

rs.close

set rs=nothing

End sub

</SCRIPT>

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Sub Application_OnEnd

End sub

</SCRIPT>

关闭浏览器后,这个文件并没有执行,请高人帮忙,谢谢了~~~~~~~~~~~~

[1197 byte] By [msdn] at [2007-8-14 9:08:48]
# 1 Re: 关于一个用户登录后注销的问题!!!急!!!!!!!!!!!!!

你可以参照动网论坛里做法呀

yj821 at 2005-5-20 14:22:23 >
# 2 Re: 关于一个用户登录后注销的问题!!!急!!!!!!!!!!!!!

不懂

我听说global是20分钟执行一次的

自己可以改执行间隔吗?

wgf001 at 2005-5-20 20:00:50 >
# 3 Re: 关于一个用户登录后注销的问题!!!急!!!!!!!!!!!!!

你是不是放在根目录下啊

leo963258 at 2005-5-20 20:14:55 >

Web

All Classified