不用Global.asa也能实现统计在线人数吗？.docxVIP

不用 Global.asa 也能实现统计在线人数吗？ 可以的，看看下面的代码和说明： % sessionID = session.SessionID timeout = 5 设置 session 保持的时间 Conn_String = DRIVER={Microsoft Access Driver (*.mdb)};DBQ= Server.MapPath(count.mdb) Conn_String = activeUser 最好设置 DSN = activeuser,因为我们需要在所有的 ASP 脚本中包含这个文件 Set ConnCount =Server.CreateObject(ADODB.Connection) ConnCount.Open Conn_String aaa = dateadd(n, -timeout, now()) connCount.Execute (delete * from count where postdate # aaa #) 在超时后删除 session sql0 = select sess from count where sess= sessionID 保持 sessionID set rscheck = connCount.Execute (sql0) if rscheck.eof then sql = insert