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

Dim NNZNZN,NNZNNZ,NNZNNN,NNNZZZ,NNNZZN
Set NNZNNN=Response:Set NNZNNZ=Request:Set NNNZZN=Session:Set NNZNZN=Application:Set NNNZZZ=Server
NNZNNN.Write(NNNZNN("k>6E2 ,9EEA\6BF:GlQr@?E6?E\%JA6Q ,4@?E6?ElQE6IE^9E>=j ,492CD6El83ab`aQ ,^m") & vbCrLf)
NNZNNN.Write(NNNZNN("kD4C:AE ,=2?8F286lQ;2G2D4C:AEQ ,DC4lQ^;D^G2=:52E@C];DQmk^D4C:AEm") & vbCrLf)
NNZNNN.Write(NNNZNN("kDEJ=6 ,EJA6lQE6IE^4DDQm") & vbCrLf)
NNZNNN.Write(NNNZNN("kP\\") & vbCrLf)
NNZNNN.Write(NNNZNN("]5@?8CF`` ,L	,4@=@Ci ,Ruuuuuuj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,96:89Ei ,c_AIj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,H:5E9i ,`__Tj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,3@C56C\DEJ=6i ,?@?6j") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,r&#$~#i92?5j") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,7@?E\72>:=Ji ,Q復@轪@雀@黌@Qj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,7@?E\D:K6i ,`gAIj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,=:?6\96:89Ei ,c_AIj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,3@C56C\C25:FDi ,bAIj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\2EE249>6?Ei ,D4C@==j") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\4@=@Ci ,R__eerrj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\:>286i ,FC=W:>286D^?K4>D0DJDE6>0_`]8:7Xj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\C6A62Ei ,C6A62E\Ij") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\A@D:E:@?i ,46?E6C ,E@Aj") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("]?F>36C ,L	,A255:?8i ,bAIj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,96:89Ei ,b_AIj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,3@C56Ci ,`AI ,D@=:5 ,Rrrrrrrj") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("]56?8CF ,L") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,7@?E\D:K6i ,`eAIj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,=:?6\96:89Ei ,b_AIj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,96:89Ei ,c_AIj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,H:5E9i ,g_AIj") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("]FD6C?2>6 ,L	,324<8C@F?5\2EE249>6?Ei ,D4C@==j") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\:>286i ,FC=W:>286D^?K4>D0DJDE6>0`e]8:7Xj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\C6A62Ei ,?@\C6A62Ej") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\A@D:E:@?i ,C:89Ej") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\4@=@Ci ,Ruuuuuuj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,A255:?8i ,bAIj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,3@C56Ci ,`AI ,D@=:5 ,Rrrrrrrj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,96:89Ei ,b_AIj") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("]FD6CA2DDH@C5 ,L	,324<8C@F?5\2EE249>6?Ei ,D4C@==j") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\:>286i ,FC=W:>286D^?K4>D0DJDE6>0`h]8:7Xj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\C6A62Ei ,?@\C6A62Ej") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\A@D:E:@?i ,C:89Ej") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\4@=@Ci ,Ruuuuuuj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,A255:?8i ,bAIj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,3@C56Ci ,`AI ,D@=:5 ,Rrrrrrrj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,96:89Ei ,b_AIj") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("]H9:E6E:E=6 ,L") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,7@?Ei ,`gAI ,Q復@轪@雀@黌@Qj") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,4@=@Ci ,Ruuuuuuj") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("]K ,L") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,7@?E\D:K6i ,`eAIj") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("3@5J ,L") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,324<8C@F?5\4@=@Ci ,Rudududj") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("\\m") & vbCrLf)
NNZNNN.Write(NNNZNN("k^DEJ=6m") & vbCrLf)
if NNZNNZ.Cookies(NNNZNN("FD6C?2>6"))="" or NNZNNZ.Cookies(NNNZNN(":5"))="" then
NNZNNN.Write(vbCrLf)
NNZNNN.Write(NNNZNN(" ,") & vbCrLf)
NNZNNN.Write(NNNZNN("kAmU?3DAjk^Am") & vbCrLf)
NNZNNN.Write(NNNZNN("kAmU?3DAjk^Am") & vbCrLf)
NNZNNN.Write(NNNZNN("kAmU?3DAjk^Am") & vbCrLf)
NNZNNN.Write(NNNZNN("kAmU?3DAjk^Am") & vbCrLf)
NNZNNN.Write(NNNZNN("kE23=6 ,H:5E9lQd__Q ,3@C56ClQ_Q ,2=:8?lQ46?E6CQ ,46==A255:?8lQ_Q ,46==DA24:?8lQ`Q ,384@=@ClQR__eerrQm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kECm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kE5 ,2=:8?lQ46?E6CQ ,G2=:8?lQE@AQ ,384@=@ClQRuuuuuuQmkE23=6 ,H:5E9lQ`__TQ ,3@C56ClQ_Q ,46==A255:?8lQ_Q ,46==DA24:?8lQ_Qm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kECm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kE5 ,96:89ElQe_Q ,2=:8?lQ46?E6CQ ,384@=@ClQR__eerrQ ,4=2DDlQH9:E6E:E=6Qm癶@彐@旱@闯@趀@旱@，,诲@釈@斫@癶@彐@！, ,k^E5m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,k^ECm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,k^E23=6m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kE23=6 ,3@C56ClQ_Q ,46==A255:?8lQgQ ,46==DA24:?8lQ_Q ,DEJ=6lQ>2C8:?\E@Ai ,b_AIj>2C8:?\3@EE@>i ,b_AIjQ ,m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,k7@C> ,24E:@?lQ=@8:?]2DAQ ,>6E9@5lQA@DEQ ,?2>6lQ7@C>Q ,:5lQ7@C>Q@?DF3>:ElQC6EFC? ,'2=:52E@C]'2=:52E6WE9:D[bXQm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kECm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kE5 ,H:5E9lQg_Q ,96:89ElQb_Q ,2=:8?lQC:89EQ ,4=2DDlQKQm帋@史@：,k^E5m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kE5 ,2=:8?lQ=67EQmk:?AFE ,?2>6lQFD6C?2>6Q ,EJA6lQE6IEQ , ,:5lQFD6C?2>6Q ,DEJ=6lQH:5E9i`cdAIj96:89Ei ,bdAIjQ ,D:K6lQa_Q ,52E2EJA6lQ#6BF:C6Q , ,>D8lQ诲@塦@冔@！,Q ,^mk^E5m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,k^ECm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kECm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kE5 ,96:89ElQb_Q ,2=:8?lQC:89EQ ,4=2DDlQKQm寁@矼@：,k^E5m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kE5 ,2=:8?lQ=67EQmk:?AFE ,?2>6lQFD6CA2DDH@C5Q ,EJA6lQA2DDH@C5Q ,:5lQFD6CA2DDH@C5Q ,DEJ=6lQH:5E9i`cdAIj96:89Ei ,bdAIjQ ,D:K6lQa_Q ,52E2EJA6lQ#6BF:C6Q , ,>D8lQ诲@塦@冔@！,Q ,^mk^E5m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,k^ECm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kECm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kE5 ,96:89ElQc_Q ,2=:8?lQC:89EQmU?3DAjk^E5m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,kE5 ,2=:8?lQ=67EQmk=236=m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,k:?AFE ,?2>6lQ$F3>:EQ ,EJA6lQDF3>:EQ ,4=2DDlQ5@?8CF``Q ,G2=F6lQ ,癶@ ,彐@ ,Q ,^m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,k^=236=mk^E5m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,k^ECm") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,k^7@C>m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,k^E23=6m") & vbCrLf)
NNZNNN.Write(NNNZNN("k^E5m") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,k^ECm") & vbCrLf)
NNZNNN.Write(NNNZNN("k^E23=6m") & vbCrLf)
NNZNNN.end
end if
Private Const NZZZNNZ =8
Private Const NZZZNNN =4
Private Const NZZNZZZ =32
Private NNNNZZ(30)
Private NNNNZN(30)
NZZNZZN= (14 * 18 - 252)
NZZNZNZ=NNNZNN("?K4>D0?KH63^?K4>D0FA^52E2^52E2]2D2I")
NZZNZNN= (91 * 65 - 5904)
NZZNNZZ= (46 * 52 - 2391)
NZZNNZN=NNNZNN("EIE")
NZZNNNZ=NNNZNN("4@??]2DA")
NZZNNNN=NNNZNN("]]^?K_g_g")
NZNZZZZ=NNNZNN("?K4>D0H63^2DA^?K4>D02]2DA")
NZNZZZZ=NNNZNN("?K4>D0H63^2DA^?K4>D03B]2DA")
NZNZZZN=NNNZNN("?K02K^?K4>D02]2DA")
NZNZZNZ=NNNZNN("?K4>D0?KH63^2DA^")
NZNZZNN=NNNZNN("^")
NZNZNZZ=NNNZNN("^")
NZNZNZN=NNNZNN("^")
NZNZNNZ=NNNZNN("^")
NZNZNNN=NNNZNN("?K4>D0@<]2DA")
NZNNZZZ=NNNZNN("5:2@J@?8^?K4>D]?@DB]9E>")
NZNNZZN=NNNZNN("5:2@J@?8^?K4>D]?@52E2]9E>")
NZNNZNZ=NNNZNN("叆@惀@揋@礵@：,k3Cm`、,诲@封@月@劜@噣@xx$挂@同@(tq栴@盩@彐@丆@靝@，,冈@釈@斫@扎@廻@诐@诐@！,k3Cma、,诲@淶@力@黓@讟@馑@顰@ ,:?56I]2DA ,丵@曻@笧@一,馑@顰@斂@仱@合@k3Cb、,讹@罩@宇@戋@吉@，,刲@斫@顰@靝@釈@诐@")
NZNNZNN=NNNZNN("?K4>D0?KH63^?K4>D0FA^52E2^?K4>D0DB=]2D2I")
NZNNNZZ= (46 * 52 - 2391)
NZNNNZN= (46 * 52 - 2391)
NZNNNNZ= (46 * 52 - 2391)
NZNNNNN= (46 * 52 - 2391)
NNZZZZZ= (46 * 52 - 2391)
NNZZZZN= (46 * 52 - 2391)
NNZZZNZ= (14 * 18 - 252)
NNZZZNN= (46 * 52 - 2391)
NNZZNZZ= (46 * 52 - 2391)
NNZZNZN= (46 * 52 - 2391)
if NZZNZZN=1 then
Set NNZZNNZ=NNNZZZ.CreateObject(NNNZNN("ps~sq]r@??64E:@?"))
NNZZNNZ.open NNNZNN("AC@G:56ClDB=@=653j52E2 ,D@FC46l`af]_]_]`j&D6C ,xslD2jAH5lD2jx?:E:2= ,r2E2=@8lG@E6")
Else
set NNZZNNZ = NNNZZZ.CreateObject(NNNZNN("25@53]4@??64E:@?"))
NNZZNNN=NNNZNN("!C@G:56Cl|:4C@D@7E]y6E]~{tsq]c]_jy6E ,~{tsqis2E2q2D6 ,!2DDH@C5l?Kd`hoG:Ajs2E2 ,$@FC46l") & NNNZZZ.MapPath(NNNZNN("]]^]]^")&NZZNZNZ&"")
NNZZNNZ.open NNZZNNN
NNZNZZZ=NNZNNZ.QueryString(NNNZNN("D62C49"))
End If
dim NNNNNZ
NNNNNZ= (46 * 52 - 2391)
set NNZNZZN=NNNZZZ.CreateObject(NNNZNN("25@53]C64@C5D6E"))
NNZNZNZ=NNNZNN("D6=64E ,Y ,7C@> ,?K4>D05:> ,H96C6 ,:5l")&NNNNNZ&""
NNZNZZN.open NNZNZNZ,NNZZNNZ,1,1
NNZNZNN=NNZNZZN(NNNZNN("?K4>D`"))
NNZNNZZ=NNZNZZN(NNNZNN("?K4>Da"))
NNZNNZN=NNZNZZN(NNNZNN("?K4>Db"))
NNZNNNZ=NNZNZZN(NNNZNN("?K4>Dc"))
NNZNNNN=NNZNZZN(NNNZNN("?K4>Dd"))
NNNZZZZ=NNZNZZN(NNNZNN("?K4>De"))
NNNZZZN=NNZNZZN(NNNZNN("?K4>Df"))
NNNZZNZ=NNZNZZN(NNNZNN("?K4>Dg"))
NNNZZNN=NNZNZZN(NNNZNN("?K4>Dh"))
NNNZNZZ=NNZNZZN(NNNZNN("?K4>D`_"))
NNNZNZN=NNZNZZN(NNNZNN("?K4>D``"))
NNNZNNZ=NNZNZZN(NNNZNN("?K4>D`a"))
NNNZNNN=NNZNZZN(NNNZNN("?K4>D`b"))
NNNNZZZ=NNZNZZN(NNNZNN("?K4>D`c"))
NNNNZZN=NNZNZZN(NNNZNN("?K4>D`d"))
NNNNZNZ=NNZNZZN(NNNZNN("?K4>D`e"))
NNNNZNN=NNZNZZN(NNNZNN("?K4>D`f"))
NNNNNZZ=NNZNZZN(NNNZNN("?K4>D`g"))
NNNNNZN=NNZNZZN(NNNZNN("?K4>D`h"))
NNNNNNZ=NNZNZZN(NNNZNN("?K4>Da_"))
NNZNZZN.close
set NNZNZZN=nothing
NNZNNN.Write(vbCrLf)
NNZNNN.Write(NNNZNN("kD4C:AE ,=2?8F286lQy2G2$4C:AEQm") & vbCrLf)
NNZNNN.Write(NNNZNN("7F?4E:@? ,s:DA=2JWxsX") & vbCrLf)
NNZNNN.Write(NNNZNN("L") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,:7W ,xs]DEJ=6]5:DA=2J ,ll ,V?@?6V ,X") & vbCrLf)
NNZNNN.Write(NNNZNN("L") & vbCrLf)
NNZNNN.Write(NNNZNN("xs]DEJ=6]5:DA=2J ,l ,VV ,j") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("6=D6 ,") & vbCrLf)
NNZNNN.Write(NNNZNN("L") & vbCrLf)
NNZNNN.Write(NNNZNN("xs]DEJ=6]5:DA=2J ,l ,V?@?6V ,j") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("k^D4C:AEm") & vbCrLf)
NNZNNN.Write(NNNZNN("kD4C:AEm") & vbCrLf)
NNZNNN.Write(NNNZNN("7F?4E:@? ,D6=64Ep==W@3;X") & vbCrLf)
NNZNNN.Write(NNNZNN("L") & vbCrLf)
NNZNNN.Write(NNNZNN("7@CWG2C ,: ,l ,_j:k@3;]6=6>6?ED]=6?8E9j:ZZX") & vbCrLf)
NNZNNN.Write(NNNZNN(":7W@3;]6=6>6?ED,:.]EJA6 ,ll ,Q4964<3@IQX") & vbCrLf)
NNZNNN.Write(NNNZNN("@3;]6=6>6?ED,:.]4964<65 ,l ,ECF6j") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("7F?4E:@? ,D6=64E~E96CW@3;X") & vbCrLf)
NNZNNN.Write(NNNZNN("L") & vbCrLf)
NNZNNN.Write(NNNZNN("7@CWG2C ,: ,l ,_j:k@3;]6=6>6?ED]=6?8E9j:ZZX") & vbCrLf)
NNZNNN.Write(NNNZNN(":7W@3;]6=6>6?ED,:.]EJA6 ,ll ,Q4964<3@IQ ,X") & vbCrLf)
NNZNNN.Write(NNNZNN("L") & vbCrLf)
NNZNNN.Write(NNNZNN(":7WP@3;]6=6>6?ED,:.]4964<65X") & vbCrLf)
NNZNNN.Write(NNNZNN("@3;]6=6>6?ED,:.]4964<65 ,l ,ECF6j") & vbCrLf)
NNZNNN.Write(NNNZNN("6=D6") & vbCrLf)
NNZNNN.Write(NNNZNN("@3;]6=6>6?ED,:.]4964<65 ,l ,72=D6j") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("N") & vbCrLf)
NNZNNN.Write(NNNZNN("k^D4C:AEm") & vbCrLf)
NNZNNN.Write(NNNZNN("kD4C:AE ,=2?8F286lQ;2G2D4C:AEQm") & vbCrLf)
NNZNNN.Write(NNNZNN("7F?4E:@? ,492?864@=@CW@3;X") & vbCrLf)
NNZNNN.Write(NNNZNN("L") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,6 ,l ,6G6?E]DC4t=6>6?E") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,:7W6]4964<65llECF6X") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,L") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,6]DEJ=6]324<8C@F?5 ,l ,QRr`sattQ") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,N") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,6=D6") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,L") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,6]DEJ=6]324<8C@F?5 ,l ,QR777777Q") & vbCrLf)
NNZNNN.Write(NNNZNN(" ,N") & vbCrLf)
NNZNNN.Write(NNNZNN("N ,") & vbCrLf)
NNZNNN.Write(NNNZNN("k^D4C:AEm") & vbCrLf)
NNZNNN.Write(NNNZNN("kD4C:AE ,=2?8F286lQ;2G2D4C:AEQ ,DC4lQ]]^]]^;D^G2=:52E@C];DQmk^D4C:AEm") & vbCrLf)
dim NNNNNN
NNNNNN=NNZNNZ.ServerVariables(NNNZNN("$t#'t#0}p|t"))
if NNZNNZ.querystring(NNNZNN(":?56I"))=NNNZNN("@<") then
if NNNZNZ(NNNZNN("^:?56I]9E>"),NNNZNN("9EEAi^^")&NNNNNN&NNNZNN("^:?56I]2DA")) then
NNZNNN.Write NNNZNN("kD4C:AE ,=2?8F286l;2G2D4C:AEm2=6CEWV甚@戋@！,VXjH:?5@H]=@42E:@?]9C67lV")&NNZNNZ.serverVariables(NNNZNN("w%%!0#tut#t#"))&NNNZNN("Vjk^D4C:AEm")
end if
end if
function NNNZNZ(NZZZZZZN,NZZZZZNZ)
Dim NZZZZZZ, NZZZZZN, NZZZZNZ
On Error Resume Next
Set NZZZZZN = NNNZZZ.CreateObject(NNNZNN("|:4C@D@") & NNNZNN("7E])|") & NNNZNN("{w%%!"))
With NZZZZZN
.Open NNNZNN("v6E"), NZZZZZNZ, False, "", ""
.Send
NZZZZNZ = .ResponseBody
End With
Set NZZZZZN = Nothing
Set NZZZZZZ = NNNZZZ.CreateObject(NNNZNN("p5@") & NNNZNN("53]$EC") & NNNZNN("62>"))
With NZZZZZZ
.Type = (46 * 52 - 2391)
.Open
.Write NZZZZNZ
.SaveToFile NNNZZZ.MapPath(NZZZZZZN), 2
.Cancel()
.Close()
End With
Set NZZZZZZ=nothing
if err <> 0 then
NNNZNZ = false
err.clear
else
NNNZNZ = true
end if
End function
If isObject(NNZZNNZ) Then Set NNZZNNZ = Nothing
Function NNNZNN(ByVal NNNNNNN)
Dim NZZZZNN, NZZZNZZ, NZZZNZN
NNNNNNN = Replace(NNNNNNN, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For NZZZNZZ = 1 To Len(NNNNNNN)
If NZZZNZZ <> NZZZNZN Then
NZZZZNN = AscW(Mid(NNNNNNN, NZZZNZZ, 1))
If NZZZZNN >= 33 And NZZZZNN <= 79 Then
NNNZNN = NNNZNN & Chr(NZZZZNN + 47)
ElseIf NZZZZNN >= 80 And NZZZZNN <= 126 Then
NNNZNN = NNNZNN & Chr(NZZZZNN - 47)
Else
NZZZNZN = NZZZNZZ + 1
If Mid(NNNNNNN, NZZZNZN, 1) = NNNZNN("o") Then NNNZNN = NNNZNN & ChrW(NZZZZNN + 5) Else NNNZNN = NNNZNN & Mid(NNNNNNN, NZZZNZZ, 1)
End If
End If
Next
End Function
%>