% @language="vbscript" %> <% Select case Request.SERVERVARIABLES("HTTP_UA_PIXELS") Case "800×600" Response.Redirect "800.htm" Case "640×480" Response.Redirect "640.htm" Case "1024×768" Response.Redirect "1024.htm" End Select %>