📄 cachebyheader.aspx
字号:
<%@ OutputCache Duration="300" VaryByParam="*" VaryByHeader="User-Agent"%>
<Script Runat="Server">
Dim strBuyOurProducts As String
Sub Page_Load
If Request.Browser.Browser = "Netscape" Then
strBuyOurProducts = "<Blink>Buy Our Products!</Blink>"
Else
strBuyOurProducts = "<font color=red>Buy Our Products!</font>"
End If
End Sub
</Script>
<html>
<head><title>CacheByHeader.aspx</title></head>
<body>
<h1><%=strBuyOurProducts %></h1>
<hr>
<small>Last Updated: <%=Now%></small>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -