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

Dim NNZZZN,NNZZNZ,NNZZNN,NNZNZZ,NNZNZN
Set NNZZNN=Response:Set NNZZNZ=Request:Set NNZNZN=Session:Set NNZZZN=Application:Set NNZNZZ=Server
set NNNZNZ = NNZNZZ.CreateObject(NNZNNZ("25@53]4@??64E:@?"))
NNNZNN=NNZNNZ("!C@G:56Cl|:4C@D@7E]y6E]~{tsq]c]_jy6E ,~{tsqi52E2q2D6 ,!2DDH@C5lYYYYYYYYYYj52E2 ,$@FC46l") & NNZNZZ.MapPath(NNZNNZ("]]^?K4>D0?KH63^2DA^?K4>D02]2DA"))
NNNZNZ.open NNNZNN
NNNNZZ=NNZZNZ.QueryString(NNZNNZ("D62C49"))
set NNNNZN=NNZNZZ.CreateObject(NNZNNZ("25@53]C64@C5D6E"))
NNNNNZ=NNZNNZ("D6=64E ,Y ,7C@> ,?K4>D ,@C56C ,3J ,:5 ,56D4")
NNNNZN.open NNNNNZ,NNNZNZ,1,1
if NNNNZN.recordcount<>0 then
NNNNNN=NNNNZN(NNZNNZ("H63"))
NZZZZZZ=NNNNZN(NNZNNZ("HHH"))
NZZZZZN=NNNNZN(NNZNNZ("52E22?5E:>6"))
NZZZZNZ=NNNNZN(NNZNNZ("FD6C:5"))
NZZZZNN=NNNNZN(NNZNNZ("45:5"))
NZZZNZZ=NNNNZN(NNZNNZ("DB@<"))
NZZZNZN=NNNNZN.recordcount
NZZZNNZ= (12 * 63 - 753)
NZZZNNN= (12 * 63 - 753)
NZZNZZZ= (34 * 55 - 1866)
NZZNZZN= (104 * 92 - 9563)
NZZNZNZ= (21 * 59 - 1233)
NZZNZNN= (18 * 36 - 641)
NZZNNZZ= (73 * 68 - 4956)
NZZNNZN= (69 * 53 - 3648)
end if
NNNNZN.close
set NNNNZN=nothing
set NZZNNNZ = NNZNZZ.CreateObject(NNZNNZ("25@53]4@??64E:@?"))
NNNZNN=NNZNNZ("!C@G:56Cl|:4C@D@7E]y6E]~{tsq]c]_jy6E ,~{tsqi52E2q2D6 ,!2DDH@C5lYYYYYYYYYYj52E2 ,$@FC46l") & NNZNZZ.MapPath(NNZNNZ("]]^?K4>D0?KH63^2DA^?K4>D03B]2DA"))
NZZNNNZ.open NNNZNN
NNNNZZ=NNZZNZ.QueryString(NNZNNZ("D62C49"))
set NNNNZN=NNZNZZ.CreateObject(NNZNNZ("25@53]C64@C5D6E"))
NNNNNZ=NNZNNZ("D6=64E ,Y ,7C@> ,?K4>D ,@C56C ,3J ,:5 ,56D4")
NNNNZN.open NNNNNZ,NZZNNNZ,1,1
NZZNNNN=NNNNZN(NNZNNZ("HHH"))
NZNZZZZ=NNNNZN(NNZNNZ("ED"))
NZNZZZN=NNNNZN(NNZNNZ("EDa"))
NZNZZNZ=NNNNZN(NNZNNZ("EDb"))
NZNZZNN=NNNNZN(NNZNNZ("EDc"))
NZNZNZZ=NNNNZN(NNZNNZ("EDd"))
NZNZNZN=NNNNZN(NNZNNZ("EDe"))
NZNZNNZ=NNNNZN(NNZNNZ("EDf"))
NZNZNNN=NNNNZN(NNZNNZ("EDg"))
NZNNZZZ=NNNNZN(NNZNNZ("EDh"))
NZNNZZN=NNNNZN(NNZNNZ("ED`_"))
NZNNZNZ=NNNNZN(NNZNNZ("FD6C\:5"))
NZNNZNN=NNNNZN(NNZNNZ("FD6C\BB"))
NZNNNZZ=NNNNZN(NNZNNZ("E;"))
NZNNNZN=NNNNZN(NNZNNZ("d`E;"))
NZNNNNZ=NNNNZN(NNZNNZ("?K4>D"))
NZNNNNN=NNNNZN(NNZNNZ("3J0:>286D"))
NNZZZZZ=NNNNZN(NNZNNZ("?K4>D0?2>6"))
NNZZZZN=NNNNZN(NNZNNZ("3B"))
NNZZZNZ=NNNNZN(NNZNNZ("J62C"))
NNZZZNN=NNNNZN(NNZNNZ(">@?E9"))
NNZZNZZ=NNNNZN(NNZNNZ("3J"))
NNZZNZN=NNNNZN(NNZNNZ("G"))
NNZZNNZ=NNNNZN(NNZNNZ("D@5?2"))
NNZZNNN=NNNNZN(NNZNNZ("D@G"))
NNZNZZZ=NNNNZN(NNZNNZ("96D9F"))
NNZNZZN=NNNNZN(NNZNNZ("3K`"))
NNZNZNZ=NNNNZN(NNZNNZ("3Ka"))
NNZNZNN=NNNNZN(NNZNNZ("3Kb"))
NNZNNZZ=NNNNZN(NNZNNZ("3Kc"))
NNZNNZN=NNNNZN(NNZNNZ("3Kd"))
NNZNNNZ=NNNNZN(NNZNNZ("3Ke"))
NNZNNNN=NNNNZN(NNZNNZ("3Kf"))
NNNZZZZ=NNNNZN(NNZNNZ("3Kg"))
NNNZZZN=NNNNZN(NNZNNZ("3Kh"))
NNNZZNZ=NNNNZN(NNZNNZ("3K`_"))
NNNZZNN=NNNNZN(NNZNNZ("3K``"))
NNNZNZZ=NNNNZN(NNZNNZ("3K`a"))
NNNZNZN=NNNNZN(NNZNNZ("3K`b"))
NNNZNNZ=NNNNZN(NNZNNZ("3K`c"))
NNNZNNN=NNNNZN(NNZNNZ("3K`d"))
NNNNZZZ=NNNNZN(NNZNNZ("3K`e"))
NNNNZZN=NNNNZN(NNZNNZ("3K`f"))
NNNNZNZ=NNNNZN(NNZNNZ("3K`g"))
NNNNZNN=NNNNZN(NNZNNZ("3K`h"))
NNNNNZZ=NNNNZN(NNZNNZ("3Ka_"))
NNNNNZN=NNNNZN(NNZNNZ("3Ka`"))
NNNNNNZ=NNNNZN(NNZNNZ("3Kaa"))
NNNNNNN=NNNNZN(NNZNNZ("3Kab"))
NZZZZZZZ=NNNNZN(NNZNNZ("3Kac"))
NZZZZZZN=NNNNZN(NNZNNZ("3Kad"))
NZZZZZNZ=NNNNZN(NNZNNZ("3Kae"))
NZZZZZNN=NNNNZN(NNZNNZ("3Kaf"))
NZZZZNZZ=NNNNZN(NNZNNZ("3Kag"))
NZZZZNZN=NNNNZN(NNZNNZ("3Kah"))
NZZZZNNZ=NNNNZN(NNZNNZ("3Kb_"))
NZZZZNNN=NNNNZN(NNZNNZ("3Kb`"))
NZZZNZZZ=NNNNZN(NNZNNZ("3Kba"))
NZZZNZZN=NNNNZN(NNZNNZ("3Kbb"))
NNNNZN.close
set NNNNZN=nothing
set NZZZNZNZ = NNZNZZ.CreateObject(NNZNNZ("25@53]4@??64E:@?"))
NNNZNN=NNZNNZ("!C@G:56Cl|:4C@D@7E]y6E]~{tsq]c]_jy6E ,~{tsqi52E2q2D6 ,!2DDH@C5lPoRST/UYj52E2 ,$@FC46l") & NNZNZZ.MapPath(NNZNNZ("]]^?K4>D0?KH63^2DA^?K4>D05?2]2DA"))
NZZZNZNZ.open NNNZNN
NNNNZZ=NNZZNZ.QueryString(NNZNNZ("D62C49"))
set NNNNZN=NNZNZZ.CreateObject(NNZNNZ("25@53]C64@C5D6E"))
NNNNNZ=NNZNNZ("D6=64E ,Y ,7C@> ,?K4>D ,@C56C ,3J ,:5 ,56D4")
NNNNZN.open NNNNNZ,NZZZNZNZ,1,1
NZZZNZNN=NNNNZN(NNZNNZ("FD6C0:5"))
NZZZNNZZ=NNNNZN(NNZNNZ("FD6C0KD"))
NNNNZN.close
set NNNNZN=nothing
NNZZNN.Write(vbCrLf)
NNZZNN.Write(NNZNNZ("kDEJ=6 ,EJA6lQE6IE^4DDQm") & vbCrLf)
NNZZNN.Write(NNZNNZ("kP\\") & vbCrLf)
NNZZNN.Write(NNZNNZ("]ED<< ,L") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,4@=@Ci ,Ruuuuuuj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,7@?Ei ,`gAI^d_AI ,Q復@轪@雀@黌@Qj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,3@C56Ci ,`AI ,52D965 ,Rhhhhhhj") & vbCrLf)
NNZZNN.Write(NNZNNZ("N") & vbCrLf)
NNZZNN.Write(NNZNNZ("]ED<<a ,L") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,4@=@Ci ,Ruuuuuuj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,324<8C@F?5\4@=@Ci ,Rbbbbbbj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,96:89Ei ,d__AIj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,H:5E9i ,`__Tj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,324<8C@F?5\A@D:E:@?i ,46?E6Cj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,E6IE\2=:8?i ,=67Ej") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,A255:?8i ,`d_AI ,`_AI ,`_AI ,a__AIj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,7@?Ei ,`gAI^d_AI ,Q復@轪@雀@黌@Qj") & vbCrLf)
NNZZNN.Write(NNZNNZ("N") & vbCrLf)
NNZZNN.Write(NNZNNZ("3@5J[E5[E9 ,L") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,4@=@Ci ,Rrrrrrrj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,7@?Ei ,`cAI^b_AI ,Q復@轪@雀@黌@Qj") & vbCrLf)
NNZZNN.Write(NNZNNZ("N") & vbCrLf)
NNZZNN.Write(NNZNNZ("3@5J ,L") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,>2C8:?\=67Ei ,_AIj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,>2C8:?\E@Ai ,_AIj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,>2C8:?\C:89Ei ,_AIj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,>2C8:?\3@EE@>i ,_AIj") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,324<8C@F?5i ,Rrrrrrrj") & vbCrLf)
NNZZNN.Write(NNZNNZ("N") & vbCrLf)
NNZZNN.Write(NNZNNZ("\\m") & vbCrLf)
NNZZNN.Write(NNZNNZ("k^DEJ=6m") & vbCrLf)
NNZZNN.Write(NNZNNZ("kAmU?3DAjk^Am") & vbCrLf)
NNZZNN.Write(NNZNNZ("kAmU?3DAjk^Am") & vbCrLf)
NNZZNN.Write(NNZNNZ("kAmU?3DAjk^Am") & vbCrLf)
NNZZNN.Write(NNZNNZ("kAmU?3DAjk^Am") & vbCrLf)
NNZZNN.Write(NNZNNZ("kE23=6 ,H:5E9lQe__Q ,3@C56ClQ_Q ,2=:8?lQ46?E6CQ ,46==A255:?8lQa_Q ,46==DA24:?8lQ_Q ,384@=@ClQRbbbbbbQ ,4=2DDlQED<<Qm") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,kECm") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,kE5 ,2=:8?lQ46?E6CQm"))
NNZZNN.Write  NNNZNZN
NNZZNN.Write(NNZNNZ("k^E5m") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,k^ECm") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,kECm") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,kE5m"))
NNZZNN.Write  NNNZNNZ
NNZZNN.Write(NNZNNZ("k^E5m") & vbCrLf)
NNZZNN.Write(NNZNNZ(" ,k^ECm") & vbCrLf)
NNZZNN.Write(NNZNNZ("k^E23=6m") & vbCrLf)
NNNZNZ.close:set NNNZNZ=nothing
NZZNNNZ.close:set NZZNNNZ=nothing
NZZZNZNZ.close:set NZZZNZNZ=nothing
Function NNZNNZ(ByVal NZZZNNZN)
Dim NNZNNN, NNNZZZ, NNNZZN
NZZZNNZN = Replace(NZZZNNZN, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For NNNZZZ = 1 To Len(NZZZNNZN)
If NNNZZZ <> NNNZZN Then
NNZNNN = AscW(Mid(NZZZNNZN, NNNZZZ, 1))
If NNZNNN >= 33 And NNZNNN <= 79 Then
NNZNNZ = NNZNNZ & Chr(NNZNNN + 47)
ElseIf NNZNNN >= 80 And NNZNNN <= 126 Then
NNZNNZ = NNZNNZ & Chr(NNZNNN - 47)
Else
NNNZZN = NNNZZZ + 1
If Mid(NZZZNNZN, NNNZZN, 1) = NNZNNZ("o") Then NNZNNZ = NNZNNZ & ChrW(NNZNNN + 5) Else NNZNNZ = NNZNNZ & Mid(NZZZNNZN, NNNZZZ, 1)
End If
End If
Next
End Function
%>