这是一个在线人数统计，数据库ACCESS，大家帮我看看为何失效。打开 show.asp之后
数据库中ID1的online字段应该已打上勾，页面上显示为true,但是没发生。。。。

一个显示文件，一个Global.asa，当然都放在同一文件夹
数据库db1.mdb,表名list1,字段:name文本类型,pass文本类型，online是否类型
注：事先已经数据库手工输入两条记录，分别是ID1,ID2

用户进入触发session_onstart事件，将数据库online设为true,即已登录，
用户离开触发session_onend事件，将数据库online设为false,已未登录。

show.asp=============================================

<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("db1.mdb")
set rs=server.createobject("adodb.recordset")
cmd="select * from list1"
rs.open cmd,conn,1,1
%>


<% do while not rs.eof %>
在线者:name=<%=rs("name")%>,pass=<%=rs("pass")%>,online=<%=rs("online")%><br>
<% rs.movenext %>
<% loop %>


Global.asa======================================================
<script language=vbscript runat="server">
sub application_onstart
set application("conn")=server.createobject("adodb.connection")
application("conn").open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("db1.mdb")
end sub

sub session_onstart
session("islogin")=false
application.lock
application("conn").execute ("update list1 set online=true where id=1")
application.unlock
end sub


sub session_onend
application.lock
application("conn").execute ("update list1 set online=false where id=1")
application("conn").close
application.unlock
end sub

sub application_onend
end sub
</script>

Global.asa应放在站点的根目录下。

代码要调试后再得知，globa.asa文件不放在根目录下是不会运行的。