<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim sname sname = Request.ServerVariables("SERVER_NAME") sname = ucase(sname) Response.Redirect("bh2default.htm") %>