橙火 > 谁能给写一个同时应用了5个asp内置对象的小代码，最简单的就可以，要求能够运行出来的。非常急！！！

谁能给写一个同时应用了5个asp内置对象的小代码，最简单的就可以，要求能够运行出来的。非常急！！！

2025-12-24 09:41:44

推荐回答（1个）

回答1：

<% Server.ScriptTimeout = 100 %>
<%
If Application("count") = "" Then
Application("count") = 1
Else
Application("count") = Application("count") +1
End If

If Session("count") = "" Then
Session("count") = 1
Else
Session("count") = Session("count") +1
End If

response.write "本页面共有"&Application("count")&"次访问
"
response.write "您是第"&Session("count") &"次访问本页面
"
response.write "下面是服务器端的变量"
Foreach item In Request.ServerVariables
response.write item&" --- "&Request.ServerVariables(item)
next
%>