<%
'开发商：金华市宁志网络科技有限公司
'官方网址： http://www.ningzhi.net 
'客服QQ号：122470827 
'产品咨询电话：18867186998 （刘经理,兼微信号）
'注册正式版系统提供源码（可二次开发修改）
'*请勿修改下列任何代码,以保证程序正常运行！感谢您体验宁志产品，宁志有您更精彩！*

Dim NNNNZZ,NNNNZN,NNNNNZ,NNNNNN,NZZZZZZ
Set NNNNNZ=Response:Set NNNNZN=Request:Set NZZZZZZ=Session:Set NNNNZZ=Application:Set NNNNNN=Server
NNNNNN.ScriptTimeOut= (80 * 54 - 3820)
NZZZZZNZ= (68 * 85 - 5780)
NZZZZZNN= (89 * 23 - 2036)
NZZZZNZZ= (98 * 31 - 3037)
NZZZZNZN=NZZNNZZ(ChrW(69) & ChrW(73) & ChrW(69))
NZZZZNNZ=NZZNNZZ(ChrW(52) & ChrW(64) & ChrW(63) & ChrW(63) & ChrW(93) & ChrW(50) & ChrW(68) & ChrW(65))
NZZZZNNN=NZZNNZZ(ChrW(93) & ChrW(93) & ChrW(94) & ChrW(63) & ChrW(75) & ChrW(95) & ChrW(103) & ChrW(95) & ChrW(103))
NZZZNZZZ=NZZNNZZ(ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(72) & ChrW(54) & ChrW(51) & ChrW(94) & ChrW(50) & ChrW(68) & ChrW(65) & ChrW(94) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(50) & ChrW(93) & ChrW(50) & ChrW(68) & ChrW(65))
NZZZNZZZ=NZZNNZZ(ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(72) & ChrW(54) & ChrW(51) & ChrW(94) & ChrW(50) & ChrW(68) & ChrW(65) & ChrW(94) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(51) & ChrW(66) & ChrW(93) & ChrW(50) & ChrW(68) & ChrW(65))
NZZZNZZN=NZZNNZZ(ChrW(58) & ChrW(63) & ChrW(68) & ChrW(69) & ChrW(50) & ChrW(61) & ChrW(61) & ChrW(94) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(50) & ChrW(93) & ChrW(50) & ChrW(68) & ChrW(65))
NZZZNZNZ=NZZNNZZ(ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(63) & ChrW(75) & ChrW(72) & ChrW(54) & ChrW(51) & ChrW(94) & ChrW(50) & ChrW(68) & ChrW(65) & ChrW(94))
NZZZNZNN=NZZNNZZ(ChrW(94))
NZZZNNZZ=NZZNNZZ(ChrW(94))
NZZZNNZN=NZZNNZZ(ChrW(94))
NZZZNNNZ=NZZNNZZ(ChrW(94))
NZZZNNNN=NZZNNZZ(ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(64) & ChrW(60) & ChrW(93) & ChrW(50) & ChrW(68) & ChrW(65))
NZZNZZZZ=NZZNNZZ(ChrW(53) & ChrW(58) & ChrW(50) & ChrW(64) & ChrW(74) & ChrW(64) & ChrW(63) & ChrW(56) & ChrW(94) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(93) & ChrW(63) & ChrW(64) & ChrW(68) & ChrW(66) & ChrW(93) & ChrW(57) & ChrW(69) & ChrW(62))
NZZNZZZN=NZZNNZZ(ChrW(53) & ChrW(58) & ChrW(50) & ChrW(64) & ChrW(74) & ChrW(64) & ChrW(63) & ChrW(56) & ChrW(94) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(93) & ChrW(63) & ChrW(64) & ChrW(53) & ChrW(50) & ChrW(69) & ChrW(50) & ChrW(93) & ChrW(57) & ChrW(69) & ChrW(62))
NZZNZZNZ=NZZNNZZ(ChrW(21446) & ChrW(64) & ChrW(24768) & ChrW(64) & ChrW(25547) & ChrW(64) & ChrW(31029) & ChrW(64) & ChrW(-230) & ChrW(44) & ChrW(107) & ChrW(51) & ChrW(67) & ChrW(109) & ChrW(96) & ChrW(12289) & ChrW(44) & ChrW(-29710) & ChrW(64) & ChrW(23553) & ChrW(64) & ChrW(26376) & ChrW(64) & ChrW(21148) & ChrW(64) & ChrW(22115) & ChrW(64) & ChrW(120) & ChrW(120) & ChrW(36) & ChrW(25346) & ChrW(64) & ChrW(21516) & ChrW(64) & ChrW(40) & ChrW(116) & ChrW(113) & ChrW(26676) & ChrW(64) & ChrW(30441) & ChrW(64) & ChrW(24400) & ChrW(64) & ChrW(19974) & ChrW(64) & ChrW(-26787) & ChrW(64) & ChrW(-244) & ChrW(44) & ChrW(20872) & ChrW(64) & ChrW(-28216) & ChrW(64) & ChrW(26027) & ChrW(64) & ChrW(25166) & ChrW(64) & ChrW(24315) & ChrW(64) & ChrW(-29744) & ChrW(64) & ChrW(-29744) & ChrW(64) & ChrW(-255) & ChrW(44) & ChrW(107) & ChrW(51) & ChrW(67) & ChrW(109) & ChrW(97) & ChrW(12289) & ChrW(44) & ChrW(-29710) & ChrW(64) & ChrW(28150) & ChrW(64) & ChrW(21147) & ChrW(64) & ChrW(-24877) & ChrW(64) & ChrW(-29793) & ChrW(64) & ChrW(-26223) & ChrW(64) & ChrW(-26512) & ChrW(64) & ChrW(32) & ChrW(44) & ChrW(58) & ChrW(63) & ChrW(53) & ChrW(54) & ChrW(73) & ChrW(93) & ChrW(50) & ChrW(68) & ChrW(65) & ChrW(32) & ChrW(44) & ChrW(20021) & ChrW(64) & ChrW(26363) & ChrW(64) & ChrW(31527) & ChrW(64) & ChrW(19968) & ChrW(44) & ChrW(-26223) & ChrW(64) & ChrW(-26512) & ChrW(64) & ChrW(25986) & ChrW(64) & ChrW(20209) & ChrW(64) & ChrW(21512) & ChrW(64) & ChrW(107) & ChrW(51) & ChrW(67) & ChrW(98) & ChrW(12289) & ChrW(44) & ChrW(-29767) & ChrW(64) & ChrW(32617) & ChrW(64) & ChrW(23431) & ChrW(64) & ChrW(25099) & ChrW(64) & ChrW(21513) & ChrW(64) & ChrW(-244) & ChrW(44) & ChrW(21042) & ChrW(64) & ChrW(26027) & ChrW(64) & ChrW(-26512) & ChrW(64) & ChrW(-26787) & ChrW(64) & ChrW(-28216) & ChrW(64) & ChrW(-29744) & ChrW(64))
NZZNZZNN=NZZNNZZ(ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(63) & ChrW(75) & ChrW(72) & ChrW(54) & ChrW(51) & ChrW(94) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(70) & ChrW(65) & ChrW(94) & ChrW(53) & ChrW(50) & ChrW(69) & ChrW(50) & ChrW(94) & ChrW(53) & ChrW(50) & ChrW(69) & ChrW(50) & ChrW(93) & ChrW(50) & ChrW(68) & ChrW(50) & ChrW(73))
NZZNZNZZ=NZZNNZZ(ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(63) & ChrW(75) & ChrW(72) & ChrW(54) & ChrW(51) & ChrW(94) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(70) & ChrW(65) & ChrW(94) & ChrW(53) & ChrW(50) & ChrW(69) & ChrW(50) & ChrW(94) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(68) & ChrW(66) & ChrW(61) & ChrW(93) & ChrW(50) & ChrW(68) & ChrW(50) & ChrW(73))
NZZNZNZN= (98 * 31 - 3037)
NZZNZNNZ= (98 * 31 - 3037)
NZZNZNNN= (98 * 31 - 3037)
NZZNNZZZ= (98 * 31 - 3037)
NZZNNZZN= (98 * 31 - 3037)
NZZNNZNZ= (98 * 31 - 3037)
NZZNNZNN= (68 * 85 - 5780)
NZZNNNZZ= (98 * 31 - 3037)
NZZNNNZN= (98 * 31 - 3037)
NZZNNNNZ= (98 * 31 - 3037)
if NZZZZZNZ=1 then
Set NZZNNNNN=NNNNNN.CreateObject(NZZNNZZ(ChrW(112) & ChrW(115) & ChrW(126) & ChrW(115) & ChrW(113) & ChrW(93) & ChrW(114) & ChrW(64) & ChrW(63) & ChrW(63) & ChrW(54) & ChrW(52) & ChrW(69) & ChrW(58) & ChrW(64) & ChrW(63)))
NZZNNNNN.open NZZNNZZ(ChrW(65) & ChrW(67) & ChrW(64) & ChrW(71) & ChrW(58) & ChrW(53) & ChrW(54) & ChrW(67) & ChrW(108) & ChrW(68) & ChrW(66) & ChrW(61) & ChrW(64) & ChrW(61) & ChrW(54) & ChrW(53) & ChrW(51) & ChrW(106) & ChrW(53) & ChrW(50) & ChrW(69) & ChrW(50) & ChrW(32) & ChrW(44) & ChrW(68) & ChrW(64) & ChrW(70) & ChrW(67) & ChrW(52) & ChrW(54) & ChrW(108) & ChrW(96) & ChrW(97) & ChrW(102) & ChrW(93) & ChrW(95) & ChrW(93) & ChrW(95) & ChrW(93) & ChrW(96) & ChrW(106) & ChrW(38) & ChrW(68) & ChrW(54) & ChrW(67) & ChrW(32) & ChrW(44) & ChrW(120) & ChrW(115) & ChrW(108) & ChrW(68) & ChrW(50) & ChrW(106) & ChrW(65) & ChrW(72) & ChrW(53) & ChrW(108) & ChrW(68) & ChrW(50) & ChrW(106) & ChrW(120) & ChrW(63) & ChrW(58) & ChrW(69) & ChrW(58) & ChrW(50) & ChrW(61) & ChrW(32) & ChrW(44) & ChrW(114) & ChrW(50) & ChrW(69) & ChrW(50) & ChrW(61) & ChrW(64) & ChrW(56) & ChrW(108) & ChrW(66) & ChrW(74))
Else
set NZZNNNNN = NNNNNN.CreateObject(NZZNNZZ(ChrW(50) & ChrW(53) & ChrW(64) & ChrW(53) & ChrW(51) & ChrW(93) & ChrW(52) & ChrW(64) & ChrW(63) & ChrW(63) & ChrW(54) & ChrW(52) & ChrW(69) & ChrW(58) & ChrW(64) & ChrW(63)))
NZNZZZZZ=NZZNNZZ(ChrW(33) & ChrW(67) & ChrW(64) & ChrW(71) & ChrW(58) & ChrW(53) & ChrW(54) & ChrW(67) & ChrW(108) & ChrW(124) & ChrW(58) & ChrW(52) & ChrW(67) & ChrW(64) & ChrW(68) & ChrW(64) & ChrW(55) & ChrW(69) & ChrW(93) & ChrW(121) & ChrW(54) & ChrW(69) & ChrW(93) & ChrW(126) & ChrW(123) & ChrW(116) & ChrW(115) & ChrW(113) & ChrW(93) & ChrW(99) & ChrW(93) & ChrW(95) & ChrW(106) & ChrW(121) & ChrW(54) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(126) & ChrW(123) & ChrW(116) & ChrW(115) & ChrW(113) & ChrW(105) & ChrW(115) & ChrW(50) & ChrW(69) & ChrW(50) & ChrW(113) & ChrW(50) & ChrW(68) & ChrW(54) & ChrW(32) & ChrW(44) & ChrW(33) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(72) & ChrW(64) & ChrW(67) & ChrW(53) & ChrW(108) & ChrW(63) & ChrW(75) & ChrW(100) & ChrW(96) & ChrW(104) & ChrW(111) & ChrW(71) & ChrW(58) & ChrW(65) & ChrW(106) & ChrW(115) & ChrW(50) & ChrW(69) & ChrW(50) & ChrW(32) & ChrW(44) & ChrW(36) & ChrW(64) & ChrW(70) & ChrW(67) & ChrW(52) & ChrW(54) & ChrW(108)) & NNNNNN.MapPath(NZZNNZZ(ChrW(93) & ChrW(93) & ChrW(94))&NZZNZZNN&"")
NZZNNNNN.open NZNZZZZZ
NZNZZZZN=NNNNZN.QueryString(NZZNNZZ(ChrW(68) & ChrW(54) & ChrW(50) & ChrW(67) & ChrW(52) & ChrW(57)))
End If
NNNNNZ.Write(vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(107) & ChrW(80) & ChrW(92) & ChrW(92) & ChrW(21513) & ChrW(64) & ChrW(21483) & ChrW(64) & ChrW(-29698) & ChrW(64) & ChrW(29987) & ChrW(64) & ChrW(32) & ChrW(44) & ChrW(92) & ChrW(92) & ChrW(109)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(107) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(61) & ChrW(50) & ChrW(63) & ChrW(56) & ChrW(70) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(108) & ChrW(81) & ChrW(121) & ChrW(50) & ChrW(71) & ChrW(50) & ChrW(36) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(81) & ChrW(109)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(55) & ChrW(70) & ChrW(63) & ChrW(52) & ChrW(69) & ChrW(58) & ChrW(64) & ChrW(63) & ChrW(32) & ChrW(44) & ChrW(115) & ChrW(58) & ChrW(68) & ChrW(65) & ChrW(61) & ChrW(50) & ChrW(74) & ChrW(87) & ChrW(120) & ChrW(115) & ChrW(88)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(76)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(58) & ChrW(55) & ChrW(87) & ChrW(32) & ChrW(44) & ChrW(120) & ChrW(115) & ChrW(93) & ChrW(68) & ChrW(69) & ChrW(74) & ChrW(61) & ChrW(54) & ChrW(93) & ChrW(53) & ChrW(58) & ChrW(68) & ChrW(65) & ChrW(61) & ChrW(50) & ChrW(74) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(86) & ChrW(63) & ChrW(64) & ChrW(63) & ChrW(54) & ChrW(86) & ChrW(32) & ChrW(44) & ChrW(88)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(76)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(120) & ChrW(115) & ChrW(93) & ChrW(68) & ChrW(69) & ChrW(74) & ChrW(61) & ChrW(54) & ChrW(93) & ChrW(53) & ChrW(58) & ChrW(68) & ChrW(65) & ChrW(61) & ChrW(50) & ChrW(74) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(86) & ChrW(86) & ChrW(32) & ChrW(44) & ChrW(106)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(78)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(54) & ChrW(61) & ChrW(68) & ChrW(54) & ChrW(9) & ChrW(44)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(76)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(120) & ChrW(115) & ChrW(93) & ChrW(68) & ChrW(69) & ChrW(74) & ChrW(61) & ChrW(54) & ChrW(93) & ChrW(53) & ChrW(58) & ChrW(68) & ChrW(65) & ChrW(61) & ChrW(50) & ChrW(74) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(86) & ChrW(63) & ChrW(64) & ChrW(63) & ChrW(54) & ChrW(86) & ChrW(32) & ChrW(44) & ChrW(106)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(78)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(78)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(107) & ChrW(94) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(109)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(107) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(109)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(55) & ChrW(70) & ChrW(63) & ChrW(52) & ChrW(69) & ChrW(58) & ChrW(64) & ChrW(63) & ChrW(32) & ChrW(44) & ChrW(68) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(52) & ChrW(69) & ChrW(112) & ChrW(61) & ChrW(61) & ChrW(87) & ChrW(64) & ChrW(51) & ChrW(59) & ChrW(88)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(76)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(55) & ChrW(64) & ChrW(67) & ChrW(87) & ChrW(71) & ChrW(50) & ChrW(67) & ChrW(32) & ChrW(44) & ChrW(58) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(95) & ChrW(106) & ChrW(58) & ChrW(107) & ChrW(64) & ChrW(51) & ChrW(59) & ChrW(93) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(68) & ChrW(93) & ChrW(61) & ChrW(54) & ChrW(63) & ChrW(56) & ChrW(69) & ChrW(57) & ChrW(106) & ChrW(58) & ChrW(90) & ChrW(90) & ChrW(88)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(58) & ChrW(55) & ChrW(87) & ChrW(64) & ChrW(51) & ChrW(59) & ChrW(93) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(68) & ChrW(44) & ChrW(58) & ChrW(46) & ChrW(93) & ChrW(69) & ChrW(74) & ChrW(65) & ChrW(54) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(81) & ChrW(52) & ChrW(57) & ChrW(54) & ChrW(52) & ChrW(60) & ChrW(51) & ChrW(64) & ChrW(73) & ChrW(81) & ChrW(88)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(64) & ChrW(51) & ChrW(59) & ChrW(93) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(68) & ChrW(44) & ChrW(58) & ChrW(46) & ChrW(93) & ChrW(52) & ChrW(57) & ChrW(54) & ChrW(52) & ChrW(60) & ChrW(54) & ChrW(53) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(69) & ChrW(67) & ChrW(70) & ChrW(54) & ChrW(106)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(78)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(55) & ChrW(70) & ChrW(63) & ChrW(52) & ChrW(69) & ChrW(58) & ChrW(64) & ChrW(63) & ChrW(32) & ChrW(44) & ChrW(68) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(52) & ChrW(69) & ChrW(126) & ChrW(69) & ChrW(57) & ChrW(54) & ChrW(67) & ChrW(87) & ChrW(64) & ChrW(51) & ChrW(59) & ChrW(88)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(76)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(55) & ChrW(64) & ChrW(67) & ChrW(87) & ChrW(71) & ChrW(50) & ChrW(67) & ChrW(32) & ChrW(44) & ChrW(58) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(95) & ChrW(106) & ChrW(58) & ChrW(107) & ChrW(64) & ChrW(51) & ChrW(59) & ChrW(93) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(68) & ChrW(93) & ChrW(61) & ChrW(54) & ChrW(63) & ChrW(56) & ChrW(69) & ChrW(57) & ChrW(106) & ChrW(58) & ChrW(90) & ChrW(90) & ChrW(88)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(58) & ChrW(55) & ChrW(87) & ChrW(64) & ChrW(51) & ChrW(59) & ChrW(93) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(68) & ChrW(44) & ChrW(58) & ChrW(46) & ChrW(93) & ChrW(69) & ChrW(74) & ChrW(65) & ChrW(54) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(81) & ChrW(52) & ChrW(57) & ChrW(54) & ChrW(52) & ChrW(60) & ChrW(51) & ChrW(64) & ChrW(73) & ChrW(81) & ChrW(32) & ChrW(44) & ChrW(88)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(76)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(58) & ChrW(55) & ChrW(87) & ChrW(80) & ChrW(64) & ChrW(51) & ChrW(59) & ChrW(93) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(68) & ChrW(44) & ChrW(58) & ChrW(46) & ChrW(93) & ChrW(52) & ChrW(57) & ChrW(54) & ChrW(52) & ChrW(60) & ChrW(54) & ChrW(53) & ChrW(88)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(64) & ChrW(51) & ChrW(59) & ChrW(93) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(68) & ChrW(44) & ChrW(58) & ChrW(46) & ChrW(93) & ChrW(52) & ChrW(57) & ChrW(54) & ChrW(52) & ChrW(60) & ChrW(54) & ChrW(53) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(69) & ChrW(67) & ChrW(70) & ChrW(54) & ChrW(106)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(54) & ChrW(61) & ChrW(68) & ChrW(54)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(64) & ChrW(51) & ChrW(59) & ChrW(93) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(68) & ChrW(44) & ChrW(58) & ChrW(46) & ChrW(93) & ChrW(52) & ChrW(57) & ChrW(54) & ChrW(52) & ChrW(60) & ChrW(54) & ChrW(53) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(55) & ChrW(50) & ChrW(61) & ChrW(68) & ChrW(54) & ChrW(106)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(78)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(78)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(107) & ChrW(94) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(109)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(107) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(61) & ChrW(50) & ChrW(63) & ChrW(56) & ChrW(70) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(108) & ChrW(81) & ChrW(59) & ChrW(50) & ChrW(71) & ChrW(50) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(81) & ChrW(109)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(55) & ChrW(70) & ChrW(63) & ChrW(52) & ChrW(69) & ChrW(58) & ChrW(64) & ChrW(63) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(57) & ChrW(50) & ChrW(63) & ChrW(56) & ChrW(54) & ChrW(52) & ChrW(64) & ChrW(61) & ChrW(64) & ChrW(67) & ChrW(87) & ChrW(64) & ChrW(51) & ChrW(59) & ChrW(88)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(76)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(71) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(93) & ChrW(68) & ChrW(67) & ChrW(52) & ChrW(116) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(58) & ChrW(55) & ChrW(87) & ChrW(54) & ChrW(93) & ChrW(52) & ChrW(57) & ChrW(54) & ChrW(52) & ChrW(60) & ChrW(54) & ChrW(53) & ChrW(108) & ChrW(108) & ChrW(69) & ChrW(67) & ChrW(70) & ChrW(54) & ChrW(88)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(76)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(93) & ChrW(65) & ChrW(50) & ChrW(67) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(116) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(93) & ChrW(65) & ChrW(50) & ChrW(67) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(116) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(93) & ChrW(68) & ChrW(69) & ChrW(74) & ChrW(61) & ChrW(54) & ChrW(93) & ChrW(51) & ChrW(50) & ChrW(52) & ChrW(60) & ChrW(56) & ChrW(67) & ChrW(64) & ChrW(70) & ChrW(63) & ChrW(53) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(81) & ChrW(82) & ChrW(114) & ChrW(96) & ChrW(115) & ChrW(97) & ChrW(116) & ChrW(116) & ChrW(81)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(78)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(61) & ChrW(68) & ChrW(54)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(76)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(93) & ChrW(65) & ChrW(50) & ChrW(67) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(116) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(93) & ChrW(65) & ChrW(50) & ChrW(67) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(116) & ChrW(61) & ChrW(54) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(54) & ChrW(93) & ChrW(68) & ChrW(69) & ChrW(74) & ChrW(61) & ChrW(54) & ChrW(93) & ChrW(51) & ChrW(50) & ChrW(52) & ChrW(60) & ChrW(56) & ChrW(67) & ChrW(64) & ChrW(70) & ChrW(63) & ChrW(53) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(81) & ChrW(82) & ChrW(55) & ChrW(55) & ChrW(55) & ChrW(55) & ChrW(55) & ChrW(55) & ChrW(81)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(32) & ChrW(44) & ChrW(78)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(78) & ChrW(32) & ChrW(44)) & vbCrLf)
NNNNNZ.Write(NZZNNZZ(ChrW(107) & ChrW(94) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(109)))
set NZNZZZNZ=NNNNNN.CreateObject(NZZNNZZ(ChrW(50) & ChrW(53) & ChrW(64) & ChrW(53) & ChrW(51) & ChrW(93) & ChrW(67) & ChrW(54) & ChrW(52) & ChrW(64) & ChrW(67) & ChrW(53) & ChrW(68) & ChrW(54) & ChrW(69)))
NZNZZZNN=NZZNNZZ(ChrW(68) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(52) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(89) & ChrW(32) & ChrW(44) & ChrW(55) & ChrW(67) & ChrW(64) & ChrW(62) & ChrW(32) & ChrW(44) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(72) & ChrW(54) & ChrW(51) & ChrW(48) & ChrW(58) & ChrW(63) & ChrW(55) & ChrW(64))
NZNZZZNZ.open NZNZZZNN,NZZNNNNN,1,1
if NZNZZZNZ.recordcount<>0 then
NZNZZNZZ=NZNZZZNZ(NZZNNZZ(ChrW(58) & ChrW(63) & ChrW(53) & ChrW(54) & ChrW(73)))
NZNZZNZN=NZNZZZNZ(NZZNNZZ(ChrW(55) & ChrW(61) & ChrW(71)))
NZNZZNNZ=NZNZZZNZ(NZZNNZZ(ChrW(69) & ChrW(70) & ChrW(58) & ChrW(59) & ChrW(58) & ChrW(50) & ChrW(63)))
NZNZZNNN=NZNZZZNZ(NZZNNZZ(ChrW(60) & ChrW(56)))
NZNZNZZZ=NZNZZZNZ(NZZNNZZ(ChrW(72) & ChrW(54) & ChrW(51) & ChrW(48) & ChrW(69) & ChrW(59)))
NZNZNZZN=NZNZZZNZ(NZZNNZZ(ChrW(51) & ChrW(74) & ChrW(48) & ChrW(60) & ChrW(56)))
NZNZNZNZ=NZNZZZNZ(NZZNNZZ(ChrW(54) & ChrW(63) & ChrW(60) & ChrW(56)))
NZNZNZNN=NZNZZZNZ(NZZNNZZ(ChrW(55) & ChrW(73)))
NZNZNNZZ=NZNZZZNZ(NZZNNZZ(ChrW(54) & ChrW(63) & ChrW(55) & ChrW(73)))
NZNZNNZN=NZNZZZNZ(NZZNNZZ(ChrW(50) & ChrW(53) & ChrW(48) & ChrW(69) & ChrW(64) & ChrW(63) & ChrW(56) & ChrW(75) & ChrW(57) & ChrW(58)))
NZNZNNNZ=NZNZZZNZ(NZZNNZZ(ChrW(54) & ChrW(63) & ChrW(50) & ChrW(53) & ChrW(48) & ChrW(69) & ChrW(64) & ChrW(63) & ChrW(56) & ChrW(75) & ChrW(57) & ChrW(58)))
NZNZNNNN=NZNZZZNZ(NZZNNZZ(ChrW(61) & ChrW(64) & ChrW(56) & ChrW(64)))
NZNNZZZZ=NZNZZZNZ(NZZNNZZ(ChrW(69) & ChrW(58) & ChrW(69) & ChrW(61) & ChrW(54)))
NZNNZZZN=NZNZZZNZ(NZZNNZZ(ChrW(60) & ChrW(54) & ChrW(74) & ChrW(72) & ChrW(64) & ChrW(67) & ChrW(53) & ChrW(68)))
NZNNZZNZ=NZNZZZNZ(NZZNNZZ(ChrW(53) & ChrW(54) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(58) & ChrW(64) & ChrW(63)))
NZNNZZNN=NZNZZZNZ(NZZNNZZ(ChrW(62) & ChrW(68)))
NZNNZNZZ=NZNZZZNZ(NZZNNZZ(ChrW(63) & ChrW(50) & ChrW(62) & ChrW(54)))
NZNNZNZN=NZNZZZNZ(NZZNNZZ(ChrW(54) & ChrW(63) & ChrW(61) & ChrW(64) & ChrW(56) & ChrW(64)))
NZNNZNNZ=NZNZZZNZ(NZZNNZZ(ChrW(54) & ChrW(63) & ChrW(69) & ChrW(58) & ChrW(69) & ChrW(61) & ChrW(54)))
NZNNZNNN=NZNZZZNZ(NZZNNZZ(ChrW(54) & ChrW(63) & ChrW(60) & ChrW(54) & ChrW(74) & ChrW(72) & ChrW(64) & ChrW(67) & ChrW(53) & ChrW(68)))
NZNNNZZZ=NZNZZZNZ(NZZNNZZ(ChrW(54) & ChrW(63) & ChrW(53) & ChrW(54) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(58) & ChrW(64) & ChrW(63)))
NZNNNZZN=NZNZZZNZ(NZZNNZZ(ChrW(54) & ChrW(63) & ChrW(62) & ChrW(68)))
NZNNNZNZ=NZNZZZNZ(NZZNNZZ(ChrW(54) & ChrW(63) & ChrW(63) & ChrW(50) & ChrW(62) & ChrW(54)))
NZNNNZNN=NZNZZZNZ(NZZNNZZ(ChrW(66) & ChrW(66) & ChrW(60) & ChrW(56)))
NZNNNNZZ=NZNZZZNZ(NZZNNZZ(ChrW(66) & ChrW(66) & ChrW(48) & ChrW(96)))
NZNNNNZN=NZNZZZNZ(NZZNNZZ(ChrW(66) & ChrW(66) & ChrW(48) & ChrW(97)))
NZNNNNNZ=NZNZZZNZ(NZZNNZZ(ChrW(66) & ChrW(66) & ChrW(48) & ChrW(98)))
NZNNNNNN=NZNZZZNZ(NZZNNZZ(ChrW(66) & ChrW(66) & ChrW(48) & ChrW(99)))
NNZZZZZZ=NZNZZZNZ(NZZNNZZ(ChrW(66) & ChrW(66) & ChrW(48) & ChrW(100)))
NZNZZZNZ.close
set NZNZZZNZ=nothing
end if
Private Const NNZNNZN =8
Private Const NNZNNNZ =4
Private Const NNZNNNN =32
Private NZNZZZN(30)
Private NZNZZNZ(30)
Private Function NZZZZZN(NNZZZZNN, NNZZZNZZ)
If NNZZZNZZ = 0 Then
NZZZZZN = NNZZZZNN
Exit Function
ElseIf NNZZZNZZ = 31 Then
If NNZZZZNN And 1 Then
NZZZZZN = &H80000000
Else
NZZZZZN = (68 * 85 - 5780)
End If
Exit Function
ElseIf NNZZZNZZ < 0 Or NNZZZNZZ > 31 Then
Err.Raise 6
End If
If (NNZZZZNN And NZNZZNZ(31 - NNZZZNZZ)) Then
NZZZZZN = ((NNZZZZNN And NZNZZZN(31 - (NNZZZNZZ + 1))) * NZNZZNZ(NNZZZNZZ)) Or &H80000000
Else
NZZZZZN = ((NNZZZZNN And NZNZZZN(31 - NNZZZNZZ)) * NZNZZNZ(NNZZZNZZ))
End If
End Function
Private Function NZZZZNZ(NNZZZZNN, NNZZZNZZ)
If NNZZZNZZ = 0 Then
NZZZZNZ = NNZZZZNN
Exit Function
ElseIf NNZZZNZZ = 31 Then
If NNZZZZNN And &H80000000 Then
NZZZZNZ = (98 * 31 - 3037)
Else
NZZZZNZ = (68 * 85 - 5780)
End If
Exit Function
ElseIf NNZZZNZZ < 0 Or NNZZZNZZ > 31 Then
Err.Raise 6
End If
NZZZZNZ = (NNZZZZNN And &H7FFFFFFE) \ NZNZZNZ(NNZZZNZZ)
If (NNZZZZNN And &H80000000) Then
NZZZZNZ = (NZZZZNZ Or (&H40000000 \ NZNZZNZ(NNZZZNZZ - 1)))
End If
End Function
Private Function NZZZZNN(NNZZZZNN, NNZZZNZZ)
NZZZZNN = NZZZZZN(NNZZZZNN, NNZZZNZZ) Or NZZZZNZ(NNZZZZNN, (32 - NNZZZNZZ))
End Function
Private Function NZZZNZZ(NNZZZNZN, NNZZZNNZ)
Dim NZNZZNN
Dim NZNZNZZ
Dim NZNZNZN
Dim NZNZNNZ
Dim NZNZNNN
NZNZNZN = NNZZZNZN And &H80000000
NZNZNNZ = NNZZZNNZ And &H80000000
NZNZZNN = NNZZZNZN And &H40000000
NZNZNZZ = NNZZZNNZ And &H40000000
NZNZNNN = (NNZZZNZN And &H3FFFFFFF) + (NNZZZNNZ And &H3FFFFFFF)
If NZNZZNN And NZNZNZZ Then
NZNZNNN = NZNZNNN Xor &H80000000 Xor NZNZNZN Xor NZNZNNZ
ElseIf NZNZZNN Or NZNZNZZ Then
If NZNZNNN And &H40000000 Then
NZNZNNN = NZNZNNN Xor &HC0000000 Xor NZNZNZN Xor NZNZNNZ
Else
NZNZNNN = NZNZNNN Xor &H40000000 Xor NZNZNZN Xor NZNZNNZ
End If
Else
NZNZNNN = NZNZNNN Xor NZNZNZN Xor NZNZNNZ
End If
NZZZNZZ = NZNZNNN
End Function
Private Function NZZZNZN(NNZZZZZ, NNZZZNNN, NNZZNZZZ)
NZZZNZN = (NNZZZZZ And NNZZZNNN) Or ((Not NNZZZZZ) And NNZZNZZZ)
End Function
Private Function NZZZNNZ(NNZZZZZ, NNZZZNNN, NNZZNZZZ)
NZZZNNZ = (NNZZZZZ And NNZZNZZZ) Or (NNZZZNNN And (Not NNZZNZZZ))
End Function
Private Function NZZZNNN(NNZZZZZ, NNZZZNNN, NNZZNZZZ)
NZZZNNN = (NNZZZZZ Xor NNZZZNNN Xor NNZZNZZZ)
End Function
Private Function NZZNZZZ(NNZZZZZ, NNZZZNNN, NNZZNZZZ)
NZZNZZZ = (NNZZZNNN Xor (NNZZZZZ Or (Not NNZZNZZZ)))
End Function
Private Sub NZZNNZN(NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ, NNZZNZZN, NNZZNZNZ)
NNZZNNZ = NZZZNZZ(NNZZNNZ, NZZZNZZ(NZZZNZZ(NZZZNZN(NNZZNNN, NNZNZZZ, NNZNZZN), NNZZZZZ), NNZZNZNZ))
NNZZNNZ = NZZZZNN(NNZZNNZ, NNZZNZZN)
NNZZNNZ = NZZZNZZ(NNZZNNZ, NNZZNNN)
End Sub
Private Sub NZZNNNZ(NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ, NNZZNZZN, NNZZNZNZ)
NNZZNNZ = NZZZNZZ(NNZZNNZ, NZZZNZZ(NZZZNZZ(NZZZNNZ(NNZZNNN, NNZNZZZ, NNZNZZN), NNZZZZZ), NNZZNZNZ))
NNZZNNZ = NZZZZNN(NNZZNNZ, NNZZNZZN)
NNZZNNZ = NZZZNZZ(NNZZNNZ, NNZZNNN)
End Sub
Private Sub NZZNNNN(NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ, NNZZNZZN, NNZZNZNZ)
NNZZNNZ = NZZZNZZ(NNZZNNZ, NZZZNZZ(NZZZNZZ(NZZZNNN(NNZZNNN, NNZNZZZ, NNZNZZN), NNZZZZZ), NNZZNZNZ))
NNZZNNZ = NZZZZNN(NNZZNNZ, NNZZNZZN)
NNZZNNZ = NZZZNZZ(NNZZNNZ, NNZZNNN)
End Sub
Private Sub NZNZZZZ(NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ, NNZZNZZN, NNZZNZNZ)
NNZZNNZ = NZZZNZZ(NNZZNNZ, NZZZNZZ(NZZZNZZ(NZZNZZZ(NNZZNNN, NNZNZZZ, NNZNZZN), NNZZZZZ), NNZZNZNZ))
NNZZNNZ = NZZZZNN(NNZZNNZ, NNZZNZZN)
NNZZNNZ = NZZZNZZ(NNZZNNZ, NNZZNNN)
End Sub
Private Function NZZNZZN(NNZZNZNN)
Dim NZNNZZZ
Dim NZNNZZN
Dim NZNNZNZ()
Dim NZNNZNN
Dim NZNNNZZ
Dim NZNNNZN
Const NNNZZZZ =512
Const NNNZZZN =448
NZNNZZZ = Len(NNZZNZNN)
NZNNZZN = (((NZNNZZZ + ((NNNZZZZ - NNNZZZN) \ NNZNNZN)) \ (NNNZZZZ \ NNZNNZN)) + 1) * (NNNZZZZ \ NNZNNNN)
ReDim NZNNZNZ(NZNNZZN - 1)
NZNNZNN = (68 * 85 - 5780)
NZNNNZZ = (68 * 85 - 5780)
Do Until NZNNNZZ >= NZNNZZZ
NZNNNZN = NZNNNZZ \ NNZNNNZ
NZNNZNN = (NZNNNZZ Mod NNZNNNZ) * NNZNNZN
NZNNZNZ(NZNNNZN) = NZNNZNZ(NZNNNZN) Or NZZZZZN(Asc(Mid(NNZZNZNN, NZNNNZZ + 1, 1)), NZNNZNN)
NZNNNZZ = NZNNNZZ + (98 * 31 - 3037)
Loop
NZNNNZN = NZNNNZZ \ NNZNNNZ
NZNNZNN = (NZNNNZZ Mod NNZNNNZ) * NNZNNZN
NZNNZNZ(NZNNNZN) = NZNNZNZ(NZNNNZN) Or NZZZZZN(&H80, NZNNZNN)
NZNNZNZ(NZNNZZN - 2) = NZZZZZN(NZNNZZZ, 3)
NZNNZNZ(NZNNZZN - 1) = NZZZZNZ(NZNNZZZ, 29)
NZZNZZN = NZNNZNZ
End Function
Private Function NZZNZNZ(NNZZZZNN)
Dim NZNNNNZ
Dim NZNNNNN
For NZNNNNN = 0 To 3
NZNNNNZ = NZZZZNZ(NNZZZZNN, NZNNNNN * NNZNNZN) And NZNZZZN(NNZNNZN - 1)
NZZNZNZ = NZZNZNZ & Right("0" & Hex(NZNNNNZ), 2)
Next
End Function
Public Function NZZNZNN(NNZZNZNN)
NZNZZZN(0) = CLng(1)
NZNZZZN(1) = CLng(3)
NZNZZZN(2) = CLng(7)
NZNZZZN(3) = CLng(15)
NZNZZZN(4) = CLng(31)
NZNZZZN(5) = CLng(63)
NZNZZZN(6) = CLng(127)
NZNZZZN(7) = CLng(255)
NZNZZZN(8) = CLng(511)
NZNZZZN(9) = CLng(1023)
NZNZZZN(10) = CLng(2047)
NZNZZZN(11) = CLng(4095)
NZNZZZN(12) = CLng(8191)
NZNZZZN(13) = CLng(16383)
NZNZZZN(14) = CLng(32767)
NZNZZZN(15) = CLng(65535)
NZNZZZN(16) = CLng(131071)
NZNZZZN(17) = CLng(262143)
NZNZZZN(18) = CLng(524287)
NZNZZZN(19) = CLng(1048575)
NZNZZZN(20) = CLng(2097151)
NZNZZZN(21) = CLng(4194303)
NZNZZZN(22) = CLng(8388607)
NZNZZZN(23) = CLng(16777215)
NZNZZZN(24) = CLng(33554431)
NZNZZZN(25) = CLng(67108863)
NZNZZZN(26) = CLng(134217727)
NZNZZZN(27) = CLng(268435455)
NZNZZZN(28) = CLng(536870911)
NZNZZZN(29) = CLng(1073741823)
NZNZZZN(30) = CLng(2147483647)
NZNZZNZ(0) = CLng(1)
NZNZZNZ(1) = CLng(2)
NZNZZNZ(2) = CLng(4)
NZNZZNZ(3) = CLng(8)
NZNZZNZ(4) = CLng(16)
NZNZZNZ(5) = CLng(32)
NZNZZNZ(6) = CLng(64)
NZNZZNZ(7) = CLng(128)
NZNZZNZ(8) = CLng(256)
NZNZZNZ(9) = CLng(512)
NZNZZNZ(10) = CLng(1024)
NZNZZNZ(11) = CLng(2048)
NZNZZNZ(12) = CLng(4096)
NZNZZNZ(13) = CLng(8192)
NZNZZNZ(14) = CLng(16384)
NZNZZNZ(15) = CLng(32768)
NZNZZNZ(16) = CLng(65536)
NZNZZNZ(17) = CLng(131072)
NZNZZNZ(18) = CLng(262144)
NZNZZNZ(19) = CLng(524288)
NZNZZNZ(20) = CLng(1048576)
NZNZZNZ(21) = CLng(2097152)
NZNZZNZ(22) = CLng(4194304)
NZNZZNZ(23) = CLng(8388608)
NZNZZNZ(24) = CLng(16777216)
NZNZZNZ(25) = CLng(33554432)
NZNZZNZ(26) = CLng(67108864)
NZNZZNZ(27) = CLng(134217728)
NZNZZNZ(28) = CLng(268435456)
NZNZZNZ(29) = CLng(536870912)
NZNZZNZ(30) = CLng(1073741824)
Dim NNZZZZZ
Dim NNZZZZN
Dim NNZZZNZ
Dim NNZZZNN
Dim NNZZNZZ
Dim NNZZNZN
Dim NNZZNNZ
Dim NNZZNNN
Dim NNZNZZZ
Dim NNZNZZN
Const NNNZZNZ =7
Const NNNZZNN =12
Const NNNZNZZ =17
Const NNNZNZN =22
Const NNNZNNZ =5
Const NNNZNNN =9
Const NNNNZZZ =14
Const NNNNZZN =20
Const NNNNZNZ =4
Const NNNNZNN =11
Const NNNNNZZ =16
Const NNNNNZN =23
Const NNNNNNZ =6
Const NNNNNNN =10
Const NZZZZZZZ =15
Const NZZZZZZN =21
NNZZZZZ = NZZNZZN(NNZZNZNN)
NNZZNNZ = &H67452301
NNZZNNN = &HEFCDAB89
NNZNZZZ = &H98BADCFE
NNZNZZN = &H10325476
For NNZZZZN = 0 To UBound(NNZZZZZ) Step (56 * 50 - 2784)
NNZZZNZ = NNZZNNZ
NNZZZNN = NNZZNNN
NNZZNZZ = NNZNZZZ
NNZZNZN = NNZNZZN
NZZNNZN NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 0), NNNZZNZ, &HD76AA478
NZZNNZN NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 1), NNNZZNN, &HE8C7B756
NZZNNZN NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 2), NNNZNZZ, &H242070DB
NZZNNZN NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 3), NNNZNZN, &HC1BDCEEE
NZZNNZN NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 4), NNNZZNZ, &HF57C0FAF
NZZNNZN NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 5), NNNZZNN, &H4787C62A
NZZNNZN NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 6), NNNZNZZ, &HA8304613
NZZNNZN NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 7), NNNZNZN, &HFD469501
NZZNNZN NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 8), NNNZZNZ, &H698098D8
NZZNNZN NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 9), NNNZZNN, &H8B44F7AF
NZZNNZN NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 10), NNNZNZZ, &HFFFF5BB1
NZZNNZN NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 11), NNNZNZN, &H895CD7BE
NZZNNZN NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 12), NNNZZNZ, &H6B901122
NZZNNZN NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 13), NNNZZNN, &HFD987193
NZZNNZN NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 14), NNNZNZZ, &HA679438E
NZZNNZN NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 15), NNNZNZN, &H49B40821
NZZNNNZ NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 1), NNNZNNZ, &HF61E2562
NZZNNNZ NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 6), NNNZNNN, &HC040B340
NZZNNNZ NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 11), NNNNZZZ, &H265E5A51
NZZNNNZ NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 0), NNNNZZN, &HE9B6C7AA
NZZNNNZ NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 5), NNNZNNZ, &HD62F105D
NZZNNNZ NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 10), NNNZNNN, &H2441453
NZZNNNZ NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 15), NNNNZZZ, &HD8A1E681
NZZNNNZ NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 4), NNNNZZN, &HE7D3FBC8
NZZNNNZ NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 9), NNNZNNZ, &H21E1CDE6
NZZNNNZ NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 14), NNNZNNN, &HC33707D6
NZZNNNZ NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 3), NNNNZZZ, &HF4D50D87
NZZNNNZ NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 8), NNNNZZN, &H455A14ED
NZZNNNZ NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 13), NNNZNNZ, &HA9E3E905
NZZNNNZ NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 2), NNNZNNN, &HFCEFA3F8
NZZNNNZ NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 7), NNNNZZZ, &H676F02D9
NZZNNNZ NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 12), NNNNZZN, &H8D2A4C8A
NZZNNNN NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 5), NNNNZNZ, &HFFFA3942
NZZNNNN NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 8), NNNNZNN, &H8771F681
NZZNNNN NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 11), NNNNNZZ, &H6D9D6122
NZZNNNN NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 14), NNNNNZN, &HFDE5380C
NZZNNNN NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 1), NNNNZNZ, &HA4BEEA44
NZZNNNN NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 4), NNNNZNN, &H4BDECFA9
NZZNNNN NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 7), NNNNNZZ, &HF6BB4B60
NZZNNNN NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 10), NNNNNZN, &HBEBFBC70
NZZNNNN NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 13), NNNNZNZ, &H289B7EC6
NZZNNNN NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 0), NNNNZNN, &HEAA127FA
NZZNNNN NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 3), NNNNNZZ, &HD4EF3085
NZZNNNN NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 6), NNNNNZN, &H4881D05
NZZNNNN NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 9), NNNNZNZ, &HD9D4D039
NZZNNNN NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 12), NNNNZNN, &HE6DB99E5
NZZNNNN NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 15), NNNNNZZ, &H1FA27CF8
NZZNNNN NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 2), NNNNNZN, &HC4AC5665
NZNZZZZ NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 0), NNNNNNZ, &HF4292244
NZNZZZZ NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 7), NNNNNNN, &H432AFF97
NZNZZZZ NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 14), NZZZZZZZ, &HAB9423A7
NZNZZZZ NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 5), NZZZZZZN, &HFC93A039
NZNZZZZ NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 12), NNNNNNZ, &H655B59C3
NZNZZZZ NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 3), NNNNNNN, &H8F0CCC92
NZNZZZZ NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 10), NZZZZZZZ, &HFFEFF47D
NZNZZZZ NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 1), NZZZZZZN, &H85845DD1
NZNZZZZ NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 8), NNNNNNZ, &H6FA87E4F
NZNZZZZ NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 15), NNNNNNN, &HFE2CE6E0
NZNZZZZ NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 6), NZZZZZZZ, &HA3014314
NZNZZZZ NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 13), NZZZZZZN, &H4E0811A1
NZNZZZZ NNZZNNZ, NNZZNNN, NNZNZZZ, NNZNZZN, NNZZZZZ(NNZZZZN + 4), NNNNNNZ, &HF7537E82
NZNZZZZ NNZNZZN, NNZZNNZ, NNZZNNN, NNZNZZZ, NNZZZZZ(NNZZZZN + 11), NNNNNNN, &HBD3AF235
NZNZZZZ NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZNNN, NNZZZZZ(NNZZZZN + 2), NZZZZZZZ, &H2AD7D2BB
NZNZZZZ NNZZNNN, NNZNZZZ, NNZNZZN, NNZZNNZ, NNZZZZZ(NNZZZZN + 9), NZZZZZZN, &HEB86D391
NNZZNNZ = NZZZNZZ(NNZZNNZ, NNZZZNZ)
NNZZNNN = NZZZNZZ(NNZZNNN, NNZZZNN)
NNZNZZZ = NZZZNZZ(NNZNZZZ, NNZZNZZ)
NNZNZZN = NZZZNZZ(NNZNZZN, NNZZNZN)
Next
NZZNZNN=LCase(NZZNZNZ(NNZZNNN) & NZZNZNZ(NNZNZZZ))
End Function
if trim(NNNNZN.form(NZZNNZZ(ChrW(70) & ChrW(68) & ChrW(54) & ChrW(67) & ChrW(63) & ChrW(50) & ChrW(62) & ChrW(54))))="" then
NNNNNZ.Write NZZNNZZ(ChrW(107) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(123) & ChrW(112) & ChrW(125) & ChrW(118) & ChrW(38) & ChrW(112) & ChrW(118) & ChrW(116) & ChrW(108) & ChrW(86) & ChrW(59) & ChrW(50) & ChrW(71) & ChrW(50) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(86) & ChrW(109) & ChrW(50) & ChrW(61) & ChrW(54) & ChrW(67) & ChrW(69) & ChrW(87) & ChrW(86) & ChrW(-29407) & ChrW(64) & ChrW(21490) & ChrW(64) & ChrW(19976) & ChrW(64) & ChrW(-32520) & ChrW(64) & ChrW(20021) & ChrW(64) & ChrW(31349) & ChrW(64) & ChrW(-255) & ChrW(44) & ChrW(86) & ChrW(88) & ChrW(106) & ChrW(57) & ChrW(58) & ChrW(68) & ChrW(69) & ChrW(64) & ChrW(67) & ChrW(74) & ChrW(93) & ChrW(56) & ChrW(64) & ChrW(87) & ChrW(92) & ChrW(96) & ChrW(88) & ChrW(106) & ChrW(107) & ChrW(94) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(109))
NNNNNZ.end
end if
set NNZZZZZN=NNNNNN.CreateObject(NZZNNZZ(ChrW(50) & ChrW(53) & ChrW(64) & ChrW(53) & ChrW(51) & ChrW(93) & ChrW(67) & ChrW(54) & ChrW(52) & ChrW(64) & ChrW(67) & ChrW(53) & ChrW(68) & ChrW(54) & ChrW(69)))
NZNZZZNN=NZZNNZZ(ChrW(68) & ChrW(54) & ChrW(61) & ChrW(54) & ChrW(52) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(89) & ChrW(32) & ChrW(44) & ChrW(55) & ChrW(67) & ChrW(64) & ChrW(62) & ChrW(32) & ChrW(44) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(48) & ChrW(50) & ChrW(53) & ChrW(62) & ChrW(58) & ChrW(63) & ChrW(32) & ChrW(44) & ChrW(72) & ChrW(57) & ChrW(54) & ChrW(67) & ChrW(54) & ChrW(32) & ChrW(44) & ChrW(70) & ChrW(68) & ChrW(54) & ChrW(67) & ChrW(63) & ChrW(50) & ChrW(62) & ChrW(54) & ChrW(108) & ChrW(86))&replace(trim(NNNNZN.Form(NZZNNZZ(ChrW(70) & ChrW(68) & ChrW(54) & ChrW(67) & ChrW(63) & ChrW(50) & ChrW(62) & ChrW(54)))),NZZNNZZ(ChrW(86)),"")&NZZNNZZ(ChrW(86) & ChrW(32) & ChrW(44) & ChrW(50) & ChrW(63) & ChrW(53) & ChrW(32) & ChrW(44) & ChrW(70) & ChrW(68) & ChrW(54) & ChrW(67) & ChrW(65) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(72) & ChrW(64) & ChrW(67) & ChrW(53) & ChrW(108) & ChrW(86))&replace(NZZNZNN(trim(NNNNZN.Form(NZZNNZZ(ChrW(70) & ChrW(68) & ChrW(54) & ChrW(67) & ChrW(65) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(72) & ChrW(64) & ChrW(67) & ChrW(53))))),NZZNNZZ(ChrW(86)),"")&NZZNNZZ(ChrW(86))
NNZZZZZN.open NZNZZZNN,NZZNNNNN,1,1
if not (NNZZZZZN.eof or err ) then
NNNNNZ.Cookies(NZZNNZZ(ChrW(70) & ChrW(68) & ChrW(54) & ChrW(67) & ChrW(63) & ChrW(50) & ChrW(62) & ChrW(54)))=NNZZZZZN(NZZNNZZ(ChrW(70) & ChrW(68) & ChrW(54) & ChrW(67) & ChrW(63) & ChrW(50) & ChrW(62) & ChrW(54)))
NNNNNZ.Cookies(NZZNNZZ(ChrW(58) & ChrW(53)))=NNZZZZZN(NZZNNZZ(ChrW(58) & ChrW(53)))
NNNNNZ.Cookies(NZZNNZZ(ChrW(66) & ChrW(73)))=NNZZZZZN(NZZNNZZ(ChrW(66) & ChrW(73)))
NNNNNZ.Cookies(NZZNNZZ(ChrW(66) & ChrW(73) & ChrW(97)))=NNZZZZZN(NZZNNZZ(ChrW(66) & ChrW(73) & ChrW(97)))
NNNNNZ.Cookies(NZZNNZZ(ChrW(71) & ChrW(58) & ChrW(65)))=NNZZZZZN(NZZNNZZ(ChrW(71) & ChrW(58) & ChrW(65)))
NNNNNZ.Cookies(NZZNNZZ(ChrW(53) & ChrW(54) & ChrW(61) & ChrW(54)))=NNZZZZZN(NZZNNZZ(ChrW(53) & ChrW(54) & ChrW(61) & ChrW(54)))
If NNZZZZZN(NZZNNZZ(ChrW(51) & ChrW(64) & ChrW(64) & ChrW(60)))<>"" Then
NNNNNZ.Cookies(NZZNNZZ(ChrW(51) & ChrW(64) & ChrW(64) & ChrW(60)))=NNZZZZZN(NZZNNZZ(ChrW(51) & ChrW(64) & ChrW(64) & ChrW(60)))
end if
NNNNNZ.Cookies(NZZNNZZ(ChrW(69) & ChrW(58) & ChrW(69) & ChrW(61) & ChrW(54)))=NNZZZZZN(NZZNNZZ(ChrW(69) & ChrW(58) & ChrW(69) & ChrW(61) & ChrW(54)))
NNNNNZ.Cookies(NZZNNZZ(ChrW(65) & ChrW(50) & ChrW(68) & ChrW(68)))=NNZZZZZN(NZZNNZZ(ChrW(65) & ChrW(50) & ChrW(68) & ChrW(68)))
NNNNNZ.Cookies(NZZNNZZ(ChrW(68) & ChrW(60) & ChrW(74)))=NNZZZZZN(NZZNNZZ(ChrW(68) & ChrW(60) & ChrW(74)))
NNNNNZ.Cookies(NZZNNZZ(ChrW(52) & ChrW(65)))=NNZZZZZN(NZZNNZZ(ChrW(52) & ChrW(65)))
NNNNNZ.Cookies(NZZNNZZ(ChrW(66) & ChrW(58) & ChrW(50) & ChrW(63) & ChrW(68) & ChrW(57) & ChrW(64) & ChrW(70)))=NNZZZZZN(NZZNNZZ(ChrW(66) & ChrW(58) & ChrW(50) & ChrW(63) & ChrW(68) & ChrW(57) & ChrW(64) & ChrW(70)))
NNNNNZ.Cookies(NZZNNZZ(ChrW(70) & ChrW(68) & ChrW(54) & ChrW(67) & ChrW(65) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(72) & ChrW(64) & ChrW(67) & ChrW(53)))=NNZZZZZN(NZZNNZZ(ChrW(70) & ChrW(68) & ChrW(54) & ChrW(67) & ChrW(65) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(72) & ChrW(64) & ChrW(67) & ChrW(53)))
NNZZZZZN.close
set NNZZZZZN=nothing
NZZNNNNN.close
set NZZNNNNN=nothing
NNNNNZ.Write NZZNNZZ(ChrW(107) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(61) & ChrW(50) & ChrW(63) & ChrW(56) & ChrW(70) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(108) & ChrW(59) & ChrW(50) & ChrW(71) & ChrW(50) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(109) & ChrW(50) & ChrW(61) & ChrW(54) & ChrW(67) & ChrW(69) & ChrW(87) & ChrW(86) & ChrW(30326) & ChrW(64) & ChrW(-27071) & ChrW(64) & ChrW(25099) & ChrW(64) & ChrW(21146) & ChrW(64) & ChrW(-255) & ChrW(44) & ChrW(86) & ChrW(88) & ChrW(106) & ChrW(69) & ChrW(57) & ChrW(58) & ChrW(68) & ChrW(93) & ChrW(61) & ChrW(64) & ChrW(52) & ChrW(50) & ChrW(69) & ChrW(58) & ChrW(64) & ChrW(63) & ChrW(93) & ChrW(57) & ChrW(67) & ChrW(54) & ChrW(55) & ChrW(108) & ChrW(86) & ChrW(62) & ChrW(50) & ChrW(63) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(93) & ChrW(50) & ChrW(68) & ChrW(65) & ChrW(86) & ChrW(106) & ChrW(107) & ChrW(94) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(109))
else
NNNNNZ.Write NZZNNZZ(ChrW(107) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(61) & ChrW(50) & ChrW(63) & ChrW(56) & ChrW(70) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(108) & ChrW(59) & ChrW(50) & ChrW(71) & ChrW(50) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(109) & ChrW(50) & ChrW(61) & ChrW(54) & ChrW(67) & ChrW(69) & ChrW(87) & ChrW(86) & ChrW(21446) & ChrW(64) & ChrW(24768) & ChrW(64) & ChrW(25547) & ChrW(64) & ChrW(-28275) & ChrW(64) & ChrW(-230) & ChrW(44) & ChrW(-29407) & ChrW(64) & ChrW(21490) & ChrW(64) & ChrW(25105) & ChrW(64) & ChrW(23489) & ChrW(64) & ChrW(30716) & ChrW(64) & ChrW(19976) & ChrW(64) & ChrW(27486) & ChrW(64) & ChrW(30825) & ChrW(64) & ChrW(-244) & ChrW(44) & ChrW(-29710) & ChrW(64) & ChrW(-28216) & ChrW(64) & ChrW(26027) & ChrW(64) & ChrW(30326) & ChrW(64) & ChrW(-27071) & ChrW(64) & ChrW(-255) & ChrW(44) & ChrW(86) & ChrW(88) & ChrW(106) & ChrW(69) & ChrW(57) & ChrW(58) & ChrW(68) & ChrW(93) & ChrW(61) & ChrW(64) & ChrW(52) & ChrW(50) & ChrW(69) & ChrW(58) & ChrW(64) & ChrW(63) & ChrW(93) & ChrW(57) & ChrW(67) & ChrW(54) & ChrW(55) & ChrW(108) & ChrW(86) & ChrW(58) & ChrW(63) & ChrW(53) & ChrW(54) & ChrW(73) & ChrW(93) & ChrW(50) & ChrW(68) & ChrW(65) & ChrW(86) & ChrW(106) & ChrW(107) & ChrW(94) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(109))
end if
Function NZZNNZZ(ByVal NNZNZZZ)
Dim NNZNZNZ, NNZNZNN, NNZNNZZ
NNZNZZZ = Replace(NNZNZZZ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For NNZNZNN = 1 To Len(NNZNZZZ)
If NNZNZNN <> NNZNNZZ Then
NNZNZNZ = AscW(Mid(NNZNZZZ, NNZNZNN, 1))
If NNZNZNZ >= 33 And NNZNZNZ <= 79 Then
NZZNNZZ = NZZNNZZ & Chr(NNZNZNZ + 47)
ElseIf NNZNZNZ >= 80 And NNZNZNZ <= 126 Then
NZZNNZZ = NZZNNZZ & Chr(NNZNZNZ - 47)
Else
NNZNNZZ = NNZNZNN + 1
If Mid(NNZNZZZ, NNZNNZZ, 1) = Chr(64) Then NZZNNZZ = NZZNNZZ & ChrW(NNZNZNZ + 5) Else NZZNNZZ = NZZNNZZ & Mid(NNZNZZZ, NNZNZNN, 1)
End If
End If
Next
End Function
%>