两个参数不明白？
<%
function online() '统计在线用户数。
dim tmprs
sql="Select count(id) from "&CategoryName&"_online"
set tmprs=conn.execute(sql)
online=tmprs(0)
set tmprs=nothing
if isnull(online) then online=0
end function
CloseDatabase
%>
疑问：1、“tmprs”表示的不是数据库表中的记录数吗？怎么下面有“tmprs(0) ”用于计数。
2、“CloseDatabase”这是什么意思？是关闭数据库文件吗？是不是与数据库文件放在Database文件夹中有关。
[解决办法]
这里有个set tmprs=conn.execute(sql) 就已经把记录集赋与了tmprs，所以后面用online=tmprs(0) 来取得记录集中的第一个字段，也就是count(id) 的值。
CloseDatabase 应该是一个关闭数据库的过程或函数，看源码才知道。
[解决办法]
tmprs是数据集
tmprs(0)为数据集中第一个字段的值，也就是count(id)的值
CloseDatabase 是一个自定义函数
