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

Dim NZZZNZZ,NZZZNZN,NZZZNNZ,NZZZNNN,NZZNZZZ
Set NZZZNNZ=Response:Set NZZZNZN=Request:Set NZZNZZZ=Session:Set NZZZNZZ=Application:Set NZZZNNN=Server
NZZZNNN.ScriptTimeOut= (45 * 74 - 2830)
NZZZNZNZ= (82 * 64 - 5248)
NZZZNZNN=NZNZNZZ("?K4>D0?KH63^?K4>D0FA^52E2^52E2]2D2I")
NZZZNNZZ= (83 * 68 - 5633)
NZZZNNZN= (24 * 43 - 1031)
NZZZNNNZ=NZNZNZZ("EIE")
NZZZNNNN=NZNZNZZ("4@??]2DA")
NZZNZZZZ=NZNZNZZ("]]^?K_g_g")
NZZNZZZN=NZNZNZZ("?K4>D0H63^2DA^?K4>D02]2DA")
NZZNZZZN=NZNZNZZ("?K4>D0H63^2DA^?K4>D03B]2DA")
NZZNZZNZ=NZNZNZZ("?K02K^?K4>D02]2DA")
NZZNZZNN=NZNZNZZ("?K4>D0?KH63^2DA^")
NZZNZNZZ=NZNZNZZ("^")
NZZNZNZN=NZNZNZZ("^")
NZZNZNNZ=NZNZNZZ("^")
NZZNZNNN=NZNZNZZ("^")
NZZNNZZZ=NZNZNZZ("?K4>D0@<]2DA")
NZZNNZZN=NZNZNZZ("5:2@J@?8^?K4>D]?@DB]9E>")
NZZNNZNZ=NZNZNZZ("5:2@J@?8^?K4>D]?@52E2]9E>")
NZZNNZNN=NZNZNZZ("叆@惀@揋@礵@：,k3Cm`、,诲@封@月@劜@噣@xx$挂@同@(tq栴@盩@彐@丆@靝@，,冈@釈@斫@扎@廻@诐@诐@！,k3Cma、,诲@淶@力@黓@讟@馑@顰@ ,:?56I]2DA ,丵@曻@笧@一,馑@顰@斂@仱@合@k3Cb、,讹@罩@宇@戋@吉@，,刲@斫@顰@靝@釈@诐@")
NZZNNNZZ=NZNZNZZ("?K4>D0?KH63^?K4>D0FA^52E2^?K4>D0DB=]2D2I")
NZZNNNZN= (24 * 43 - 1031)
NZZNNNNZ= (24 * 43 - 1031)
NZZNNNNN= (24 * 43 - 1031)
NZNZZZZZ= (24 * 43 - 1031)
NZNZZZZN= (24 * 43 - 1031)
NZNZZZNZ= (24 * 43 - 1031)
NZNZZZNN= (82 * 64 - 5248)
NZNZZNZZ= (24 * 43 - 1031)
NZNZZNZN= (24 * 43 - 1031)
NZNZZNNZ= (24 * 43 - 1031)
if NZZZNZNZ=1 then
Set NZNZZNNN=NZZZNNN.CreateObject(NZNZNZZ("ps~sq]r@??64E:@?"))
NZNZZNNN.open NZNZNZZ("AC@G:56ClDB=@=653j52E2 ,D@FC46l`af]_]_]`j&D6C ,xslD2jAH5lD2jx?:E:2= ,r2E2=@8lG@E6")
Else
set NZNZZNNN = NZZZNNN.CreateObject(NZNZNZZ("25@53]4@??64E:@?"))
NZNZNZZZ=NZNZNZZ("!C@G:56Cl|:4C@D@7E]y6E]~{tsq]c]_jy6E ,~{tsqis2E2q2D6 ,!2DDH@C5l?Kd`hoG:Ajs2E2 ,$@FC46l") & NZZZNNN.MapPath(NZNZNZZ("]]^")&NZZZNZNN&"")
NZNZZNNN.open NZNZNZZZ
NZNZNZZN=NZZZNZN.QueryString(NZNZNZZ("D62C49"))
End If
NZZZNNZ.Write(vbCrLf)
NZZZNNZ.Write(NZNZNZZ("kP\\吉@叫@课@産@ ,\\m") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("kD4C:AE ,=2?8F286lQy2G2$4C:AEQm") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("7F?4E:@? ,s:DA=2JWxsX") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("L") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,:7W ,xs]DEJ=6]5:DA=2J ,ll ,V?@?6V ,X") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("L") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("xs]DEJ=6]5:DA=2J ,l ,VV ,j") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("N") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("6=D6 ,") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("L") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("xs]DEJ=6]5:DA=2J ,l ,V?@?6V ,j") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("N") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("N") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("k^D4C:AEm") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("kD4C:AEm") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("7F?4E:@? ,D6=64Ep==W@3;X") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("L") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("7@CWG2C ,: ,l ,_j:k@3;]6=6>6?ED]=6?8E9j:ZZX") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(":7W@3;]6=6>6?ED,:.]EJA6 ,ll ,Q4964<3@IQX") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("@3;]6=6>6?ED,:.]4964<65 ,l ,ECF6j") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("N") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("7F?4E:@? ,D6=64E~E96CW@3;X") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("L") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("7@CWG2C ,: ,l ,_j:k@3;]6=6>6?ED]=6?8E9j:ZZX") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(":7W@3;]6=6>6?ED,:.]EJA6 ,ll ,Q4964<3@IQ ,X") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("L") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(":7WP@3;]6=6>6?ED,:.]4964<65X") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("@3;]6=6>6?ED,:.]4964<65 ,l ,ECF6j") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("6=D6") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("@3;]6=6>6?ED,:.]4964<65 ,l ,72=D6j") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("N") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("N") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("k^D4C:AEm") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("kD4C:AE ,=2?8F286lQ;2G2D4C:AEQm") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("7F?4E:@? ,492?864@=@CW@3;X") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("L") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,6 ,l ,6G6?E]DC4t=6>6?E") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,:7W6]4964<65llECF6X") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,L") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,6]DEJ=6]324<8C@F?5 ,l ,QRr`sattQ") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,N") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,6=D6") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,L") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,6 ,l ,6]A2C6?Et=6>6?E") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,6]DEJ=6]324<8C@F?5 ,l ,QR777777Q") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ(" ,N") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("N ,") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("k^D4C:AEm") & vbCrLf)
Private Const NNNZNZN =8
Private Const NNNZNNZ =4
Private Const NNNZNNN =32
Private NZNNZZN(30)
Private NZNNZNZ(30)
Private Function NZZNZZN(NZNZNNZN, NZNZNNNZ)
If NZNZNNNZ = 0 Then
NZZNZZN = NZNZNNZN
Exit Function
ElseIf NZNZNNNZ = 31 Then
If NZNZNNZN And 1 Then
NZZNZZN = &H80000000
Else
NZZNZZN = (82 * 64 - 5248)
End If
Exit Function
ElseIf NZNZNNNZ < 0 Or NZNZNNNZ > 31 Then
Err.Raise 6
End If
If (NZNZNNZN And NZNNZNZ(31 - NZNZNNNZ)) Then
NZZNZZN = ((NZNZNNZN And NZNNZZN(31 - (NZNZNNNZ + 1))) * NZNNZNZ(NZNZNNNZ)) Or &H80000000
Else
NZZNZZN = ((NZNZNNZN And NZNNZZN(31 - NZNZNNNZ)) * NZNNZNZ(NZNZNNNZ))
End If
End Function
Private Function NZZNZNZ(NZNZNNZN, NZNZNNNZ)
If NZNZNNNZ = 0 Then
NZZNZNZ = NZNZNNZN
Exit Function
ElseIf NZNZNNNZ = 31 Then
If NZNZNNZN And &H80000000 Then
NZZNZNZ = (24 * 43 - 1031)
Else
NZZNZNZ = (82 * 64 - 5248)
End If
Exit Function
ElseIf NZNZNNNZ < 0 Or NZNZNNNZ > 31 Then
Err.Raise 6
End If
NZZNZNZ = (NZNZNNZN And &H7FFFFFFE) \ NZNNZNZ(NZNZNNNZ)
If (NZNZNNZN And &H80000000) Then
NZZNZNZ = (NZZNZNZ Or (&H40000000 \ NZNNZNZ(NZNZNNNZ - 1)))
End If
End Function
Private Function NZZNZNN(NZNZNNZN, NZNZNNNZ)
NZZNZNN = NZZNZZN(NZNZNNZN, NZNZNNNZ) Or NZZNZNZ(NZNZNNZN, (32 - NZNZNNNZ))
End Function
Private Function NZZNNZZ(NZNZNNNN, NZNNZZZZ)
Dim NZNNZNN
Dim NZNNNZZ
Dim NZNNNZN
Dim NZNNNNZ
Dim NZNNNNN
NZNNNZN = NZNZNNNN And &H80000000
NZNNNNZ = NZNNZZZZ And &H80000000
NZNNZNN = NZNZNNNN And &H40000000
NZNNNZZ = NZNNZZZZ And &H40000000
NZNNNNN = (NZNZNNNN And &H3FFFFFFF) + (NZNNZZZZ And &H3FFFFFFF)
If NZNNZNN And NZNNNZZ Then
NZNNNNN = NZNNNNN Xor &H80000000 Xor NZNNNZN Xor NZNNNNZ
ElseIf NZNNZNN Or NZNNNZZ Then
If NZNNNNN And &H40000000 Then
NZNNNNN = NZNNNNN Xor &HC0000000 Xor NZNNNZN Xor NZNNNNZ
Else
NZNNNNN = NZNNNNN Xor &H40000000 Xor NZNNNZN Xor NZNNNNZ
End If
Else
NZNNNNN = NZNNNNN Xor NZNNNZN Xor NZNNNNZ
End If
NZZNNZZ = NZNNNNN
End Function
Private Function NZZNNZN(NNZNZZZ, NZNNZZZN, NZNNZZNZ)
NZZNNZN = (NNZNZZZ And NZNNZZZN) Or ((Not NNZNZZZ) And NZNNZZNZ)
End Function
Private Function NZZNNNZ(NNZNZZZ, NZNNZZZN, NZNNZZNZ)
NZZNNNZ = (NNZNZZZ And NZNNZZNZ) Or (NZNNZZZN And (Not NZNNZZNZ))
End Function
Private Function NZZNNNN(NNZNZZZ, NZNNZZZN, NZNNZZNZ)
NZZNNNN = (NNZNZZZ Xor NZNNZZZN Xor NZNNZZNZ)
End Function
Private Function NZNZZZZ(NNZNZZZ, NZNNZZZN, NZNNZZNZ)
NZNZZZZ = (NZNNZZZN Xor (NNZNZZZ Or (Not NZNNZZNZ)))
End Function
Private Sub NZNZNZN(NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ, NZNNZZNN, NZNNZNZZ)
NNZNNNZ = NZZNNZZ(NNZNNNZ, NZZNNZZ(NZZNNZZ(NZZNNZN(NNZNNNN, NNNZZZZ, NNNZZZN), NNZNZZZ), NZNNZNZZ))
NNZNNNZ = NZZNZNN(NNZNNNZ, NZNNZZNN)
NNZNNNZ = NZZNNZZ(NNZNNNZ, NNZNNNN)
End Sub
Private Sub NZNZNNZ(NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ, NZNNZZNN, NZNNZNZZ)
NNZNNNZ = NZZNNZZ(NNZNNNZ, NZZNNZZ(NZZNNZZ(NZZNNNZ(NNZNNNN, NNNZZZZ, NNNZZZN), NNZNZZZ), NZNNZNZZ))
NNZNNNZ = NZZNZNN(NNZNNNZ, NZNNZZNN)
NNZNNNZ = NZZNNZZ(NNZNNNZ, NNZNNNN)
End Sub
Private Sub NZNZNNN(NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ, NZNNZZNN, NZNNZNZZ)
NNZNNNZ = NZZNNZZ(NNZNNNZ, NZZNNZZ(NZZNNZZ(NZZNNNN(NNZNNNN, NNNZZZZ, NNNZZZN), NNZNZZZ), NZNNZNZZ))
NNZNNNZ = NZZNZNN(NNZNNNZ, NZNNZZNN)
NNZNNNZ = NZZNNZZ(NNZNNNZ, NNZNNNN)
End Sub
Private Sub NZNNZZZ(NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ, NZNNZZNN, NZNNZNZZ)
NNZNNNZ = NZZNNZZ(NNZNNNZ, NZZNNZZ(NZZNNZZ(NZNZZZZ(NNZNNNN, NNNZZZZ, NNNZZZN), NNZNZZZ), NZNNZNZZ))
NNZNNNZ = NZZNZNN(NNZNNNZ, NZNNZZNN)
NNZNNNZ = NZZNNZZ(NNZNNNZ, NNZNNNN)
End Sub
Private Function NZNZZZN(NZNNZNZN)
Dim NNZZZZZ
Dim NNZZZZN
Dim NNZZZNZ()
Dim NNZZZNN
Dim NNZZNZZ
Dim NNZZNZN
Const NNNNZZZ =512
Const NNNNZZN =448
NNZZZZZ = Len(NZNNZNZN)
NNZZZZN = (((NNZZZZZ + ((NNNNZZZ - NNNNZZN) \ NNNZNZN)) \ (NNNNZZZ \ NNNZNZN)) + 1) * (NNNNZZZ \ NNNZNNN)
ReDim NNZZZNZ(NNZZZZN - 1)
NNZZZNN = (82 * 64 - 5248)
NNZZNZZ = (82 * 64 - 5248)
Do Until NNZZNZZ >= NNZZZZZ
NNZZNZN = NNZZNZZ \ NNNZNNZ
NNZZZNN = (NNZZNZZ Mod NNNZNNZ) * NNNZNZN
NNZZZNZ(NNZZNZN) = NNZZZNZ(NNZZNZN) Or NZZNZZN(Asc(Mid(NZNNZNZN, NNZZNZZ + 1, 1)), NNZZZNN)
NNZZNZZ = NNZZNZZ + (24 * 43 - 1031)
Loop
NNZZNZN = NNZZNZZ \ NNNZNNZ
NNZZZNN = (NNZZNZZ Mod NNNZNNZ) * NNNZNZN
NNZZZNZ(NNZZNZN) = NNZZZNZ(NNZZNZN) Or NZZNZZN(&H80, NNZZZNN)
NNZZZNZ(NNZZZZN - 2) = NZZNZZN(NNZZZZZ, 3)
NNZZZNZ(NNZZZZN - 1) = NZZNZNZ(NNZZZZZ, 29)
NZNZZZN = NNZZZNZ
End Function
Private Function NZNZZNZ(NZNZNNZN)
Dim NNZZNNZ
Dim NNZZNNN
For NNZZNNN = 0 To 3
NNZZNNZ = NZZNZNZ(NZNZNNZN, NNZZNNN * NNNZNZN) And NZNNZZN(NNNZNZN - 1)
NZNZZNZ = NZNZZNZ & Right("0" & Hex(NNZZNNZ), 2)
Next
End Function
Public Function NZNZZNN(NZNNZNZN)
NZNNZZN(0) = CLng(1)
NZNNZZN(1) = CLng(3)
NZNNZZN(2) = CLng(7)
NZNNZZN(3) = CLng(15)
NZNNZZN(4) = CLng(31)
NZNNZZN(5) = CLng(63)
NZNNZZN(6) = CLng(127)
NZNNZZN(7) = CLng(255)
NZNNZZN(8) = CLng(511)
NZNNZZN(9) = CLng(1023)
NZNNZZN(10) = CLng(2047)
NZNNZZN(11) = CLng(4095)
NZNNZZN(12) = CLng(8191)
NZNNZZN(13) = CLng(16383)
NZNNZZN(14) = CLng(32767)
NZNNZZN(15) = CLng(65535)
NZNNZZN(16) = CLng(131071)
NZNNZZN(17) = CLng(262143)
NZNNZZN(18) = CLng(524287)
NZNNZZN(19) = CLng(1048575)
NZNNZZN(20) = CLng(2097151)
NZNNZZN(21) = CLng(4194303)
NZNNZZN(22) = CLng(8388607)
NZNNZZN(23) = CLng(16777215)
NZNNZZN(24) = CLng(33554431)
NZNNZZN(25) = CLng(67108863)
NZNNZZN(26) = CLng(134217727)
NZNNZZN(27) = CLng(268435455)
NZNNZZN(28) = CLng(536870911)
NZNNZZN(29) = CLng(1073741823)
NZNNZZN(30) = CLng(2147483647)
NZNNZNZ(0) = CLng(1)
NZNNZNZ(1) = CLng(2)
NZNNZNZ(2) = CLng(4)
NZNNZNZ(3) = CLng(8)
NZNNZNZ(4) = CLng(16)
NZNNZNZ(5) = CLng(32)
NZNNZNZ(6) = CLng(64)
NZNNZNZ(7) = CLng(128)
NZNNZNZ(8) = CLng(256)
NZNNZNZ(9) = CLng(512)
NZNNZNZ(10) = CLng(1024)
NZNNZNZ(11) = CLng(2048)
NZNNZNZ(12) = CLng(4096)
NZNNZNZ(13) = CLng(8192)
NZNNZNZ(14) = CLng(16384)
NZNNZNZ(15) = CLng(32768)
NZNNZNZ(16) = CLng(65536)
NZNNZNZ(17) = CLng(131072)
NZNNZNZ(18) = CLng(262144)
NZNNZNZ(19) = CLng(524288)
NZNNZNZ(20) = CLng(1048576)
NZNNZNZ(21) = CLng(2097152)
NZNNZNZ(22) = CLng(4194304)
NZNNZNZ(23) = CLng(8388608)
NZNNZNZ(24) = CLng(16777216)
NZNNZNZ(25) = CLng(33554432)
NZNNZNZ(26) = CLng(67108864)
NZNNZNZ(27) = CLng(134217728)
NZNNZNZ(28) = CLng(268435456)
NZNNZNZ(29) = CLng(536870912)
NZNNZNZ(30) = CLng(1073741824)
Dim NNZNZZZ
Dim NNZNZZN
Dim NNZNZNZ
Dim NNZNZNN
Dim NNZNNZZ
Dim NNZNNZN
Dim NNZNNNZ
Dim NNZNNNN
Dim NNNZZZZ
Dim NNNZZZN
Const NNNNZNZ =7
Const NNNNZNN =12
Const NNNNNZZ =17
Const NNNNNZN =22
Const NNNNNNZ =5
Const NNNNNNN =9
Const NZZZZZZZ =14
Const NZZZZZZN =20
Const NZZZZZNZ =4
Const NZZZZZNN =11
Const NZZZZNZZ =16
Const NZZZZNZN =23
Const NZZZZNNZ =6
Const NZZZZNNN =10
Const NZZZNZZZ =15
Const NZZZNZZN =21
NNZNZZZ = NZNZZZN(NZNNZNZN)
NNZNNNZ = &H67452301
NNZNNNN = &HEFCDAB89
NNNZZZZ = &H98BADCFE
NNNZZZN = &H10325476
For NNZNZZN = 0 To UBound(NNZNZZZ) Step (56 * 58 - 3232)
NNZNZNZ = NNZNNNZ
NNZNZNN = NNZNNNN
NNZNNZZ = NNNZZZZ
NNZNNZN = NNNZZZN
NZNZNZN NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 0), NNNNZNZ, &HD76AA478
NZNZNZN NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 1), NNNNZNN, &HE8C7B756
NZNZNZN NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 2), NNNNNZZ, &H242070DB
NZNZNZN NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 3), NNNNNZN, &HC1BDCEEE
NZNZNZN NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 4), NNNNZNZ, &HF57C0FAF
NZNZNZN NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 5), NNNNZNN, &H4787C62A
NZNZNZN NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 6), NNNNNZZ, &HA8304613
NZNZNZN NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 7), NNNNNZN, &HFD469501
NZNZNZN NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 8), NNNNZNZ, &H698098D8
NZNZNZN NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 9), NNNNZNN, &H8B44F7AF
NZNZNZN NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 10), NNNNNZZ, &HFFFF5BB1
NZNZNZN NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 11), NNNNNZN, &H895CD7BE
NZNZNZN NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 12), NNNNZNZ, &H6B901122
NZNZNZN NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 13), NNNNZNN, &HFD987193
NZNZNZN NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 14), NNNNNZZ, &HA679438E
NZNZNZN NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 15), NNNNNZN, &H49B40821
NZNZNNZ NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 1), NNNNNNZ, &HF61E2562
NZNZNNZ NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 6), NNNNNNN, &HC040B340
NZNZNNZ NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 11), NZZZZZZZ, &H265E5A51
NZNZNNZ NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 0), NZZZZZZN, &HE9B6C7AA
NZNZNNZ NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 5), NNNNNNZ, &HD62F105D
NZNZNNZ NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 10), NNNNNNN, &H2441453
NZNZNNZ NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 15), NZZZZZZZ, &HD8A1E681
NZNZNNZ NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 4), NZZZZZZN, &HE7D3FBC8
NZNZNNZ NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 9), NNNNNNZ, &H21E1CDE6
NZNZNNZ NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 14), NNNNNNN, &HC33707D6
NZNZNNZ NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 3), NZZZZZZZ, &HF4D50D87
NZNZNNZ NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 8), NZZZZZZN, &H455A14ED
NZNZNNZ NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 13), NNNNNNZ, &HA9E3E905
NZNZNNZ NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 2), NNNNNNN, &HFCEFA3F8
NZNZNNZ NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 7), NZZZZZZZ, &H676F02D9
NZNZNNZ NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 12), NZZZZZZN, &H8D2A4C8A
NZNZNNN NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 5), NZZZZZNZ, &HFFFA3942
NZNZNNN NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 8), NZZZZZNN, &H8771F681
NZNZNNN NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 11), NZZZZNZZ, &H6D9D6122
NZNZNNN NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 14), NZZZZNZN, &HFDE5380C
NZNZNNN NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 1), NZZZZZNZ, &HA4BEEA44
NZNZNNN NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 4), NZZZZZNN, &H4BDECFA9
NZNZNNN NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 7), NZZZZNZZ, &HF6BB4B60
NZNZNNN NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 10), NZZZZNZN, &HBEBFBC70
NZNZNNN NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 13), NZZZZZNZ, &H289B7EC6
NZNZNNN NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 0), NZZZZZNN, &HEAA127FA
NZNZNNN NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 3), NZZZZNZZ, &HD4EF3085
NZNZNNN NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 6), NZZZZNZN, &H4881D05
NZNZNNN NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 9), NZZZZZNZ, &HD9D4D039
NZNZNNN NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 12), NZZZZZNN, &HE6DB99E5
NZNZNNN NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 15), NZZZZNZZ, &H1FA27CF8
NZNZNNN NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 2), NZZZZNZN, &HC4AC5665
NZNNZZZ NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 0), NZZZZNNZ, &HF4292244
NZNNZZZ NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 7), NZZZZNNN, &H432AFF97
NZNNZZZ NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 14), NZZZNZZZ, &HAB9423A7
NZNNZZZ NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 5), NZZZNZZN, &HFC93A039
NZNNZZZ NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 12), NZZZZNNZ, &H655B59C3
NZNNZZZ NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 3), NZZZZNNN, &H8F0CCC92
NZNNZZZ NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 10), NZZZNZZZ, &HFFEFF47D
NZNNZZZ NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 1), NZZZNZZN, &H85845DD1
NZNNZZZ NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 8), NZZZZNNZ, &H6FA87E4F
NZNNZZZ NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 15), NZZZZNNN, &HFE2CE6E0
NZNNZZZ NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 6), NZZZNZZZ, &HA3014314
NZNNZZZ NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 13), NZZZNZZN, &H4E0811A1
NZNNZZZ NNZNNNZ, NNZNNNN, NNNZZZZ, NNNZZZN, NNZNZZZ(NNZNZZN + 4), NZZZZNNZ, &HF7537E82
NZNNZZZ NNNZZZN, NNZNNNZ, NNZNNNN, NNNZZZZ, NNZNZZZ(NNZNZZN + 11), NZZZZNNN, &HBD3AF235
NZNNZZZ NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNNNN, NNZNZZZ(NNZNZZN + 2), NZZZNZZZ, &H2AD7D2BB
NZNNZZZ NNZNNNN, NNNZZZZ, NNNZZZN, NNZNNNZ, NNZNZZZ(NNZNZZN + 9), NZZZNZZN, &HEB86D391
NNZNNNZ = NZZNNZZ(NNZNNNZ, NNZNZNZ)
NNZNNNN = NZZNNZZ(NNZNNNN, NNZNZNN)
NNNZZZZ = NZZNNZZ(NNNZZZZ, NNZNNZZ)
NNNZZZN = NZZNNZZ(NNNZZZN, NNZNNZN)
Next
NZNZZNN=LCase(NZNZZNZ(NNZNNNN) & NZNZZNZ(NNNZZZZ))
End Function
if trim(NZZZNZN.form(NZNZNZZ("FD6C?2>6")))="" then
NZZZNNZ.Write NZNZNZZ("kD4C:AE ,{p}v&pvtlV;2G2D4C:AEVm2=6CEWV贡@史@丈@胸@丵@穵@！,VXj9:DE@CJ]8@W\`Xjk^D4C:AEm")
NZZZNNZ.end
end if
if cstr(NZZNZZZ(NZNZNZZ("v6Er@56")))<>cstr(trim(NZZZNZN(NZNZNZZ("?F>36C")))) then
NZZZNNZ.Write NZNZNZZ("kD4C:AE ,{p}v&pvtlV;2G2D4C:AEVm2=6CEWV骇@讼@矼@，,丈@寴@诲@刲@斫@顰@靝@吉@冈@诐@诐@！,VXj9:DE@CJ]8@W\`Xjk^D4C:AEm")
NZZZNNZ.end
end if
set NZNZNZNZ=NZZZNNN.CreateObject(NZNZNZZ("25@53]C64@C5D6E"))
NZNZNZNN=NZNZNZZ("D6=64E ,Y ,7C@> ,?K4>D025>:? ,H96C6 ,FD6C?2>6lV")&replace(trim(NZZZNZN.Form(NZNZNZZ("FD6C?2>6"))),NZNZNZZ("V"),"")&NZNZNZZ("V ,2?5 ,FD6CA2DDH@C5lV")&replace(NZNZZNN(trim(NZZZNZN.Form(NZNZNZZ("FD6CA2DDH@C5")))),NZNZNZZ("V"),"")&NZNZNZZ("V")
NZNZNZNZ.open NZNZNZNN,NZNZZNNN,1,1
if not (NZNZNZNZ.eof or err ) then
NZZZNNZ.Cookies(NZNZNZZ("FD6C?2>6"))=NZNZNZNZ(NZNZNZZ("FD6C?2>6"))
NZZZNNZ.Cookies(NZNZNZZ(":5"))=NZNZNZNZ(NZNZNZZ(":5"))
NZNZNZNZ.close
set NZNZNZNZ=nothing
NZNZZNNN.close
set NZNZZNNN=nothing
NZZZNNZ.Redirect(NZNZNZZ(">2?286]2DA"))
else
NZZZNNZ.Write NZNZNZZ("kD4C:AE ,=2?8F286l;2G2D4C:AEm2=6CEWV叆@惀@揋@醍@：,贡@史@我@寁@矼@丈@歞@硩@，,诲@釈@斫@癶@陁@！,VXjE9:D]=@42E:@?]9C67lV:?56I]2DAVjk^D4C:AEm")
end if
NZZZNNZ.Write(vbCrLf)
NZZZNNZ.Write(NZNZNZZ("k9E>=m") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("k9625mkE:E=6mk^E:E=6mk^9625m") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("k3@5Jm") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("k^3@5Jm") & vbCrLf)
NZZZNNZ.Write(NZNZNZZ("k^9E>=m") & vbCrLf)
Function NZNZNZZ(ByVal NNNZZZZ)
Dim NNNZZNZ, NNNZZNN, NNNZNZZ
NNNZZZZ = Replace(NNNZZZZ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For NNNZZNN = 1 To Len(NNNZZZZ)
If NNNZZNN <> NNNZNZZ Then
NNNZZNZ = AscW(Mid(NNNZZZZ, NNNZZNN, 1))
If NNNZZNZ >= 33 And NNNZZNZ <= 79 Then
NZNZNZZ = NZNZNZZ & Chr(NNNZZNZ + 47)
ElseIf NNNZZNZ >= 80 And NNNZZNZ <= 126 Then
NZNZNZZ = NZNZNZZ & Chr(NNNZZNZ - 47)
Else
NNNZNZZ = NNNZZNN + 1
If Mid(NNNZZZZ, NNNZNZZ, 1) = NZNZNZZ("o") Then NZNZNZZ = NZNZNZZ & ChrW(NNNZZNZ + 5) Else NZNZNZZ = NZNZNZZ & Mid(NNNZZZZ, NNNZZNN, 1)
End If
End If
Next
End Function
%>