我的global.asa文件,时而执行时而不执行,怪!~
我在global.asa文件里写入一下代码,目的是做个在线访问量的统计。session_onstart可以正常运行,将数据写入数据库;但是session_onend就是不执行,数据总不能写入数据库,但是后来我发现我随便改一下global.asa(例如在任意一行代码前加一个空格)然后保存,session_onend就能正常运行了!
global.asa文件的代码如下,各位高手帮我看看有什么问题,谢谢了。
<script language="vbscript" runat="server">
sub session_onstart
dim ip,intime,db,connstr,sqlstr
session.timeout=100
session("intime")=now()
intime=session("intime")
ip=request.servervariables("remote_addr")
session("ip")=ip
set conn=server.createobject("adodb.connection")
conn.Open "Dbq=" & Server.Mappath("db\sta.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}"
sqlstr="insert into tb(ip,intime) values('"&ip&"',#"&intime&"#)"
conn.execute sqlstr
end sub
sub session_onend
dim starttime,endtime,sqlstr,staytime
intime=session("intime")
outtime=now()
staytime=datediff("s",intime,outtime)
set conn=server.createobject("adodb.connection")
conn.Open "Dbq=G:\jyno3\db\sta.mdb;Driver={Microsoft Access Driver (*.mdb)}"
sqlstr="update tb set staytime='"&staytime&"',outtime=#"&outtime&"#,out=true where ip='"&session("ip")&"' and intime=#"&session("intime")&"#"
conn.execute(sqlstr)
conn.close
set conn=nothing
end sub
</script>