<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CJJJJC, CJJJCJ,CJJJCC, CJJCJJ, CJJCJC:Set CJJJJC = server.CreateObject(CJJJCCCJ("ps~sq]r@??64E:@?")):CJJJJC.open Application(CJJJCCCJ("r@??64E:@?$EC:?8")):Set CJJJCJ=CJJJJC::Dim CJJCCJ,CJJCCC,CJCJJJ,CJCJJC,CJCJCJ,CJCJCC,CJCCJJ,CJCCJC,CJCCCJ:Dim CJCCCC,CCJJJJ,CCJJJC,CCJJCJ,CCJJCC,CCJCJJ:Dim CCJCJC,CCJCCJ,CCJCCC:Dim CCCJJJ:CCCJJJ=Trim(Request.Cookies(CJJJCCCJ("!$*|t|qt#"))):if CCCJJJ="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CJJCCJ>0 then CJJCJC=CJJJCCCJ("D6=64E ,E@A ,` ,:DD49@@=25>:?[:D4@?DF=E2?E[,C:89E.[EJA6[4FDE@>8C@FA[32=2?46[?F>36C[>@3:=6[>6>36C0EJA60A2E9[>6>36C0EJA60E@A[A9@E@[7246[286[C62=?2>6[EJA6?2>6[8C256 ,u#~| ,G0>6>36C ,H:E9 ,W?@=@40 then Call RedirectMessage(CJJJCCCJ("弬@寁@矼@,,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,")) Call SetMemberCookie(CJJCCJ,CJJCCC) End IF end if:Sub CheckRight(CJJJJJJJ):dim CCCJJC,CCCJCJ:if CJJCCJ=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJJJCCCJ("癶@彐@俜@恪@夬@敃@,,诲@釈@斫@癶@彐@。,")) elseIf not CCCJCCJ(CJJJJJJJ) then Call RedirectMessage(CJJJCCCJ("朾@陋@W") & CJJJJJJJ & CJJJCCCJ("X袦@祼@歝@,,诲@三@糶@绚@箜@琁@呓@聏@糶@。,")) end if:End Sub:Function CCCJCCJ(CJJJJJJJ):dim CCCJJC,CCCJCJ:CCCJCJ=split(CJJJJJJJ,CJJJCCCJ("[")):CCCJCCJ=False:for CCCJJC=0 to ubound(CCCJCJ):If Mid(CJCJJJ,CCCJCJ(CCCJJC),1)="1" then CCCJCCJ=True:exit function end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CJJJCCCJ("!$*|t|qt#"))="":CJJCCJ=0:CJCJCC=0:CJJCCC=Empty:CJCJCJ=0:CJCCJC=0:CJCCJJ=0:CJCJJC=0:CJCCCC=False:CCJCCJ=False:CCJCCC=Empty:End Sub:Sub CheckMemberCookie():dim CCCJCC,CCCCJJ,CCCJJC,CCCCJC,CCCCCJ:CCCJCC=split(CCCJJJ,CJJJCCCJ("]")):if ubound(CCCJCC)<>2 then Call ClearMemberCookie elseif not isnumeric(CCCJCC(0)) or len(CCCJCC(1))<>32 or len(CCCJCC(2))<>32 then Call ClearMemberCookie else CCCCJJ=CCCJCC(1):for CCCJJC=1 to len(CCCCJJ):CCCCJC=mid(CCCCJJ,CCCJJC,1):if isnumeric(CCCCJC) then CCCCCJ=CCCCCJ & CCCCJC if len(CCCCCJ)=7 then exit for next:CCCCJJ=CCCJCC(2):if CCCCCJ<>mid(CCCCJJ,6,7) then Call ClearMemberCookie else CCCCJC=mid(CCCCJJ,18,10)/2:if CCCCJC6"), CJJJCCCJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJJJCCCJ("kD4C:AE"), CJJJCCCJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJJJJJJ=new RegExp:CJJJJJJ.Pattern=CJJJCCCJ("@?W,2\K.ZXl"):CJJJJJJ.IgnoreCase = True:CJJJJJJ.Global=True:str=CJJJJJJ.Replace(str,CJJJCCCJ("@?S`U6BF2=Dj")):set CJJJJJJ=nothing:CCCJCCC=str End If:End Function::Const CCJJJJJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CJJCJJJJ,CJJCJJJC):dim CCCJCC:CCCJCC=CJJCJJJJ & "=" & CJJCJJJC & CJJJCCCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJJJCCCJ("$6E\r@@<:6"),CCCJCC):End Sub:::::::Function CCCCJJJ(CJCCCCC):if isnull(CJCCCCC) or trim(CJCCCCC)="" or not isnumeric(CJCCCCC) then CCCCJJJ=false else Dim CJJJJJJ:Set CJJJJJJ = New RegExp:CJJJJJJ.Pattern = CJJJCCCJ("/-5ZS"):CJJJJJJ.IgnoreCase = True:CCCCJJJ = CJJJJJJ.test(CJCCCCC):set CJJJJJJ=nothing end if:End Function:::sub Alert(ByVal CCCCJJC):Call ConnClose:CCCCJJC=replace(CCCCJJC,vbcrlf,CJJJCCCJ("-?")):CCCCJJC=replace(CCCCJJC,CJJJCCCJ("V"),CJJJCCCJ("-V")) response.Charset=CJJJCCCJ("FE7\g"):response.write CJJJCCCJ("kD4C:AEm2=6CEWV") & CCCCJJC & CJJJCCCJ("VXj9:DE@CJ]3246DD286]2DAI"):Response.End:End Sub:::::::Function CJJJJJJC(CJJCJJCJ,CJJJJJJJ,CJJCJJCC):dim str,CJJJJJC:CJJJJJC=Len(CJJCJJCJ & ""):CJJJJJJJ=Cint(CJJJJJJJ):if CJJJJJC 31 Then Err.Raise 6 End If:If (CJJCJCJC And CJJJJCC(31 - CJJCJCCJ)) Then CJJJJJCC = ((CJJCJCJC And CJJJJCJ(31 - (CJJCJCCJ + 1))) * CJJJJCC(CJJCJCCJ)) Or &H80000000 Else CJJJJJCC = ((CJJCJCJC And CJJJJCJ(31 - CJJCJCCJ)) * CJJJJCC(CJJCJCCJ)) End If:End Function:Private Function CJJJJCJJ(CJJCJCJC, CJJCJCCJ):If CJJCJCCJ = 0 Then CJJJJCJJ = CJJCJCJC:Exit Function ElseIf CJJCJCCJ = 31 Then If CJJCJCJC And &H80000000 Then CJJJJCJJ = 1 Else CJJJJCJJ = 0 End If:Exit Function ElseIf CJJCJCCJ < 0 Or CJJCJCCJ > 31 Then Err.Raise 6 End If:CJJJJCJJ = (CJJCJCJC And &H7FFFFFFE) \ CJJJJCC(CJJCJCCJ):If (CJJCJCJC And &H80000000) Then CJJJJCJJ = (CJJJJCJJ Or (&H40000000 \ CJJJJCC(CJJCJCCJ - 1))) End If:End Function:Private Function CJJJJCJC(CJJCJCJC, CJJCJCCJ):CJJJJCJC = CJJJJJCC(CJJCJCJC, CJJCJCCJ) Or CJJJJCJJ(CJJCJCJC, (32 - CJJCJCCJ)):End Function:Private Function CJJJJCCJ(CJJCJCCC, CJJCCJJJ):Dim CJJJCJJ:Dim CJJJCJC:Dim CJJJCCJ:Dim CJJJCCC:Dim CJJCJJJ:CJJJCCJ = CJJCJCCC And &H80000000:CJJJCCC = CJJCCJJJ And &H80000000:CJJJCJJ = CJJCJCCC And &H40000000:CJJJCJC = CJJCCJJJ And &H40000000:CJJCJJJ = (CJJCJCCC And &H3FFFFFFF) + (CJJCCJJJ And &H3FFFFFFF):If CJJJCJJ And CJJJCJC Then CJJCJJJ = CJJCJJJ Xor &H80000000 Xor CJJJCCJ Xor CJJJCCC ElseIf CJJJCJJ Or CJJJCJC Then If CJJCJJJ And &H40000000 Then CJJCJJJ = CJJCJJJ Xor &HC0000000 Xor CJJJCCJ Xor CJJJCCC Else CJJCJJJ = CJJCJJJ Xor &H40000000 Xor CJJJCCJ Xor CJJJCCC End If Else CJJCJJJ = CJJCJJJ Xor CJJJCCJ Xor CJJJCCC End If:CJJJJCCJ = CJJCJJJ:End Function:Private Function CJJJJCCC(CJCJJJC, CJJCCJJC, CJJCCJCJ):CJJJJCCC = (CJCJJJC And CJJCCJJC) Or ((Not CJCJJJC) And CJJCCJCJ):End Function:Private Function CJJJCJJJ(CJCJJJC, CJJCCJJC, CJJCCJCJ):CJJJCJJJ = (CJCJJJC And CJJCCJCJ) Or (CJJCCJJC And (Not CJJCCJCJ)):End Function:Private Function CJJJCJJC(CJCJJJC, CJJCCJJC, CJJCCJCJ):CJJJCJJC = (CJCJJJC Xor CJJCCJJC Xor CJJCCJCJ):End Function:Private Function CJJJCJCJ(CJCJJJC, CJJCCJJC, CJJCCJCJ):CJJJCJCJ = (CJJCCJJC Xor (CJCJJJC Or (Not CJJCCJCJ))):End Function:Private Sub md5_FF(CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC, CJJCCJCC, CJJCCCJJ):CJCJCCJ = CJJJJCCJ(CJCJCCJ, CJJJJCCJ(CJJJJCCJ(CJJJJCCC(CJCJCCC, CJCCJJJ, CJCCJJC), CJCJJJC), CJJCCCJJ)):CJCJCCJ = CJJJJCJC(CJCJCCJ, CJJCCJCC):CJCJCCJ = CJJJJCCJ(CJCJCCJ, CJCJCCC):End Sub:Private Sub md5_GG(CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC, CJJCCJCC, CJJCCCJJ):CJCJCCJ = CJJJJCCJ(CJCJCCJ, CJJJJCCJ(CJJJJCCJ(CJJJCJJJ(CJCJCCC, CJCCJJJ, CJCCJJC), CJCJJJC), CJJCCCJJ)):CJCJCCJ = CJJJJCJC(CJCJCCJ, CJJCCJCC):CJCJCCJ = CJJJJCCJ(CJCJCCJ, CJCJCCC):End Sub:Private Sub md5_HH(CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC, CJJCCJCC, CJJCCCJJ):CJCJCCJ = CJJJJCCJ(CJCJCCJ, CJJJJCCJ(CJJJJCCJ(CJJJCJJC(CJCJCCC, CJCCJJJ, CJCCJJC), CJCJJJC), CJJCCCJJ)):CJCJCCJ = CJJJJCJC(CJCJCCJ, CJJCCJCC):CJCJCCJ = CJJJJCCJ(CJCJCCJ, CJCJCCC):End Sub:Private Sub md5_II(CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC, CJJCCJCC, CJJCCCJJ):CJCJCCJ = CJJJJCCJ(CJCJCCJ, CJJJJCCJ(CJJJJCCJ(CJJJCJCJ(CJCJCCC, CJCCJJJ, CJCCJJC), CJCJJJC), CJJCCCJJ)):CJCJCCJ = CJJJJCJC(CJCJCCJ, CJJCCJCC):CJCJCCJ = CJJJJCCJ(CJCJCCJ, CJCJCCC):End Sub:Private Function CJJJCJCC(CJJCCCJC):Dim CJJCJJC:Dim CJJCJCJ:Dim CJJCJCC():Dim CJJCCJJ:Dim CJJCCJC:Dim CJJCCCJ:Const CCJJCJJ =512:Const CCJJCJC =448:CJJCJJC = Len(CJJCCCJC):CJJCJCJ = (((CJJCJJC + ((CCJJCJJ - CCJJCJC) \ CCJJJJC)) \ (CCJJCJJ \ CCJJJJC)) + 1) * (CCJJCJJ \ CCJJJCC):ReDim CJJCJCC(CJJCJCJ - 1):CJJCCJJ = 0:CJJCCJC = 0:Do Until CJJCCJC >= CJJCJJC:CJJCCCJ = CJJCCJC \ CCJJJCJ:CJJCCJJ = (CJJCCJC Mod CCJJJCJ) * CCJJJJC:CJJCJCC(CJJCCCJ) = CJJCJCC(CJJCCCJ) Or CJJJJJCC(Asc(Mid(CJJCCCJC, CJJCCJC + 1, 1)), CJJCCJJ):CJJCCJC = CJJCCJC + 1:Loop:CJJCCCJ = CJJCCJC \ CCJJJCJ:CJJCCJJ = (CJJCCJC Mod CCJJJCJ) * CCJJJJC:CJJCJCC(CJJCCCJ) = CJJCJCC(CJJCCCJ) Or CJJJJJCC(&H80, CJJCCJJ):CJJCJCC(CJJCJCJ - 2) = CJJJJJCC(CJJCJJC, 3):CJJCJCC(CJJCJCJ - 1) = CJJJJCJJ(CJJCJJC, 29):CJJJCJCC = CJJCJCC:End Function:Private Function CJJJCCJJ(CJJCJCJC):Dim CJJCCCC:Dim CJCJJJJ:For CJCJJJJ = 0 To 3:CJJCCCC = CJJJJCJJ(CJJCJCJC, CJCJJJJ * CCJJJJC) And CJJJJCJ(CCJJJJC - 1):CJJJCCJJ = CJJJCCJJ & Right("0" & Hex(CJJCCCC), 2):Next:End Function:Public Function CJJJCCJC(CJJCCCJC):CJJJJCJ(0) = CLng(1):CJJJJCJ(1) = CLng(3):CJJJJCJ(2) = CLng(7):CJJJJCJ(3) = CLng(15):CJJJJCJ(4) = CLng(31):CJJJJCJ(5) = CLng(63):CJJJJCJ(6) = CLng(127):CJJJJCJ(7) = CLng(255):CJJJJCJ(8) = CLng(511):CJJJJCJ(9) = CLng(1023):CJJJJCJ(10) = CLng(2047):CJJJJCJ(11) = CLng(4095):CJJJJCJ(12) = CLng(8191):CJJJJCJ(13) = CLng(16383):CJJJJCJ(14) = CLng(32767):CJJJJCJ(15) = CLng(65535):CJJJJCJ(16) = CLng(131071):CJJJJCJ(17) = CLng(262143):CJJJJCJ(18) = CLng(524287):CJJJJCJ(19) = CLng(1048575):CJJJJCJ(20) = CLng(2097151):CJJJJCJ(21) = CLng(4194303):CJJJJCJ(22) = CLng(8388607):CJJJJCJ(23) = CLng(16777215):CJJJJCJ(24) = CLng(33554431):CJJJJCJ(25) = CLng(67108863):CJJJJCJ(26) = CLng(134217727):CJJJJCJ(27) = CLng(268435455):CJJJJCJ(28) = CLng(536870911):CJJJJCJ(29) = CLng(1073741823):CJJJJCJ(30) = CLng(2147483647):CJJJJCC(0) = CLng(1):CJJJJCC(1) = CLng(2):CJJJJCC(2) = CLng(4):CJJJJCC(3) = CLng(8):CJJJJCC(4) = CLng(16):CJJJJCC(5) = CLng(32):CJJJJCC(6) = CLng(64):CJJJJCC(7) = CLng(128):CJJJJCC(8) = CLng(256):CJJJJCC(9) = CLng(512):CJJJJCC(10) = CLng(1024):CJJJJCC(11) = CLng(2048):CJJJJCC(12) = CLng(4096):CJJJJCC(13) = CLng(8192):CJJJJCC(14) = CLng(16384):CJJJJCC(15) = CLng(32768):CJJJJCC(16) = CLng(65536):CJJJJCC(17) = CLng(131072):CJJJJCC(18) = CLng(262144):CJJJJCC(19) = CLng(524288):CJJJJCC(20) = CLng(1048576):CJJJJCC(21) = CLng(2097152):CJJJJCC(22) = CLng(4194304):CJJJJCC(23) = CLng(8388608):CJJJJCC(24) = CLng(16777216):CJJJJCC(25) = CLng(33554432):CJJJJCC(26) = CLng(67108864):CJJJJCC(27) = CLng(134217728):CJJJJCC(28) = CLng(268435456):CJJJJCC(29) = CLng(536870912):CJJJJCC(30) = CLng(1073741824):Dim CJCJJJC:Dim CCCCCJ:Dim CJCJJCJ:Dim CJCJJCC:Dim CJCJCJJ:Dim CJCJCJC:Dim CJCJCCJ:Dim CJCJCCC:Dim CJCCJJJ:Dim CJCCJJC:Const CCJJCCJ =7:Const CCJJCCC =12:Const CCJCJJJ =17:Const CCJCJJC =22:Const CCJCJCJ =5:Const CCJCJCC =9:Const CCJCCJJ =14:Const CCJCCJC =20:Const CCJCCCJ =4:Const CCJCCCC =11:Const CCCJJJJ =16:Const CCCJJJC =23:Const CCCJJCJ =6:Const CCCJJCC =10:Const CCCJCJJ =15:Const CCCJCJC =21:CJCJJJC = CJJJCJCC(CJJCCCJC):CJCJCCJ = &H67452301:CJCJCCC = &HEFCDAB89:CJCCJJJ = &H98BADCFE:CJCCJJC = &H10325476:For CCCCCJ = 0 To UBound(CJCJJJC) Step 16:CJCJJCJ = CJCJCCJ:CJCJJCC = CJCJCCC:CJCJCJJ = CJCCJJJ:CJCJCJC = CJCCJJC:md5_FF CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 0), CCJJCCJ, &HD76AA478:md5_FF CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 1), CCJJCCC, &HE8C7B756:md5_FF CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 2), CCJCJJJ, &H242070DB:md5_FF CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 3), CCJCJJC, &HC1BDCEEE:md5_FF CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 4), CCJJCCJ, &HF57C0FAF:md5_FF CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 5), CCJJCCC, &H4787C62A:md5_FF CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 6), CCJCJJJ, &HA8304613:md5_FF CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 7), CCJCJJC, &HFD469501:md5_FF CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 8), CCJJCCJ, &H698098D8:md5_FF CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 9), CCJJCCC, &H8B44F7AF:md5_FF CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 10), CCJCJJJ, &HFFFF5BB1:md5_FF CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 11), CCJCJJC, &H895CD7BE:md5_FF CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 12), CCJJCCJ, &H6B901122:md5_FF CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 13), CCJJCCC, &HFD987193:md5_FF CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 14), CCJCJJJ, &HA679438E:md5_FF CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 15), CCJCJJC, &H49B40821:md5_GG CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 1), CCJCJCJ, &HF61E2562:md5_GG CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 6), CCJCJCC, &HC040B340:md5_GG CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 11), CCJCCJJ, &H265E5A51:md5_GG CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 0), CCJCCJC, &HE9B6C7AA:md5_GG CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 5), CCJCJCJ, &HD62F105D:md5_GG CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 10), CCJCJCC, &H2441453:md5_GG CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 15), CCJCCJJ, &HD8A1E681:md5_GG CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 4), CCJCCJC, &HE7D3FBC8:md5_GG CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 9), CCJCJCJ, &H21E1CDE6:md5_GG CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 14), CCJCJCC, &HC33707D6:md5_GG CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 3), CCJCCJJ, &HF4D50D87:md5_GG CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 8), CCJCCJC, &H455A14ED:md5_GG CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 13), CCJCJCJ, &HA9E3E905:md5_GG CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 2), CCJCJCC, &HFCEFA3F8:md5_GG CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 7), CCJCCJJ, &H676F02D9:md5_GG CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 12), CCJCCJC, &H8D2A4C8A:md5_HH CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 5), CCJCCCJ, &HFFFA3942:md5_HH CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 8), CCJCCCC, &H8771F681:md5_HH CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 11), CCCJJJJ, &H6D9D6122:md5_HH CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 14), CCCJJJC, &HFDE5380C:md5_HH CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 1), CCJCCCJ, &HA4BEEA44:md5_HH CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 4), CCJCCCC, &H4BDECFA9:md5_HH CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 7), CCCJJJJ, &HF6BB4B60:md5_HH CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 10), CCCJJJC, &HBEBFBC70:md5_HH CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 13), CCJCCCJ, &H289B7EC6:md5_HH CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 0), CCJCCCC, &HEAA127FA:md5_HH CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 3), CCCJJJJ, &HD4EF3085:md5_HH CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 6), CCCJJJC, &H4881D05:md5_HH CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 9), CCJCCCJ, &HD9D4D039:md5_HH CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 12), CCJCCCC, &HE6DB99E5:md5_HH CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 15), CCCJJJJ, &H1FA27CF8:md5_HH CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 2), CCCJJJC, &HC4AC5665:md5_II CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 0), CCCJJCJ, &HF4292244:md5_II CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 7), CCCJJCC, &H432AFF97:md5_II CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 14), CCCJCJJ, &HAB9423A7:md5_II CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 5), CCCJCJC, &HFC93A039:md5_II CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 12), CCCJJCJ, &H655B59C3:md5_II CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 3), CCCJJCC, &H8F0CCC92:md5_II CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 10), CCCJCJJ, &HFFEFF47D:md5_II CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 1), CCCJCJC, &H85845DD1:md5_II CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 8), CCCJJCJ, &H6FA87E4F:md5_II CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 15), CCCJJCC, &HFE2CE6E0:md5_II CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 6), CCCJCJJ, &HA3014314:md5_II CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 13), CCCJCJC, &H4E0811A1:md5_II CJCJCCJ, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJJC(CCCCCJ + 4), CCCJJCJ, &HF7537E82:md5_II CJCCJJC, CJCJCCJ, CJCJCCC, CJCCJJJ, CJCJJJC(CCCCCJ + 11), CCCJJCC, &HBD3AF235:md5_II CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJCCC, CJCJJJC(CCCCCJ + 2), CCCJCJJ, &H2AD7D2BB:md5_II CJCJCCC, CJCCJJJ, CJCCJJC, CJCJCCJ, CJCJJJC(CCCCCJ + 9), CCCJCJC, &HEB86D391:CJCJCCJ = CJJJJCCJ(CJCJCCJ, CJCJJCJ):CJCJCCC = CJJJJCCJ(CJCJCCC, CJCJJCC):CJCCJJJ = CJJJJCCJ(CJCCJJJ, CJCJCJJ):CJCCJJC = CJJJJCCJ(CJCCJJC, CJCJCJC):Next:CJJJCCJC = LCase(CJJJCCJJ(CJCJCCJ) & CJJJCCJJ(CJCJCCC) & CJJJCCJJ(CJCCJJJ) & CJJJCCJJ(CJCCJJC)):End Function::Call CheckRight(49):dim CJCCJCJ,CCCJJC,CJCCJCC:CJCCJCJ=Request.QueryString(CJJJCCCJ("24E")):CJCCJCC=Request.QueryString(CJJJCCCJ(":5")):if CJCCJCJ=CJJJCCCJ("42?46=") and CCCCJJJ(CJCCJCC) then set CJJJCC=CJJJJC.execute(CJJJCCCJ("D6=64E ,E@A ,` ,EJA6[,C:89E. ,7C@> ,>6>36C ,H96C6 ,:5l") & CJCCJCC):if CJJJCC(0)=CJCJJC then CJJJJC.execute(CJJJCCCJ("FA52E6 ,>6>36C ,D6E ,EJA6lc[,C:89E.lV") & CJJJJJJC(CJJJCC(1),5,0) & CJJJCCCJ("V ,H96C6 ,:5l") & CJCCJCC) end if:If Request.ServerVariables(CJJJCCCJ("#t""&t$%0|t%w~s"))=CJJJCCCJ("!~$%") then dim CJCCCJJ,CJCCCJC:CJCCCJJ=CCCJCCC(Request.Form(CJJJCCCJ("E6IE7:6=5"))):CJCCCJC=CJJJCCJC(Request.Form(CJJJCCCJ("E6IE7:6=5a"))):if CCCCJJJ(CJCCCJJ) then CJJCJC=CJJJCCCJ("D6=64E ,E@A ,` ,EJA6[,C:89E.[:5 ,7C@> ,>6>36C ,H96C6 ,:5l") & CJCCCJJ & CJJJCCCJ(" ,2?5 ,A2DDH@C5lV") & CJCCCJC & CJJJCCCJ("V") else CJJCJC=CJJJCCCJ("D6=64E ,E@A ,` ,EJA6[,C:89E.[:5 ,7C@> ,>6>36C ,H96C6 ,FD6C?2>6lV") & CJCCCJJ & CJJJCCCJ("V ,2?5 ,A2DDH@C5lV") & CJCCCJC & CJJJCCCJ("V") end if:set CJJJCC=CJJJJC.execute(CJJCJC):if CJJJCC.eof then Call Alert(CJJJCCCJ("患@辎@兠@癿@伕@呓@缑@史@、,癶@彐@合@秫@我@耀@癶@彐@寁@矼@丈@歞@硩@!,")) elseif CJJJCC(0)=CJCJJC then Call Alert(CJJJCCCJ("患@辎@兠@癿@伕@呓@巭@绊@昪@箜@琁@呓@亁@,,丈@産@冈@淶@力@!,")) else CJJJJC.execute(CJJJCCCJ("FA52E6 ,>6>36C ,D6E ,EJA6l") & CJCJJC & CJJJCCCJ("[,C:89E.lV") & CJJJJJJC(CJJJCC(1),5,1) & CJJJCCCJ("V ,H96C6 ,:5l") & CJJJCC(2)) end if End If:Response.Write(vbCrLf):Response.Write(CJJJCCCJ("kP5@4EJA6 ,9E>=m") & vbCrLf):Response.Write(CJJJCCCJ("k9E>=m") & vbCrLf):Response.Write(CJJJCCCJ("k9625m") & vbCrLf):Response.Write(CJJJCCCJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJJJCCCJ("kE:E=6m旛@栂@颓@斂@桞@k^E:E=6m") & vbCrLf):Response.Write(CJJJCCCJ("k=:?< ,9C67lQDEJ=6]4DDQ ,C6=lQDEJ=6D966EQm") & vbCrLf):Response.Write(CJJJCCCJ("k^9625m") & vbCrLf):Response.Write(CJJJCCCJ("k3@5Jm") & vbCrLf):Response.Write(CJJJCCCJ("k7@C> ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQm") & vbCrLf):Response.Write(CJJJCCCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJJJCCCJ(" ,k=686?5m箜@琁@呓@划@衣@k^=686?5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE23=6 ,4=2DDlQE30=:DEQm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE9m床@k^E9m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE9m伕@呓@缑@史@WxsXk^E9m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE9m癶@彐@合@k^E9m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE9m眚@宙@姎@合@k^E9m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE9m昰@秫@k^E9m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE9m曻@吉@癶@彐@k^E9m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE9m擈@佗@k^E9m") & vbCrLf):Response.Write(CJJJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,")):set CJJJCC=CJJJJC.execute(CJJJCCCJ("D6=64E ,:5[FD6C?2>6[?:46[=2DEE:>6[=2DE:A[C62=?2>6 ,7C@> ,>6>36C ,H96C6 ,DE2E6ld ,2?5 ,:5m` ,2?5 ,EJA6l") & CJCJJC & CJJJCCCJ(" ,@C56C ,3J ,=2DEE:>6")):CCCJJC=1:while not CJJJCC.eof:CJCCJCC=CJJJCC(0):Response.Write(vbCrLf):Response.Write(CJJJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write CCCJJC:Response.Write(CJJJCCCJ("k^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5m")):Response.Write CJCCJCC:Response.Write(CJJJCCCJ("k^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5m")):Response.Write CJJJCC(1):Response.Write(CJJJCCCJ("k^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5m")):Response.Write CJJJCC(5):Response.Write(CJJJCCCJ("k^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5m")):Response.Write CJJJCC(2):Response.Write(CJJJCCCJ("k^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5 ,4=2DDlQ7E`_Qm")):Response.Write CJJJJJCJ(CJJJCC(4)):Response.Write(CJJJCCCJ(" ,M ,")):Response.Write CJJJCC(3):Response.Write(CJJJCCCJ("k^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5 ,2=:8?lQC:89EQmk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,cg_[ab_.Q ,9C67lQ25>:?C:89E]2DAn:5l")):Response.Write CJCCJCC:Response.Write(CJJJCCCJ("Qm讹@罩@朾@陋@k^2m ,k2 ,9C67lQn24El42?46=U:5l")):Response.Write CJCCJCC:Response.Write(CJJJCCCJ("Q ,@?r=:4WV患@昪@眚@癿@襼@发@涃@诠@戋@呓@癿@箜@琁@呓@朾@陋@吒@?,VXQ ,E:E=6lQ发@涃@箜@琁@呓@朾@陋@Qm发@涃@k^2mk^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,")):CJJJCC.movenext:CCCJJC=CCCJJC+1:wend:Response.Write(vbCrLf):Response.Write(CJJJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5 ,4@=DA2?lQfQ ,2=:8?lQC:89EQmk2 ,9C67lQ;2G2D4C:AEijQ ,:5lQ255:EQm淶@力@k^2mk^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCCCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJJJCCCJ("k^7@C>m") & vbCrLf):Response.Write(CJJJCCCJ("k7@C> ,?2>6lQ7@C>aQ ,>6E9@5lQA@DEQ ,24E:@?lQQ ,:5lQ25>:?0255Q ,DEJ=6lQ5:DA=2Ji?@?6Qm") & vbCrLf):Response.Write(CJJJCCCJ(" ,k:?AFE ,?2>6lQE6IE7:6=5Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQm") & vbCrLf):Response.Write(CJJJCCCJ(" ,(,塦@冔@伕@呓@缑@史@WxsX我@耀@癶@彐@合@秫@),k3Cm") & vbCrLf):Response.Write(CJJJCCCJ(" ,k:?AFE ,?2>6lQE6IE7:6=5aQ ,EJA6lQA2DDH@C5Q ,4=2DDlQE6IEQ ,2FE@4@>A=6E6lQ@77Qm") & vbCrLf):Response.Write(CJJJCCCJ(" ,(,塦@冔@癶@彐@寁@矼@),k3Cm") & vbCrLf):Response.Write(CJJJCCCJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,4=2DDlQ3FEE@?Q ,G2=F6lQ揋@ ,亟@Qm") & vbCrLf):Response.Write(CJJJCCCJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,4=2DDlQ3FEE@?Q ,G2=F6lQ发@ ,涃@Q ,@?r=:4m") & vbCrLf):Response.Write(CJJJCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]KII3@I];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E23=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCJ("kD4C:AEm") & vbCrLf):Response.Write(CJJJCCCJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCCCJ(" ,SWVR255:EVX]@?WV4=:4:?0255VX]KII3@IWLE:E=6iV淶@力@箜@琁@呓@V[H:5E9id__NXNX") & vbCrLf):Response.Write(CJJJCCCJ(" ,SWVE23=6]E30=:DEVX];%23=6WX") & vbCrLf):Response.Write(CJJJCCCJ("NX") & vbCrLf):Response.Write(CJJJCCCJ("k^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCJ("k^3@5Jm") & vbCrLf):Response.Write(CJJJCCCJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CCCCJCJ=nothing:set CCCCJCC=nothing:set CCCCCJJ=nothing:set CCCCCJC=nothing:CJJCJJ.Close:Set CJJCJJ=Nothing:CJJJCC.Close:Set CJJJCC=Nothing:CJJJJC.Close:Set CJJJJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJJJCCCJ(ByVal CJCCJJJ) Dim CJCCCCJ, CCCJJC, CJCCCCC CJCCJJJ = Replace(CJCCJJJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CCCJJC = 1 To Len(CJCCJJJ) If CCCJJC <> CJCCCCC Then CJCCCCJ = AscW(Mid(CJCCJJJ, CCCJJC, 1)) If CJCCCCJ >= 33 And CJCCCCJ <= 79 Then CJJJCCCJ = CJJJCCCJ & Chr(CJCCCCJ + 47) ElseIf CJCCCCJ >= 80 And CJCCCCJ <= 126 Then CJJJCCCJ = CJJJCCCJ & Chr(CJCCCCJ - 47) Else CJCCCCC = CCCJJC + 1 If Mid(CJCCJJJ, CJCCCCC, 1) = Chr(64) Then CJJJCCCJ = CJJJCCCJ & ChrW(CJCCCCJ + 5) Else CJJJCCCJ = CJJJCCCJ & Mid(CJCCJJJ, CCCJJC, 1) End If End If Next End Function %>