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

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