📄 4-7.asp
字号:
<html>
<head>
<title>显示网站在线人数</title>
</head>
<%
Application.Lock() '锁定Application对象
Application("Counter")=Application("Counter")+1
'访问者人数加一
Application.UnLock() '解除锁定
%>
<body>
<h2 align="center">网站计数器</h2>
<%
Response.Write "<p align='center'>您是第" & Application("Counter") & " 位访问者"
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -