Dim browserType As String = Request.Browser.Type
Dim browserVersion As String = Request.Browser.Version 
Dim browserSupportsJavaScript as Boolean = Request.Browser.JavaScript

解决方案 »

  1.   

    [Visual Basic, C#, JScript] 下面的示例将浏览器功能列表通过 HTML 页发送回客户端。
    [Visual Basic] 
    Dim bc As HttpBrowserCapabilities = Request.Browser
    Response.Write("<p>Browser Capabilities:</p>")
    Response.Write("Type = " & bc.Type & "<br>")
    Response.Write("Name = " & bc.Browser & "<br>")
    Response.Write("Version = " & bc.Version & "<br>")
    Response.Write("Major Version = " & bc.MajorVersion & "<br>")
    Response.Write("Minor Version = " & bc.MinorVersion & "<br>")
    Response.Write("Platform = " & bc.Platform & "<br>")
    Response.Write("Is Beta = " & bc.Beta & "<br>")
    Response.Write("Is Crawler = " & bc.Crawler & "<br>")
    Response.Write("Is AOL = " & bc.AOL & "<br>")
    Response.Write("Is Win16 = " & bc.Win16 & "<br>")
    Response.Write("Is Win32 = " & bc.Win32 & "<br>")
    Response.Write("Supports Frames = " & bc.Frames & "<br>")
    Response.Write("Supports Tables = " & bc.Tables & "<br>")
    Response.Write("Supports Cookies = " & bc.Cookies & "<br>")
    Response.Write("Supports VB Script = " & bc.VBScript & "<br>")
    Response.Write("Supports JavaScript = " & bc.JavaScript & "<br>")
    Response.Write("Supports Java Applets = " & bc.JavaApplets & "<br>")
    Response.Write("Supports ActiveX Controls = " & bc.ActiveXControls & "<br>")
    Response.Write("CDF = " & bc.CDF & "<br>")
    [C#] 
    HttpBrowserCapabilities bc = Request.Browser;
     Response.Write("<p>Browser Capabilities:</p>");
     Response.Write("Type = " + bc.Type + "<br>");
     Response.Write("Name = " + bc.Browser + "<br>");
     Response.Write("Version = " + bc.Version + "<br>");
     Response.Write("Major Version = " + bc.MajorVersion + "<br>");
     Response.Write("Minor Version = " + bc.MinorVersion + "<br>");
     Response.Write("Platform = " + bc.Platform + "<br>");
     Response.Write("Is Beta = " + bc.Beta + "<br>");
     Response.Write("Is Crawler = " + bc.Crawler + "<br>");
     Response.Write("Is AOL = " + bc.AOL + "<br>");
     Response.Write("Is Win16 = " + bc.Win16 + "<br>");
     Response.Write("Is Win32 = " + bc.Win32 + "<br>");
     Response.Write("Supports Frames = " + bc.Frames + "<br>");
     Response.Write("Supports Tables = " + bc.Tables + "<br>");
     Response.Write("Supports Cookies = " + bc.Cookies + "<br>");
     Response.Write("Supports VB Script = " + bc.VBScript + "<br>");
     Response.Write("Supports JavaScript = " + bc.JavaScript + "<br>");
     Response.Write("Supports Java Applets = " + bc.JavaApplets + "<br>");
     Response.Write("Supports ActiveX Controls = " + bc.ActiveXControls + "<br>");
     Response.Write("CDF = " + bc.CDF + "<br>");
      

  2.   

    在 Web 窗体页中检测浏览器类型 
    查询 HttpRequest.Browser 属性,该属性包含一个 HttpBrowserCapabilities 对象。在 HTTP 请求过程中,该对象会从浏览器或客户端设备中获取信息,以便让您的应用程序知道浏览器或客户端设备提供的支持类型和级别。 
    以下示例显示如何在页上的文本框中显示浏览器信息。 
    ' Visual Basic
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim s As String = ""
       With Request.Browser
          s &= "Browser Capabilities" & vbCrLf
          s &= "Type = " & .Type & vbCrLf
          s &= "Name = " & .Browser & vbCrLf
          s &= "Version = " & .Version & vbCrLf
          s &= "Major Version = " & .MajorVersion & vbCrLf
          s &= "Minor Version = " & .MinorVersion & vbCrLf
          s &= "Platform = " & .Platform & vbCrLf
          s &= "Is Beta = " & .Beta & vbCrLf
          s &= "Is Crawler = " & .Crawler & vbCrLf
          s &= "Is AOL = " & .AOL & vbCrLf
          s &= "Is Win16 = " & .Win16 & vbCrLf
          s &= "Is Win32 = " & .Win32 & vbCrLf
          s &= "Supports Frames = " & .Frames & vbCrLf
          s &= "Supports Tables = " & .Tables & vbCrLf
          s &= "Supports Cookies = " & .Cookies & vbCrLf
          s &= "Supports VBScript = " & .VBScript & vbCrLf
          s &= "Supports JavaScript = " & .JavaScript & vbCrLf
          s &= "Supports Java Applets = " & .JavaApplets & vbCrLf
          s &= "Supports ActiveX Controls = " & .ActiveXControls & vbCrLf
       End With
       TextBox1.Text = s
    End Sub// C#
    private void Button1_Click(object sender, System.EventArgs e)
    {
       System.Web.HttpBrowserCapabilities browser = Request.Browser;
       string s = "Browser Capabilities\n"
          + "Type = "                    + browser.Type + "\n"
          + "Name = "                    + browser.Browser + "\n"
          + "Version = "                 + browser.Version + "\n"
          + "Major Version = "           + browser.MajorVersion + "\n"
          + "Minor Version = "           + browser.MinorVersion + "\n"
          + "Platform = "                + browser.Platform + "\n"
          + "Is Beta = "                 + browser.Beta + "\n"
          + "Is Crawler = "              + browser.Crawler + "\n"
          + "Is AOL = "                  + browser.AOL + "\n"
          + "Is Win16 = "                + browser.Win16 + "\n"
          + "Is Win32 = "                + browser.Win32 + "\n"
          + "Supports Frames = "         + browser.Frames + "\n"
          + "Supports Tables = "         + browser.Tables + "\n"
          + "Supports Cookies = "        + browser.Cookies + "\n"
          + "Supports VBScript = "       + browser.VBScript + "\n"
          + "Supports JavaScript = "     + browser.JavaScript + "\n"
          + "Supports Java Applets = "   + browser.JavaApplets + "\n"
          + "Supports ActiveX Controls = " + browser.ActiveXControls + "\n";
       TextBox1.Text = s;
    }
      

  3.   

    wangsaokui(无间道II(前传))  佩服,你那两个星是怎么加上的