电脑故障

位置:IT落伍者 >> 电脑故障 >> 浏览文章

在线人数写法


发布日期:2024/3/14
 

<%
user=requestcookies("bbsusername")
totaluser=application("user")
if instr(totaluseruser)= then
applicationlock
application("user")=totaluser&";"&user
applicationunlock
end if
%>
<html>
<head>
<meta httpequiv="refresh" content="">
</head>
<body>
</body>
</html>
最后显示在线人数
user=split(application("user")";")
num=ubound(user)
responsewrite num

上一篇:Datetime.Tostring用法

下一篇:网页跳转代码简介