ASP는 브라우저와 버전 번호를 결정합니다.
저자:Eve Cole
업데이트 시간:2009-06-26 18:10:03
程序代码
<%
Dim 에이전트,브라우저,버전,tmpstr
에이전트=Request.ServerVariables("HTTP_USER_AGENT")
에이전트=분할(에이전트,";")
InStr(Agent(1),"MSIE")>0이면
브라우저="MS 인터넷 익스플로러"
version=Trim(Left(Replace(Agent(1),"MSIE",""),6))
ElseIf InStr(Agent(4),"Netscape")>0 Then
브라우저="넷스케이프"
tmpstr=분할(에이전트(4),"/")
버전=tmpstr(UBound(tmpstr))
ElseIf InStr(Agent(4),"rv:")>0 Then
브라우저="모질라"
tmpstr=분할(에이전트(4),":")
버전=tmpstr(UBound(tmpstr))
InStr(version,")") > 0이면
tmpstr=분할(버전,")")
버전=tmpstr(0)
종료 조건
종료 조건
response.Write(""&브라우저&" "&버전&"")
%>