ASP访问实现站点计数器（访问）

<
设置conn = server.createobject（数据连接）
connstr =商=微软。飞机。OLEDB数据源。4；=server.mappath（凑.mdb ） / /可以是数据库的名称
conn.open connstr
如果会话（访问）为是，则
应用程序锁定（）
conn.execute（更新计数器集点击率=点击+ 1孩子= 1 ） / /计数器是用来存储数据库中的数据表的名称
Application.UnLock（）
会话（）是
最后如果
集= conn.execute（选择*从Kuo那里的孩子= 1 ）
如果rs.eof和rs.bof然后
计数器= 0
其他的
计数器= RS（）
最后如果
关闭
conn.close
设置=无
设置conn =没有
%>