欲取得目前和服務器聯機之瀏覽器的信息,可以使用Browser 屬性。Browser 屬性是一個集合對象,所以也可以使用一個HttpBrowserCapabilities 型態的對象變量來接收Browser 屬性的傳回值。下列范例我們使用HttpBrowserCapabilities 型態的變量來取得了瀏覽器的部分信息:
<Html>
<Script Language="VB" Runat="Server">
Sub Page_Load(Sender As Object,e As Eventargs)
Dim bc As HttpBrowserCapabilities = Request.Browser
Response.Write("<p>瀏覽器信息:</p>")
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>
</Html>