Question

ASP程序该如何获取当前使用的浏览器名称

请问下各位大虾们！
ASP程序该如何获取用户当前所使用的浏览器名称呢？
如：当前所用的是腾讯TT，360浏览器，傲游浏览器等
不要搜索系统中存在浏览器的代码
if Instr(text,"TencentTraveler")>0 then
browserVer="腾讯TT“

Answer 1

<%
Dim Agent,Browser,version,tmpstr
Agent=Request.ServerVariables("HTTP_USER_AGENT")
Agent=Split(Agent,";")
If InStr(Agent(1),"MSIE")>0 Then
Browser="MS Internet Explorer "
version=Trim(Left(Replace(Agent(1),"MSIE",""),6))
ElseIf InStr(Agent(4),"Netscape")>0 Then
Browser="Netscape "
tmpstr=Split(Agent(4),"/")
version=tmpstr(UBound(tmpstr))
ElseIf InStr(Agent(4),"rv:")>0 Then
Browser="Mozilla "
tmpstr=Split(Agent(4),":")
version=tmpstr(UBound(tmpstr))
If InStr(version,")") > 0 Then
tmpstr=Split(version,")")
version=tmpstr(0)
End If
End If
response.Write(""&Browser&" "&version&"")
%>

Answer 2

this.Response.Write("当前浏览器名称为："+Request.Browser.Version);后台的写法你应该知道吧，我们不要把太多的代码写到网页里。