%
UserAgent = Request.ServerVariables("HTTP_USER_AGENT")
ismsie = InStr(UserAgent,"MSIE")
isopera = InStr(UserAgent,"Opera")
response.Write("
UserAgent: " & UserAgent)
response.Write("
ismsie: " & ismsie)
if ismsie > 0 then
response.Write("
This is an IE browser (BAD)")
response.Redirect("images/photopage_ie/index.htm")
elseif isopera > 0 then
response.Write("
This is an Opera browser (BAD)")
response.Redirect("images/photopage_ie/index.htm")
else
response.Write("
This is neither an IE nor an Opera browser (GOOD)")
response.Redirect("photos.html")
end if
%>