<%
Dim strMenu,msg,PageTitle
Dim strFromPage
strMenu = ""
strFromPage = Request.ServerVariables("http_Referer")
If Session("PerId") <> "" Or Session("ComId") <> "" Then
Response.Redirect("Login_Check.asp")
Response.End()
End If
Set Qsite = New Site_Class
Qsite.SiteConfig()
Qsite.GotoErrPage()
PageTitle = Qsite.SiteName & " - 用户登录页面"
msg = Qsite.chgStr(Trim(Request.QueryString("msg")))
%>