<%
'此版本为免费下载的（试用版本）源码加密处理过
'购买正式版系统提供源码（支持二次开发，修改）
'系统服务商：金华市宁志网络科技有限公司
'公司网址：http://www.ningzhi.net 
'客服QQ号：122470827 电话：18867186998 （同微信号）刘经理
'全国统一售后电话：0579-83938663 
'支持正版：软件著作权登记号：2012SR040914
'官方平台：购买系统请上金华市宁志网络公司官网平台是唯一购买渠道
'本公司无第三方代销售平台请认准,以免上当受骗！！！
'请勿修改下列任何代码,以保证程序正常运行·感谢您体验宁志产品，宁志有您更精彩！
'TM:2023-08-09 15:31:23

Dim NZZZZNZ,NZZZZNN,NZZZNZZ,NZZZNZN,NZZZNNZ
Set NZZZNZZ=Response:Set NZZZZNN=Request:Set NZZZNNZ=Session:Set NZZZZNZ=Application:Set NZZZNZN=Server
set NZZNZNN = NZZZNZN.CreateObject(NZZZNNN("25@53]4@??64E:@?"))
NZZNNZZ=NZZZNNN("!C@G:56Cl|:4C@D@7E]y6E]~{tsq]c]_jy6E ,~{tsqi52E2q2D6 ,!2DDH@C5lYYYYYYYYYYj52E2 ,$@FC46l") & NZZZNZN.MapPath(NZZZNNN("?K4>D02]2DA"))
NZZNZNN.open NZZNNZZ
NZZNNZN=NZZZZNN.QueryString(NZZZNNN("D62C49"))
set NZZNNNZ=NZZZNZN.CreateObject(NZZZNNN("25@53]C64@C5D6E"))
NZZNNNN=NZZZNNN("D6=64E ,Y ,7C@> ,?K4>D ,@C56C ,3J ,:5 ,56D4")
NZZNNNZ.open NZZNNNN,NZZNZNN,1,1
if NZZNNNZ.recordcount<>0 then
NZNZZZZ=NZZNNNZ(NZZZNNN("H63"))
NZNZZZN=NZZNNNZ(NZZZNNN("HHH"))
NZNZZNZ=NZZNNNZ(NZZZNNN("52E22?5E:>6"))
NZNZZNN=NZZNNNZ(NZZZNNN("FD6C:5"))
NZNZNZZ=NZZNNNZ(NZZZNNN("45:5"))
NZNZNZN=NZZNNNZ(NZZZNNN("DB@<"))
NZNZNNZ=NZZNNNZ.recordcount
NZNZNNN= (78 * 98 - 7641)
NZNNZZZ= (78 * 98 - 7641)
NZNNZZN= (67 * 90 - 6026)
NZNNZNZ= (26 * 51 - 1321)
NZNNZNN= (41 * 74 - 3028)
NZNNNZZ= (108 * 82 - 8849)
NZNNNZN= (79 * 71 - 5601)
NZNNNNZ= (43 * 101 - 4334)
end if
NZZNNNZ.close
set NZZNNNZ=nothing
set NZNNNNN = NZZZNZN.CreateObject(NZZZNNN("25@53]4@??64E:@?"))
NZZNNZZ=NZZZNNN("!C@G:56Cl|:4C@D@7E]y6E]~{tsq]c]_jy6E ,~{tsqi52E2q2D6 ,!2DDH@C5lYYYYYYYYYYj52E2 ,$@FC46l") & NZZZNZN.MapPath(NZZZNNN("?K4>D03B]2DA"))
NZNNNNN.open NZZNNZZ
NZZNNZN=NZZZZNN.QueryString(NZZZNNN("D62C49"))
set NZZNNNZ=NZZZNZN.CreateObject(NZZZNNN("25@53]C64@C5D6E"))
NZZNNNN=NZZZNNN("D6=64E ,Y ,7C@> ,?K4>D ,@C56C ,3J ,:5 ,56D4")
NZZNNNZ.open NZZNNNN,NZNNNNN,1,1
NNZZZZZ=NZZNNNZ(NZZZNNN("HHH"))
NNZZZZN=NZZNNNZ(NZZZNNN("ED"))
NNZZZNZ=NZZNNNZ(NZZZNNN("EDa"))
NNZZZNN=NZZNNNZ(NZZZNNN("EDb"))
NNZZNZZ=NZZNNNZ(NZZZNNN("EDc"))
NNZZNZN=NZZNNNZ(NZZZNNN("EDd"))
NNZZNNZ=NZZNNNZ(NZZZNNN("EDe"))
NNZZNNN=NZZNNNZ(NZZZNNN("EDf"))
NNZNZZZ=NZZNNNZ(NZZZNNN("EDg"))
NNZNZZN=NZZNNNZ(NZZZNNN("EDh"))
NNZNZNZ=NZZNNNZ(NZZZNNN("ED`_"))
NNZNZNN=NZZNNNZ(NZZZNNN("FD6C\:5"))
NNZNNZZ=NZZNNNZ(NZZZNNN("FD6C\BB"))
NNZNNZN=NZZNNNZ(NZZZNNN("E;"))
NNZNNNZ=NZZNNNZ(NZZZNNN("d`E;"))
NNZNNNN=NZZNNNZ(NZZZNNN("?K4>D"))
NNNZZZZ=NZZNNNZ(NZZZNNN("3J0:>286D"))
NNNZZZN=NZZNNNZ(NZZZNNN("?K4>D0?2>6"))
NNNZZNZ=NZZNNNZ(NZZZNNN("3B"))
NNNZZNN=NZZNNNZ(NZZZNNN("J62C"))
NNNZNZZ=NZZNNNZ(NZZZNNN(">@?E9"))
NNNZNZN=NZZNNNZ(NZZZNNN("3J"))
NNNZNNZ=NZZNNNZ(NZZZNNN("G"))
NNNZNNN=NZZNNNZ(NZZZNNN("D@5?2"))
NNNNZZZ=NZZNNNZ(NZZZNNN("D@G"))
NNNNZZN=NZZNNNZ(NZZZNNN("96D9F"))
NNNNZNZ=NZZNNNZ(NZZZNNN("3K`"))
NNNNZNN=NZZNNNZ(NZZZNNN("3Ka"))
NNNNNZZ=NZZNNNZ(NZZZNNN("3Kb"))
NNNNNZN=NZZNNNZ(NZZZNNN("3Kc"))
NNNNNNZ=NZZNNNZ(NZZZNNN("3Kd"))
NNNNNNN=NZZNNNZ(NZZZNNN("3Ke"))
NZZZZZZZ=NZZNNNZ(NZZZNNN("3Kf"))
NZZZZZZN=NZZNNNZ(NZZZNNN("3Kg"))
NZZZZZNZ=NZZNNNZ(NZZZNNN("3Kh"))
NZZZZZNN=NZZNNNZ(NZZZNNN("3K`_"))
NZZZZNZZ=NZZNNNZ(NZZZNNN("3K``"))
NZZZZNZN=NZZNNNZ(NZZZNNN("3K`a"))
NZZZZNNZ=NZZNNNZ(NZZZNNN("3K`b"))
NZZZZNNN=NZZNNNZ(NZZZNNN("3K`c"))
NZZZNZZZ=NZZNNNZ(NZZZNNN("3K`d"))
NZZZNZZN=NZZNNNZ(NZZZNNN("3K`e"))
NZZZNZNZ=NZZNNNZ(NZZZNNN("3K`f"))
NZZZNZNN=NZZNNNZ(NZZZNNN("3K`g"))
NZZZNNZZ=NZZNNNZ(NZZZNNN("3K`h"))
NZZZNNZN=NZZNNNZ(NZZZNNN("3Ka_"))
NZZZNNNZ=NZZNNNZ(NZZZNNN("3Ka`"))
NZZZNNNN=NZZNNNZ(NZZZNNN("3Kaa"))
NZZNZZZZ=NZZNNNZ(NZZZNNN("3Kab"))
NZZNZZZN=NZZNNNZ(NZZZNNN("3Kac"))
NZZNZZNZ=NZZNNNZ(NZZZNNN("3Kad"))
NZZNZZNN=NZZNNNZ(NZZZNNN("3Kae"))
NZZNZNZZ=NZZNNNZ(NZZZNNN("3Kaf"))
NZZNZNZN=NZZNNNZ(NZZZNNN("3Kag"))
NZZNZNNZ=NZZNNNZ(NZZZNNN("3Kah"))
NZZNZNNN=NZZNNNZ(NZZZNNN("3Kb_"))
NZZNNZZZ=NZZNNNZ(NZZZNNN("3Kb`"))
NZZNNZZN=NZZNNNZ(NZZZNNN("3Kba"))
NZZNNZNZ=NZZNNNZ(NZZZNNN("3Kbb"))
NZZNNNZ.close
set NZZNNNZ=nothing
set NZZNNZNN = NZZZNZN.CreateObject(NZZZNNN("25@53]4@??64E:@?"))
NZZNNZZ=NZZZNNN("!C@G:56Cl|:4C@D@7E]y6E]~{tsq]c]_jy6E ,~{tsqi52E2q2D6 ,!2DDH@C5lPoRST/UYj52E2 ,$@FC46l") & NZZZNZN.MapPath(NZZZNNN("?K4>D05?2]2DA"))
NZZNNZNN.open NZZNNZZ
NZZNNZN=NZZZZNN.QueryString(NZZZNNN("D62C49"))
set NZZNNNZ=NZZZNZN.CreateObject(NZZZNNN("25@53]C64@C5D6E"))
NZZNNNN=NZZZNNN("D6=64E ,Y ,7C@> ,?K4>D ,@C56C ,3J ,:5 ,56D4")
NZZNNNZ.open NZZNNNN,NZZNNZNN,1,1
NZZNNNZZ=NZZNNNZ(NZZZNNN("FD6C0:5"))
NZZNNNZN=NZZNNNZ(NZZZNNN("FD6C0KD"))
NZZNNNZ.close
set NZZNNNZ=nothing
If NZZZZNN.ServerVariables(NZZZNNN("$t#'t#0}p|t"))<>""&NZZNZNNN&"" and NZZZZNN.ServerVariables(NZZZNNN("$t#'t#0}p|t"))<>""&NZZNNZZZ&""  and left(NZZZZNN.ServerVariables(NZZZNNN("$t#'t#0}p|t")),7)<>""&NZZNNZZN&"" Then
If NNNZNZN="" or NNZNNNN="" or NZNZZNN="" Then
NZZZNZZ.Redirect(""&NNZZZNN&"")
NZZZNZZ.end
end if
End If
NZZNZNN.close:set NZZNZNN=nothing
NZNNNNN.close:set NZNNNNN=nothing
NZZNNZNN.close:set NZZNNZNN=nothing
Function NZZZNNN(ByVal NZZNNNNZ)
Dim NZZNZZZ, NZZNZZN, NZZNZNZ
NZZNNNNZ = Replace(NZZNNNNZ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For NZZNZZN = 1 To Len(NZZNNNNZ)
If NZZNZZN <> NZZNZNZ Then
NZZNZZZ = AscW(Mid(NZZNNNNZ, NZZNZZN, 1))
If NZZNZZZ >= 33 And NZZNZZZ <= 79 Then
NZZZNNN = NZZZNNN & Chr(NZZNZZZ + 47)
ElseIf NZZNZZZ >= 80 And NZZNZZZ <= 126 Then
NZZZNNN = NZZZNNN & Chr(NZZNZZZ - 47)
Else
NZZNZNZ = NZZNZZN + 1
If Mid(NZZNNNNZ, NZZNZNZ, 1) = NZZZNNN("o") Then NZZZNNN = NZZZNNN & ChrW(NZZNZZZ + 5) Else NZZZNNN = NZZZNNN & Mid(NZZNNNNZ, NZZNZZN, 1)
End If
End If
Next
End Function
%>