麻烦各位帮我看看

[shaolin45]

<script language="VBScript" runat="server">

Sub session_OnStart
set application("conn_online")=server.createobject("ADODB.Connection")
application("db_path")=server.MapPath("\shaolin.mdb")


End Sub

Sub session_OnEnd
if session.contents("sessname") then
application.Lock
application("conn_online").open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&application("db_path")
application("conn_online").execute("update User_detail set User_state='离线' where User_name='"&session.contents("sessname")&"'")
application.UnLock

application("conn_online").close
set application("conn_online")=nothing
end if
End sub


</script>

为什么这个global.asa文件怎么不能到达我预期的结果。我想在用户会话结束后。更新数据库刚才从用法为“离线"标志。。。但是。。。不行。但是我认为它在逻辑上看应该没问题。。。

所有麻烦你们帮我看看。问题怎么解决。谢谢