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

Dim NNZNN,NNNZZ,NNNZN,NNNNZ,NNNNN
Set NNNZN=Response:Set NNNZZ=Request:Set NNNNN=Session:Set NNZNN=Application:Set NNNNZ=Server
call NZZZZN(NZNNZZ,maxpage,NZNNNZ,NZZZZZ(ChrW(51) & ChrW(64) & ChrW(67) & ChrW(53) & ChrW(54) & ChrW(67) & ChrW(108) & ChrW(95) & ChrW(32) & ChrW(44) & ChrW(50) & ChrW(61) & ChrW(58) & ChrW(56) & ChrW(63) & ChrW(108) & ChrW(52) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(54) & ChrW(67)),NZZZZZ(ChrW(107) & ChrW(65) & ChrW(32) & ChrW(44) & ChrW(50) & ChrW(61) & ChrW(58) & ChrW(56) & ChrW(63) & ChrW(108) & ChrW(52) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(54) & ChrW(67) & ChrW(109)))
end if
NZNZZN.close
set NZNZZN=nothing
Sub NZZZZN(NZNNZZ,NZNNZN,NZNNNZ,NZNNNN,NNZZZZ)
Dim NZZZNZ, NZZZNN, NZZNZZ, NZZNZN
NZNZNZ = NZZZZZ(ChrW(57) & ChrW(69) & ChrW(69) & ChrW(65) & ChrW(105) & ChrW(94) & ChrW(94)) & NNNZZ.ServerVariables(NZZZZZ(ChrW(119) & ChrW(37) & ChrW(37) & ChrW(33) & ChrW(48) & ChrW(119) & ChrW(126) & ChrW(36) & ChrW(37))) & NNNZZ.ServerVariables(NZZZZZ(ChrW(36) & ChrW(114) & ChrW(35) & ChrW(120) & ChrW(33) & ChrW(37) & ChrW(48) & ChrW(125) & ChrW(112) & ChrW(124) & ChrW(116)))
NZZZNZ = Split(NNNZZ.ServerVariables(NZZZZZ(ChrW(34) & ChrW(38) & ChrW(116) & ChrW(35) & ChrW(42) & ChrW(48) & ChrW(36) & ChrW(37) & ChrW(35) & ChrW(120) & ChrW(125) & ChrW(118))), NZZZZZ(ChrW(85)))
For Each NZZNZZ In NZZZNZ
NZZZNN = Split(NZZNZZ, NZZZZZ(ChrW(108)))
If StrComp(NZZZNN(0), NZZZZZ(ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54)), vbTextCompare) <> 0 Then
NZZNZN = NZZNZN & NZZZNN(0) & NZZZZZ(ChrW(108)) & NZZZNN(1) & NZZZZZ(ChrW(85))
End If
Next
NNNZN.Write(NZZZZZ(ChrW(107) & ChrW(69) & ChrW(50) & ChrW(51) & ChrW(61) & ChrW(54) & ChrW(32) & ChrW(44)) & NZNNNN & NZZZZZ(ChrW(109)) & vbCrLf )
NNNZN.Write(NZZZZZ(ChrW(107) & ChrW(55) & ChrW(64) & ChrW(67) & ChrW(62) & ChrW(32) & ChrW(44) & ChrW(62) & ChrW(54) & ChrW(69) & ChrW(57) & ChrW(64) & ChrW(53) & ChrW(108) & ChrW(56) & ChrW(54) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(64) & ChrW(63) & ChrW(68) & ChrW(70) & ChrW(51) & ChrW(62) & ChrW(58) & ChrW(69) & ChrW(108) & ChrW(81) & ChrW(53) & ChrW(64) & ChrW(52) & ChrW(70) & ChrW(62) & ChrW(54) & ChrW(63) & ChrW(69) & ChrW(93) & ChrW(61) & ChrW(64) & ChrW(52) & ChrW(50) & ChrW(69) & ChrW(58) & ChrW(64) & ChrW(63) & ChrW(32) & ChrW(44) & ChrW(108) & ChrW(32) & ChrW(44) & ChrW(86)) & NZNZNZ & NZZZZZ(ChrW(110)) & NZZNZN & NZZZZZ(ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(108) & ChrW(86) & ChrW(90) & ChrW(32) & ChrW(44) & ChrW(69) & ChrW(57) & ChrW(58) & ChrW(68) & ChrW(93) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(93) & ChrW(71) & ChrW(50) & ChrW(61) & ChrW(70) & ChrW(54) & ChrW(106) & ChrW(67) & ChrW(54) & ChrW(69) & ChrW(70) & ChrW(67) & ChrW(63) & ChrW(32) & ChrW(44) & ChrW(55) & ChrW(50) & ChrW(61) & ChrW(68) & ChrW(54) & ChrW(106) & ChrW(81) & ChrW(109) & ChrW(107) & ChrW(37) & ChrW(35) & ChrW(109)) & vbCrLf )
NNNZN.Write(NZZZZZ(ChrW(107) & ChrW(37) & ChrW(115) & ChrW(32) & ChrW(44) & ChrW(50) & ChrW(61) & ChrW(58) & ChrW(56) & ChrW(63) & ChrW(108) & ChrW(67) & ChrW(58) & ChrW(56) & ChrW(57) & ChrW(69) & ChrW(109)) & vbCrLf )
NNNZN.Write(NNZZZZ & vbCrLf )
if NZNNNZ<=1 then
NNNZN.Write (NZZZZZ(ChrW(107) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(86) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(86) & ChrW(109) & ChrW(120) & ChrW(63) & ChrW(53) & ChrW(54) & ChrW(73) & ChrW(107) & ChrW(94) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(109)) & vbCrLf)
NNNZN.Write (NZZZZZ(ChrW(107) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(86) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(86) & ChrW(109) & ChrW(123) & ChrW(50) & ChrW(68) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(107) & ChrW(94) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(109)) & vbCrLf)
else
NNNZN.Write(NZZZZZ(ChrW(107) & ChrW(112) & ChrW(32) & ChrW(44) & ChrW(119) & ChrW(35) & ChrW(116) & ChrW(117) & ChrW(108)) & NZNZNZ & NZZZZZ(ChrW(110)) & NZZNZN & NZZZZZ(ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(108) & ChrW(96) & ChrW(109) & ChrW(107) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(86) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(86) & ChrW(120) & ChrW(63) & ChrW(53) & ChrW(54) & ChrW(73) & ChrW(107) & ChrW(94) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(109) & ChrW(107) & ChrW(94) & ChrW(112) & ChrW(109) & ChrW(32) & ChrW(44)) & vbCrLf)
NNNZN.Write(NZZZZZ(ChrW(107) & ChrW(112) & ChrW(32) & ChrW(44) & ChrW(119) & ChrW(35) & ChrW(116) & ChrW(117) & ChrW(108)) & NZNZNZ & NZZZZZ(ChrW(110)) & NZZNZN & NZZZZZ(ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(108)) & (NZNNNZ-1) & NZZZZZ(ChrW(109) & ChrW(107) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(86) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(86) & ChrW(109) & ChrW(123) & ChrW(50) & ChrW(68) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(107) & ChrW(94) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(109) & ChrW(107) & ChrW(94) & ChrW(112) & ChrW(109) & ChrW(32) & ChrW(44)) & vbCrLf)
end if
if NZNNNZ>=NZNNZN then
NNNZN.Write (NZZZZZ(ChrW(107) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(86) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(86) & ChrW(109) & ChrW(125) & ChrW(54) & ChrW(73) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(107) & ChrW(94) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(109)) & vbCrLf)
NNNZN.Write (NZZZZZ(ChrW(107) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(86) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(86) & ChrW(109) & ChrW(116) & ChrW(63) & ChrW(53) & ChrW(107) & ChrW(94) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(109)) & vbCrLf)
else
NNNZN.Write(NZZZZZ(ChrW(107) & ChrW(112) & ChrW(32) & ChrW(44) & ChrW(119) & ChrW(35) & ChrW(116) & ChrW(117) & ChrW(108)) & NZNZNZ & NZZZZZ(ChrW(110)) & NZZNZN & NZZZZZ(ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(108)) & (NZNNNZ+1) & NZZZZZ(ChrW(109) & ChrW(107) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(86) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(86) & ChrW(109) & ChrW(125) & ChrW(54) & ChrW(73) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(107) & ChrW(94) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(109) & ChrW(107) & ChrW(94) & ChrW(112) & ChrW(109) & ChrW(32) & ChrW(44)) & vbCrLf)
NNNZN.Write(NZZZZZ(ChrW(107) & ChrW(112) & ChrW(32) & ChrW(44) & ChrW(119) & ChrW(35) & ChrW(116) & ChrW(117) & ChrW(108)) & NZNZNZ & NZZZZZ(ChrW(110)) & NZZNZN & NZZZZZ(ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(108)) & NZNNZN & NZZZZZ(ChrW(109) & ChrW(107) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(86) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(86) & ChrW(109) & ChrW(116) & ChrW(63) & ChrW(53) & ChrW(107) & ChrW(94) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(109) & ChrW(107) & ChrW(94) & ChrW(112) & ChrW(109) & ChrW(32) & ChrW(44)) & vbCrLf)
end if
NNNZN.Write(NZZZZZ(ChrW(32) & ChrW(44) & ChrW(107) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(86) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(86) & ChrW(109) & ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(68) & ChrW(-230) & ChrW(44) & ChrW(85) & ChrW(63) & ChrW(51) & ChrW(68) & ChrW(65) & ChrW(106)) & NZNNNZ & NZZZZZ(ChrW(94)) & NZNNZN & NZZZZZ(ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54)) &  vbCrLf)
NNNZN.Write(NZZZZZ(ChrW(32) & ChrW(44) & ChrW(107) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(86) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(86) & ChrW(109) & ChrW(119) & ChrW(50) & ChrW(71) & ChrW(54) & ChrW(107) & ChrW(94) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(109)) & NZNNZZ & NZZZZZ(ChrW(123) & ChrW(58) & ChrW(68) & ChrW(69)) &  vbCrLf)
NNNZN.Write(NZZZZZ(ChrW(32) & ChrW(44) & ChrW(107) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(86) & ChrW(63) & ChrW(75) & ChrW(52) & ChrW(62) & ChrW(68) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(86) & ChrW(109) & ChrW(118) & ChrW(64) & ChrW(69) & ChrW(64) & ChrW(107) & ChrW(94) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(109)) & NZZZZZ(ChrW(107) & ChrW(120) & ChrW(125) & ChrW(33) & ChrW(38) & ChrW(37) & ChrW(32) & ChrW(44) & ChrW(37) & ChrW(42) & ChrW(116) & ChrW(33) & ChrW(108) & ChrW(37) & ChrW(116) & ChrW(41) & ChrW(37) & ChrW(32) & ChrW(44) & ChrW(125) & ChrW(112) & ChrW(124) & ChrW(116) & ChrW(108) & ChrW(65) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(32) & ChrW(44) & ChrW(36) & ChrW(120) & ChrW(43) & ChrW(116) & ChrW(108) & ChrW(96) & ChrW(32) & ChrW(44) & ChrW(124) & ChrW(50) & ChrW(73) & ChrW(61) & ChrW(54) & ChrW(63) & ChrW(56) & ChrW(69) & ChrW(57) & ChrW(108) & ChrW(100) & ChrW(32) & ChrW(44) & ChrW(39) & ChrW(112) & ChrW(123) & ChrW(38) & ChrW(116) & ChrW(108)) & NZNNNZ & NZZZZZ(ChrW(109)) & NZZZZZ(ChrW(33) & ChrW(50) & ChrW(56) & ChrW(54) & ChrW(68))  & vbCrLf & NZZZZZ(ChrW(107) & ChrW(120) & ChrW(125) & ChrW(33) & ChrW(38) & ChrW(37) & ChrW(32) & ChrW(44) & ChrW(69) & ChrW(74) & ChrW(65) & ChrW(54) & ChrW(108) & ChrW(68) & ChrW(70) & ChrW(51) & ChrW(62) & ChrW(58) & ChrW(69) & ChrW(32) & ChrW(44) & ChrW(68) & ChrW(69) & ChrW(74) & ChrW(61) & ChrW(54) & ChrW(108) & ChrW(81) & ChrW(55) & ChrW(64) & ChrW(63) & ChrW(69) & ChrW(92) & ChrW(68) & ChrW(58) & ChrW(75) & ChrW(54) & ChrW(105) & ChrW(32) & ChrW(44) & ChrW(104) & ChrW(65) & ChrW(69) & ChrW(81) & ChrW(32) & ChrW(44) & ChrW(71) & ChrW(50) & ChrW(61) & ChrW(70) & ChrW(54) & ChrW(108) & ChrW(118) & ChrW(126) & ChrW(32) & ChrW(44) & ChrW(52) & ChrW(61) & ChrW(50) & ChrW(68) & ChrW(68) & ChrW(108) & ChrW(51) & ChrW(97) & ChrW(109)))
NNNZN.Write(NZZZZZ(ChrW(107) & ChrW(94) & ChrW(37) & ChrW(115) & ChrW(109)) & vbCrLf )
NNNZN.Write(NZZZZZ(ChrW(107) & ChrW(94) & ChrW(37) & ChrW(35) & ChrW(109) & ChrW(107) & ChrW(94) & ChrW(55) & ChrW(64) & ChrW(67) & ChrW(62) & ChrW(109)) & vbCrLf )
NNNZN.Write(NZZZZZ(ChrW(107) & ChrW(94) & ChrW(69) & ChrW(50) & ChrW(51) & ChrW(61) & ChrW(54) & ChrW(109)) & vbCrLf )
End Sub
Function NZZZZZ(ByVal NZNZNN)
Dim NZZNNZ, NZZNNN, NZNZZZ
NZNZNN = Replace(NZNZNN, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For NZZNNN = 1 To Len(NZNZNN)
If NZZNNN <> NZNZZZ Then
NZZNNZ = AscW(Mid(NZNZNN, NZZNNN, 1))
If NZZNNZ >= 33 And NZZNNZ <= 79 Then
NZZZZZ = NZZZZZ & Chr(NZZNNZ + 47)
ElseIf NZZNNZ >= 80 And NZZNNZ <= 126 Then
NZZZZZ = NZZZZZ & Chr(NZZNNZ - 47)
Else
NZNZZZ = NZZNNN + 1
If Mid(NZNZNN, NZNZZZ, 1) = Chr(64) Then NZZZZZ = NZZZZZ & ChrW(NZZNNZ + 5) Else NZZZZZ = NZZZZZ & Mid(NZNZNN, NZZNNN, 1)
End If
End If
Next
End Function
%>