%@ LANGUAGE="VBScript" %> <% OPTION EXPLICIT %> <% Dim AgentType AgentType = Request.ServerVariables("HTTP_USER_AGENT") %>