📄 05_04.asp

📁 ASPTest 网络基础网页设计

💻 ASP

字号:

<html>
<head>
<title>Session对象应用实例</title>
</head>
<body>
<%
Dim tVisit
tVisit = Session("VisitTime")
If Len(tVisit) = 0 Then
  Response.Write "<p>这是您首次访问本页面"
  Response.Write "<p>您本次访问本页的时间为：" & Now
Else 
  Response.Write "<p>您最近一次访问本页的时间为：" & tVisit
  Response.Write "<p>您本次访问本页的时间为：" & Now
End If
Session("VisitTime") = Now
%>
<p><a href="05_04.asp">刷新此页</a>
<p><a href="05_05.asp">取消会话</a> 
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -