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

Dim NZZNNZ,NZZNNN,NZNZZZ,NZNZZN,NZNZNZ
Set NZNZZZ=Response:Set NZZNNN=Request:Set NZNZNZ=Session:Set NZZNNZ=Application:Set NZNZZN=Server
NZNZZZ.Write(NZNZNN("k>6E2 ,9EEA\6BF:GlQr@?E6?E\%JA6Q ,4@?E6?ElQE6IE^9E>=j ,492CD6El83ab`aQ ,^m") & vbCrLf)
NZNZZZ.Write(NZNZNN("kDEJ=6 ,EJA6lQE6IE^4DDQm") & vbCrLf)
NZNZZZ.Write(NZNZNN("kP\\") & vbCrLf)
NZNZZZ.Write(NZNZNN("3@5J[E5[E9 ,L") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,7@?E\72>:=Ji ,pC:2=[ ,w6=G6E:42[ ,D2?D\D6C:7j") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,7@?E\D:K6i ,`aAIj") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,4@=@Ci ,R______j") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("3@5J ,L") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,324<8C@F?5\4@=@Ci ,Ruuuuuuj") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,>2C8:?\=67Ei ,_AIj") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,>2C8:?\E@Ai ,_AIj") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,>2C8:?\C:89Ei ,_AIj") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,>2C8:?\3@EE@>i ,_AIj") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("2i=:?< ,L") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,4@=@Ci ,R______j") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("2iG:D:E65 ,L") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,4@=@Ci ,Reeeeeej") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("2i9@G6C ,L") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,4@=@Ci ,Ruu____j") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("2i24E:G6 ,L") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,4@=@Ci ,Ruu____j") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("\\m") & vbCrLf)
NZNZZZ.Write(NZNZNN("k^DEJ=6m") & vbCrLf)
NZNZZN.ScriptTimeOut= (96 * 50 - 4300)
NZNNNN= (56 * 106 - 5936)
NNZZZZ=NZNZNN("?K4>D0?KH63^?K4>D0FA^52E2^52E2]2D2I")
NNZZZN= (43 * 98 - 4203)
NNZZNZ= (31 * 80 - 2479)
NNZZNN=NZNZNN("EIE")
NNZNZZ=NZNZNN("4@??]2DA")
NNZNZN=NZNZNN("]]^?K_g_g")
NNZNNZ=NZNZNN("?K4>D0H63^2DA^?K4>D02]2DA")
NNZNNZ=NZNZNN("?K4>D0H63^2DA^?K4>D03B]2DA")
NNZNNN=NZNZNN("?K02K^?K4>D02]2DA")
NNNZZZ=NZNZNN("?K4>D0?KH63^2DA^")
NNNZZN=NZNZNN("^")
NNNZNZ=NZNZNN("^")
NNNZNN=NZNZNN("^")
NNNNZZ=NZNZNN("^")
NNNNZN=NZNZNN("?K4>D0@<]2DA")
NNNNNZ=NZNZNN("5:2@J@?8^?K4>D]?@DB]9E>")
NNNNNN=NZNZNN("5:2@J@?8^?K4>D]?@52E2]9E>")
NZZZZZZ=NZNZNN("叆@惀@揋@礵@：,k3Cm`、,诲@封@月@劜@噣@xx$挂@同@(tq栴@盩@彐@丆@靝@，,冈@釈@斫@扎@廻@诐@诐@！,k3Cma、,诲@淶@力@黓@讟@馑@顰@ ,:?56I]2DA ,丵@曻@笧@一,馑@顰@斂@仱@合@k3Cb、,讹@罩@宇@戋@吉@，,刲@斫@顰@靝@釈@诐@")
NZZZZZN=NZNZNN("?K4>D0?KH63^?K4>D0FA^52E2^?K4>D0DB=]2D2I")
NZZZZNZ= (31 * 80 - 2479)
NZZZZNN= (31 * 80 - 2479)
NZZZNZZ= (31 * 80 - 2479)
NZZZNZN= (31 * 80 - 2479)
NZZZNNZ= (31 * 80 - 2479)
NZZZNNN= (31 * 80 - 2479)
NZZNZZZ= (56 * 106 - 5936)
NZZNZZN= (31 * 80 - 2479)
NZZNZNZ= (31 * 80 - 2479)
NZZNZNN= (31 * 80 - 2479)
if NZNNNN=1 then
Set NZZNNZZ=NZNZZN.CreateObject(NZNZNN("ps~sq]r@??64E:@?"))
NZZNNZZ.open NZNZNN("AC@G:56ClDB=@=653j52E2 ,D@FC46l`af]_]_]`j&D6C ,xslD2jAH5lD2jx?:E:2= ,r2E2=@8lG@E6")
Else
set NZZNNZZ = NZNZZN.CreateObject(NZNZNN("25@53]4@??64E:@?"))
NZZNNZN=NZNZNN("!C@G:56Cl|:4C@D@7E]y6E]~{tsq]c]_jy6E ,~{tsqis2E2q2D6 ,!2DDH@C5l?Kd`hoG:Ajs2E2 ,$@FC46l") & NZNZZN.MapPath(NZNZNN("]]^")&NNZZZZ&"")
NZZNNZZ.open NZZNNZN
NZZNNNZ=NZZNNN.QueryString(NZNZNN("D62C49"))
End If
NZNZZZ.Write(vbCrLf)
NZNZZZ.Write(NZNZNN("kP\\吉@叫@课@産@ ,\\m") & vbCrLf)
NZNZZZ.Write(NZNZNN("kD4C:AE ,=2?8F286lQy2G2$4C:AEQm") & vbCrLf)
NZNZZZ.Write(NZNZNN("7F?4E:@? ,s:DA=2JWxsX") & vbCrLf)
NZNZZZ.Write(NZNZNN("L") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,:7W ,xs]DEJ=6]5:DA=2J ,ll ,V?@?6V ,X") & vbCrLf)
NZNZZZ.Write(NZNZNN("L") & vbCrLf)
NZNZZZ.Write(NZNZNN("xs]DEJ=6]5:DA=2J ,l ,VV ,j") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("6=D6 ,") & vbCrLf)
NZNZZZ.Write(NZNZNN("L") & vbCrLf)
NZNZZZ.Write(NZNZNN("xs]DEJ=6]5:DA=2J ,l ,V?@?6V ,j") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("k^D4C:AEm") & vbCrLf)
NZNZZZ.Write(NZNZNN("kD4C:AEm") & vbCrLf)
NZNZZZ.Write(NZNZNN("7F?4E:@? ,D6=64Ep==W@3;X") & vbCrLf)
NZNZZZ.Write(NZNZNN("L") & vbCrLf)
NZNZZZ.Write(NZNZNN("7@CWG2C ,: ,l ,_j:k@3;]6=6>6?ED]=6?8E9j:ZZX") & vbCrLf)
NZNZZZ.Write(NZNZNN(":7W@3;]6=6>6?ED,:.]EJA6 ,ll ,Q4964<3@IQX") & vbCrLf)
NZNZZZ.Write(NZNZNN("@3;]6=6>6?ED,:.]4964<65 ,l ,ECF6j") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("7F?4E:@? ,D6=64E~E96CW@3;X") & vbCrLf)
NZNZZZ.Write(NZNZNN("L") & vbCrLf)
NZNZZZ.Write(NZNZNN("7@CWG2C ,: ,l ,_j:k@3;]6=6>6?ED]=6?8E9j:ZZX") & vbCrLf)
NZNZZZ.Write(NZNZNN(":7W@3;]6=6>6?ED,:.]EJA6 ,ll ,Q4964<3@IQ ,X") & vbCrLf)
NZNZZZ.Write(NZNZNN("L") & vbCrLf)
NZNZZZ.Write(NZNZNN(":7WP@3;]6=6>6?ED,:.]4964<65X") & vbCrLf)
NZNZZZ.Write(NZNZNN("@3;]6=6>6?ED,:.]4964<65 ,l ,ECF6j") & vbCrLf)
NZNZZZ.Write(NZNZNN("6=D6") & vbCrLf)
NZNZZZ.Write(NZNZNN("@3;]6=6>6?ED,:.]4964<65 ,l ,72=D6j") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("N") & vbCrLf)
NZNZZZ.Write(NZNZNN("k^D4C:AEm") & vbCrLf)
NZNZZZ.Write(NZNZNN("kD4C:AE ,=2?8F286lQ;2G2D4C:AEQm") & vbCrLf)
NZNZZZ.Write(NZNZNN("7F?4E:@? ,492?864@=@CW@3;X") & vbCrLf)
NZNZZZ.Write(NZNZNN("L") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,6 ,l ,6G6?E]DC4t=6>6?E") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,:7W6]4964<65llECF6X") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,L") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,6]DEJ=6]324<8C@F?5 ,l ,QRr`sattQ") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,N") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,6=D6") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,L") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,6]DEJ=6]324<8C@F?5 ,l ,QR777777Q") & vbCrLf)
NZNZZZ.Write(NZNZNN(" ,N") & vbCrLf)
NZNZZZ.Write(NZNZNN("N ,") & vbCrLf)
NZNZZZ.Write(NZNZNN("k^D4C:AEm") & vbCrLf)
NZNZZZ.Write  nzcms_bq_by
NZZNNZZ.close:set NZZNNZZ=nothing
Function NZNZNN(ByVal NZZNNNN)
Dim NZNNZZ, NZNNZN, NZNNNZ
NZZNNNN = Replace(NZZNNNN, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For NZNNZN = 1 To Len(NZZNNNN)
If NZNNZN <> NZNNNZ Then
NZNNZZ = AscW(Mid(NZZNNNN, NZNNZN, 1))
If NZNNZZ >= 33 And NZNNZZ <= 79 Then
NZNZNN = NZNZNN & Chr(NZNNZZ + 47)
ElseIf NZNNZZ >= 80 And NZNNZZ <= 126 Then
NZNZNN = NZNZNN & Chr(NZNNZZ - 47)
Else
NZNNNZ = NZNNZN + 1
If Mid(NZZNNNN, NZNNNZ, 1) = NZNZNN("o") Then NZNZNN = NZNZNN & ChrW(NZNNZZ + 5) Else NZNZNN = NZNZNN & Mid(NZZNNNN, NZNNZN, 1)
End If
End If
Next
End Function
%>