本人开了一个论坛 怎么样来记录别人介绍来注册和浏览人数呢

来源：百度知道 编辑：UC知道 时间：2024/05/27 01:15:28
论坛的地址是 http://jaycn.70bb.com

希望大家帮忙解决下
............... 1楼的大哥. . .能弄简单点不 看不懂啊

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

dim zaixian,ip,time1,zaixian1
application("zaixian")=0

End sub

Sub Session_OnStart

session("ip")=request.servervariables("remote_addr")
session("time1")=now()

application.lock
application("zaixian")=application("zaixian")+1
application.unlock
session("id")=""
End Sub

Sub Session_OnEnd

application.lock
application("zaixian")=application("zaixian")-1
application.unlock
set conn=server.createobject("adodb.connection")
set rs=server.createobject("adodb.recordset")
conn.open "driver={microsoft access dri