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

Dim NZZZZN,NZZZNZ,NZZZNN,NZZNZZ,NZZNZN
Set NZZZNN=Response:Set NZZZNZ=Request:Set NZZNZN=Session:Set NZZZZN=Application:Set NZZNZZ=Server
NZZZNN.Write(NZZNNZ(ChrW(107) & ChrW(62) & ChrW(54) & ChrW(69) & ChrW(50) & ChrW(32) & ChrW(44) & ChrW(57) & ChrW(69) & ChrW(69) & ChrW(65) & ChrW(92) & ChrW(54) & ChrW(66) & ChrW(70) & ChrW(58) & ChrW(71) & ChrW(108) & ChrW(81) & ChrW(114) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(92) & ChrW(37) & ChrW(74) & ChrW(65) & ChrW(54) & ChrW(81) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(108) & ChrW(81) & ChrW(69) & ChrW(54) & ChrW(73) & ChrW(69) & ChrW(94) & ChrW(57) & ChrW(69) & ChrW(62) & ChrW(61) & ChrW(106) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(57) & ChrW(50) & ChrW(67) & ChrW(68) & ChrW(54) & ChrW(69) & ChrW(108) & ChrW(56) & ChrW(51) & ChrW(97) & ChrW(98) & ChrW(96) & ChrW(97) & ChrW(81) & ChrW(109)) & vbCrLf)
NZZZNN.Cookies(NZZNNZ(ChrW(70) & ChrW(68) & ChrW(54) & ChrW(67) & ChrW(63) & ChrW(50) & ChrW(62) & ChrW(54)))=""
NZZZNN.Cookies(NZZNNZ(ChrW(58) & ChrW(53)))=""
NZZZNN.Cookies(NZZNNZ(ChrW(66) & ChrW(73)))=""
NZZZNN.Write NZZNNZ(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(25099) & ChrW(64) & ChrW(21146) & ChrW(64) & ChrW(-28677) & ChrW(64) & ChrW(20981) & ChrW(64) & ChrW(-255) & ChrW(44) & ChrW(86) & ChrW(88) & ChrW(106) & ChrW(72) & ChrW(58) & ChrW(63) & ChrW(53) & ChrW(64) & ChrW(72) & 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))&NZZZNZ.serverVariables(NZZNNZ(ChrW(119) & ChrW(37) & ChrW(37) & ChrW(33) & ChrW(48) & ChrW(35) & ChrW(116) & ChrW(117) & ChrW(116) & ChrW(35) & ChrW(116) & ChrW(35)))&NZZNNZ(ChrW(86) & ChrW(106) & ChrW(107) & ChrW(94) & ChrW(68) & ChrW(52) & ChrW(67) & ChrW(58) & ChrW(65) & ChrW(69) & ChrW(109))
Function NZZNNZ(ByVal NZNZNZ)
Dim NZZNNN, NZNZZZ, NZNZZN
NZNZNZ = Replace(NZNZNZ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For NZNZZZ = 1 To Len(NZNZNZ)
If NZNZZZ <> NZNZZN Then
NZZNNN = AscW(Mid(NZNZNZ, NZNZZZ, 1))
If NZZNNN >= 33 And NZZNNN <= 79 Then
NZZNNZ = NZZNNZ & Chr(NZZNNN + 47)
ElseIf NZZNNN >= 80 And NZZNNN <= 126 Then
NZZNNZ = NZZNNZ & Chr(NZZNNN - 47)
Else
NZNZZN = NZNZZZ + 1
If Mid(NZNZNZ, NZNZZN, 1) = Chr(64) Then NZZNNZ = NZZNNZ & ChrW(NZZNNN + 5) Else NZZNNZ = NZZNNZ & Mid(NZNZNZ, NZNZZZ, 1)
End If
End If
Next
End Function
%>