
<%@ Language=VBScript %>

<%
'response.buffer=true
ua = Request.ServerVariables("HTTP_USER_AGENT")
If Instr(ua, "MSIE") Then
  If Instr(ua, "MSIE 5.") Then
   Browser = "IE 5.x"
   bSupport = "Support"
   Elseif Instr(ua, "MSIE 4.") Then
   Browser = "IE 4.x"
   bSupport = "Support"
   Elseif Instr(ua, "MSIE 3.") Then
   Browser = "IE 3.x"
   bSupport = "Not Support"
   If Instr(ua, "MSIE 3.02") Then
     Browser = "IE 3.02"
     bSupport = "Not Support"
     End If
     Else
    Browser = "IE"
  End If
ElseIf Instr(ua, "Mozilla") and Instr(ua, "compatible") = 0 Then
If Instr(ua, "Mozilla/4") Then
  Browser = "NE 4.x"
  bSupport = "Not Support"
  Elseif Instr(ua, "Mozilla/3") Then
  Browser = "NE 3.x"
  bSupport = "Not Support"
  Else
  Browser = "NE"
End If
End If
 %>
<% If bSupport="Not Support" then 
response.redirect ("index1.html")
 response.end %>
<%end if %>