% Dim strMenu,msg,PageTitle,jyrcwfz1,zhuce Dim strFromPage strMenu = "" strFromPage = Request.ServerVariables("http_Referer") jyrcwfz1=Request.ServerVariables("HTTP_HOST") If (Request.Cookies("PerId") <> "" Or Request.Cookies("ComId") <> "") and Request.Cookies("UserType") <> "" Then Response.Redirect("Login_Check.asp") Response.End() End If Set jyrcw = New Site_Class Jyrcw.SiteConfig() Jyrcw.GotoErrPage() msg = Jyrcw.chgStr(Trim(Request.QueryString("msg"))) zhuce = Jyrcw.chgStr(Trim(Request.QueryString("zhuce"))) %> <%if jyrcwfenzhanmbxz=0 or jyrcwfenzhanmbxz=1 or jyrcwfenzhanmbxz=2 or jyrcwfenzhanmbxz=3 then%>