<%
'========================================================================================
' 文 件 名: purview_default.asp
' 版    本: 岭峰网行业专用留言系统3.10.0 (LFMessS 2020 - 3.10.0.F Build 200604)
' 说    明: 首页权限验证文件 | 您可以替换该处代码为您整套系统的权限验证代码，以实现统一管理
' 文件日期: 2020-06-04
' 设 计 者: 疾风之狼
'========================================================================================
' 郑州文达岭峰网络科技有限公司.
'========================================================================================
' Copyright (C) 2001-2020 岭峰网. All rights reserved.
' 网    站: http://www.lfmesss.com
' 电子邮件: support@lfmesss.com
' 联系ＱＱ: 85112407
'========================================================================================

IF LingFengNet_MS_messguest = 1 and flg <> "save" Then
	IF Session("LingFengNet_MS_admin") <> "ok" Then
		IF LingFengNet_MS_add_news_1 = 1 Then
			add_menu = "addnew.htm"
		Else
			add_menu = "addnew.asp"
		End IF
		Server.Transfer(add_menu)
		Response.End
	End IF
End IF

IF LingFengNet_MS_setup = "no" Then
	Session("LingFengNet_MS_admin") = "ok"
	Session("LingFengNet_MS_admin_flg") = "3"
	Session("LingFengNet_MS_admin_flg_adminname") = LingFengNet_MS_adminname
	IF Instr(LingFengNet_MS_adminname, "|") = 0 or Instr(LingFengNet_MS_adminpass, "|") = 0 Then
		Session("LingFengNet_MS_admin_flg_adminname") = LingFengNet_MS_adminname
		Session("LingFengNet_MS_admin_flg_login") = LingFengNet_MS_language_messdef_mesok_re_admin_4 & LingFengNet_MS_adminpublicname
	Else		
		nameReturn = Split(LingFengNet_MS_adminname, "|")
		publicnameReturn = Split(LingFengNet_MS_adminpublicname, "|")
		Session("LingFengNet_MS_admin_flg_adminname") = Trim(nameReturn(0))
		Session("LingFengNet_MS_admin_flg_login") = LingFengNet_MS_language_messdef_mesok_re_admin_4 & Trim(publicnameReturn(0))
	End IF
	Response.write "<meta http-equiv=Content-Type content=text/html;charset="& LingFengNet_MS_language_meta_mes_1 &"><script>alert('"& LingFengNet_MS_language_Warning_purview_default_1 &"');this.location.href=""admin_mansuper"& Get_Suffix() &"""</script>"
End IF
%>