📄 request_browser.aspx
字号:
<Html>
<Body>
<Script Language="VB" Runat="Server">
Sub Page_Load(Sender As Object,e As Eventargs)
Dim bc As HttpBrowserCapabilities = Request.Browser
Response.Write("<H3>调用Request的Browser属性<Hr></H3>")
Response.Write("浏览器= " & bc.Browser & "<br>")
Response.Write("浏览器型态= " & bc.Type & "<br>")
Response.Write("浏览器名称= " & bc.Browser & "<br>")
Response.Write("浏览器版本= " & bc.Version & "<br>")
Response.Write("操作系统= " & bc.Platform & "<br>")
Response.Write("－－是否为测试版?= " & bc.Beta & "<br>")
Response.Write("－－是否为16 位的环境?= " & bc.Win16 & "<br>")
Response.Write("－－是否为32 位的环境?= " & bc.Win32 & "<br>")
Response.Write("－－是否支持框架(Frame)? = " & bc.Frames & "<br>")
Response.Write("－－是否支持表格(Table)? = " & bc.Tables & "<br>")
Response.Write("－－是否支持Cookie? = " & bc.Cookies & "<br>")
Response.Write("－－是否支持VB Script? = " & bc.VBScript & "<br>")
Response.Write("－－是否支持Java Script? = " & bc.JavaScript & "<br>")
Response.Write("－－是否支持Java Applets? = " & bc.JavaApplets & "<br>")
Response.Write("－－是否支持ActiveX Controls? = " & bc.ActiveXControls & "<br>")
End Sub
</Script>
</Body>
</Html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -