<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCJJJJ, CCJJJC,CCJJCJ, CCJJCC, CCJCJJ:Set CCJJJJ = server.CreateObject(CJJCCCCJ("ps~sq]r@??64E:@?")):CCJJJJ.open Application(CJJCCCCJ("r@??64E:@?$EC:?8")):Set CCJJJC=CCJJJJ::Dim CCJCJC,CCJCCJ,CCJCCC,CCCJJJ,CCCJJC,CCCJCJ,CCCJCC,CCCCJJ,CCCCJC:Dim CCCCCJ,CCCCCC,CJJJJJJ,CJJJJJC,CJJJJCJ,CJJJJCC:Dim CJJJCJJ,CJJJCJC,CJJJCCJ:Dim CJJJCCC:CJJJCCC=Trim(Request.Cookies(CJJCCCCJ("!$*|t|qt#"))):if CJJJCCC="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CCJCJC>0 then CCJCJJ=CJJCCCCJ("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(CJJCCCCJ("弬@寁@矼@,,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,")) Call SetMemberCookie(CCJCJC,CCJCCJ) End IF end if:Sub CheckRight(CJJCCCCC):dim CJJCJJJ,CJJCJJC:if CCJCJC=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJJCCCCJ("癶@彐@俜@恪@夬@敃@,,诲@釈@斫@癶@彐@。,")) elseIf not CJJJCJCJ(CJJCCCCC) then Call RedirectMessage(CJJCCCCJ("朾@陋@W") & CJJCCCCC & CJJCCCCJ("X袦@祼@歝@,,诲@三@糶@绚@箜@琁@呓@聏@糶@。,")) end if:End Sub:Function CJJJCJCJ(CJJCCCCC):dim CJJCJJJ,CJJCJJC:CJJCJJC=split(CJJCCCCC,CJJCCCCJ("[")):CJJJCJCJ=False:for CJJCJJJ=0 to ubound(CJJCJJC):If Mid(CCJCCC,CJJCJJC(CJJCJJJ),1)="1" then CJJJCJCJ=True:exit function end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CJJCCCCJ("!$*|t|qt#"))="":CCJCJC=0:CCCJCJ=0:CCJCCJ=Empty:CCCJJC=0:CCCCJJ=0:CCCJCC=0:CCCJJJ=0:CCCCCJ=False:CJJJCJC=False:CJJJCCJ=Empty:End Sub:Sub CheckMemberCookie():dim CJJCJCJ,CJJCJCC,CJJCJJJ,CJJCCJJ,CJJCCJC:CJJCJCJ=split(CJJJCCC,CJJCCCCJ("]")):if ubound(CJJCJCJ)<>2 then Call ClearMemberCookie elseif not isnumeric(CJJCJCJ(0)) or len(CJJCJCJ(1))<>32 or len(CJJCJCJ(2))<>32 then Call ClearMemberCookie else CJJCJCC=CJJCJCJ(1):for CJJCJJJ=1 to len(CJJCJCC):CJJCCJJ=mid(CJJCJCC,CJJCJJJ,1):if isnumeric(CJJCCJJ) then CJJCCJC=CJJCCJC & CJJCCJJ if len(CJJCCJC)=7 then exit for next:CJJCJCC=CJJCJCJ(2):if CJJCCJC<>mid(CJJCJCC,6,7) then Call ClearMemberCookie else CJJCCJJ=mid(CJJCJCC,18,10)/2:if CJJCCJJ6"), CJJCCCCJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJJCCCCJ("kD4C:AE"), CJJCCCCJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJJCCCC=new RegExp:CJJCCCC.Pattern=CJJCCCCJ("@?W,2\K.ZXl"):CJJCCCC.IgnoreCase = True:CJJCCCC.Global=True:str=CJJCCCC.Replace(str,CJJCCCCJ("@?S`U6BF2=Dj")):set CJJCCCC=nothing:CJJJCJCC=str End If:End Function::Const CCCJCJJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CJCJJJCC,CJCJJCJJ):dim CJJCJCJ:CJJCJCJ=CJCJJJCC & "=" & CJCJJCJJ & CJJCCCCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJJCCCCJ("$6E\r@@<:6"),CJJCJCJ):End Sub:::::Sub CheckValidPost():dim CJCJJJJ:CJCJJJJ=false:Dim CJCJJJC : CJCJJJC=lcase(Request.ServerVariables(CJJCCCCJ("w%%!0#tut#t#"))):if(instr(CJCJJJC,Application(CJJCCCCJ("s@>2:?(9:E6{:DE")))>0) then CJCJJJJ=true else Dim CJCJJCJ : CJCJJCJ=lcase(Request.ServerVariables(CJJCCCCJ("$t#'t#0}p|t"))):Dim CJCJJCC : CJCJJCC=Request.ServerVariables(CJJCCCCJ("{~rp{0pss#")):if Mid(CJCJJJC,8,Len(CJCJJCJ))=CJCJJCJ or Mid(CJCJJJC,9,Len(CJCJJCJ))=CJCJJCJ or CJCJJCJ=CJCJJCC then CJCJJJJ=true end if:if not CJCJJJJ then Call RedirectMessage(CJJCCCCJ("寴@丈@赲@,,朧@糶@绚@丈@儼@讳@竔@夑@揋@亟@敫@捩@。,")) end sub:sub ShowMessage(CJJJCCJC):response.Charset=CJJCCCCJ("FE7\g"):Response.Write CJJCCCCJ("k3Cmk5:G ,2=:8?lV46?E6CVmk5:G ,DEJ=6lV4@=@CiC65j ,7@?E\H6:89Ei3@=5j ,E6IE\2=:8?i46?E6Cj ,3@C56Ci`AI ,D@=:5 ,Rrrrrrrj ,324<8C@F?5\4@=@CiRtgtgtgj ,A255:?8icAI ,aAI ,aAIj ,H:5E9ibd_AIj ,7@?E\D:K6i`aAIVm") & CJJJCCJC & CJJCCCCJ("k^5:Gmk^5:Gmk3Cm") end sub:::Function CJJJCCJJ():dim CJCJCJJ,CJCJCJC,CJCJCCJ:CJCJCCJ=10001:CJCJCJJ=CJJCCCCJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\WC@H0?F>36CWX@G6CW@C56C ,3J ,:5XZ") & CJCJCCJ-1 & CJJCCCCJ("X ,2D ,5:77 ,7C@> ,>6>36C ,H96C6 ,:5m") & CJCJCCJ-1 & CJJCCCCJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJCJCJC=CCJJJJ.execute(CJCJCJJ):CJJJCCJJ = CJCJCJC(0):if isnull(CJJJCCJJ) then CJJJCCJJ=CJCJCCJ CJCJCJC.close : set CJCJCJC=nothing:End Function:sub Alert(ByVal CJJJCCJC):Call ConnClose:CJJJCCJC=replace(CJJJCCJC,vbcrlf,CJJCCCCJ("-?")):CJJJCCJC=replace(CJJJCCJC,CJJCCCCJ("V"),CJJCCCCJ("-V")) response.Charset=CJJCCCCJ("FE7\g"):response.write CJJCCCCJ("kD4C:AEm2=6CEWV") & CJJJCCJC & CJJCCCCJ("VXj9:DE@CJ]3246DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::::::::::::::::::::Private Const CCCJCJC =8:Private Const CCCJCCJ =4:Private Const CCCJCCC =32:Private CJCJCCC(30):Private CJCCJJJ(30):Private Function CJJCJJCC(CJCJJCJC, CJCJJCCJ):If CJCJJCCJ = 0 Then CJJCJJCC = CJCJJCJC:Exit Function ElseIf CJCJJCCJ = 31 Then If CJCJJCJC And 1 Then CJJCJJCC = &H80000000 Else CJJCJJCC = 0 End If:Exit Function ElseIf CJCJJCCJ < 0 Or CJCJJCCJ > 31 Then Err.Raise 6 End If:If (CJCJJCJC And CJCCJJJ(31 - CJCJJCCJ)) Then CJJCJJCC = ((CJCJJCJC And CJCJCCC(31 - (CJCJJCCJ + 1))) * CJCCJJJ(CJCJJCCJ)) Or &H80000000 Else CJJCJJCC = ((CJCJJCJC And CJCJCCC(31 - CJCJJCCJ)) * CJCCJJJ(CJCJJCCJ)) End If:End Function:Private Function CJJCJCJJ(CJCJJCJC, CJCJJCCJ):If CJCJJCCJ = 0 Then CJJCJCJJ = CJCJJCJC:Exit Function ElseIf CJCJJCCJ = 31 Then If CJCJJCJC And &H80000000 Then CJJCJCJJ = 1 Else CJJCJCJJ = 0 End If:Exit Function ElseIf CJCJJCCJ < 0 Or CJCJJCCJ > 31 Then Err.Raise 6 End If:CJJCJCJJ = (CJCJJCJC And &H7FFFFFFE) \ CJCCJJJ(CJCJJCCJ):If (CJCJJCJC And &H80000000) Then CJJCJCJJ = (CJJCJCJJ Or (&H40000000 \ CJCCJJJ(CJCJJCCJ - 1))) End If:End Function:Private Function CJJCJCJC(CJCJJCJC, CJCJJCCJ):CJJCJCJC = CJJCJJCC(CJCJJCJC, CJCJJCCJ) Or CJJCJCJJ(CJCJJCJC, (32 - CJCJJCCJ)):End Function:Private Function CJJCJCCJ(CJCJJCCC, CJCJCJJJ):Dim CJCCJJC:Dim CJCCJCJ:Dim CJCCJCC:Dim CJCCCJJ:Dim CJCCCJC:CJCCJCC = CJCJJCCC And &H80000000:CJCCCJJ = CJCJCJJJ And &H80000000:CJCCJJC = CJCJJCCC And &H40000000:CJCCJCJ = CJCJCJJJ And &H40000000:CJCCCJC = (CJCJJCCC And &H3FFFFFFF) + (CJCJCJJJ And &H3FFFFFFF):If CJCCJJC And CJCCJCJ Then CJCCCJC = CJCCCJC Xor &H80000000 Xor CJCCJCC Xor CJCCCJJ ElseIf CJCCJJC Or CJCCJCJ Then If CJCCCJC And &H40000000 Then CJCCCJC = CJCCCJC Xor &HC0000000 Xor CJCCJCC Xor CJCCCJJ Else CJCCCJC = CJCCCJC Xor &H40000000 Xor CJCCJCC Xor CJCCCJJ End If Else CJCCCJC = CJCCCJC Xor CJCCJCC Xor CJCCCJJ End If:CJJCJCCJ = CJCCCJC:End Function:Private Function CJJCJCCC(CCJJCCJ, CJCJCJJC, CJCJCJCJ):CJJCJCCC = (CCJJCCJ And CJCJCJJC) Or ((Not CCJJCCJ) And CJCJCJCJ):End Function:Private Function CJJCCJJJ(CCJJCCJ, CJCJCJJC, CJCJCJCJ):CJJCCJJJ = (CCJJCCJ And CJCJCJCJ) Or (CJCJCJJC And (Not CJCJCJCJ)):End Function:Private Function CJJCCJJC(CCJJCCJ, CJCJCJJC, CJCJCJCJ):CJJCCJJC = (CCJJCCJ Xor CJCJCJJC Xor CJCJCJCJ):End Function:Private Function CJJCCJCJ(CCJJCCJ, CJCJCJJC, CJCJCJCJ):CJJCCJCJ = (CJCJCJJC Xor (CCJJCCJ Or (Not CJCJCJCJ))):End Function:Private Sub md5_FF(CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ, CJCJCJCC, CJCJCCJJ):CCJCJCC = CJJCJCCJ(CCJCJCC, CJJCJCCJ(CJJCJCCJ(CJJCJCCC(CCJCCJJ, CCJCCJC, CCJCCCJ), CCJJCCJ), CJCJCCJJ)):CCJCJCC = CJJCJCJC(CCJCJCC, CJCJCJCC):CCJCJCC = CJJCJCCJ(CCJCJCC, CCJCCJJ):End Sub:Private Sub md5_GG(CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ, CJCJCJCC, CJCJCCJJ):CCJCJCC = CJJCJCCJ(CCJCJCC, CJJCJCCJ(CJJCJCCJ(CJJCCJJJ(CCJCCJJ, CCJCCJC, CCJCCCJ), CCJJCCJ), CJCJCCJJ)):CCJCJCC = CJJCJCJC(CCJCJCC, CJCJCJCC):CCJCJCC = CJJCJCCJ(CCJCJCC, CCJCCJJ):End Sub:Private Sub md5_HH(CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ, CJCJCJCC, CJCJCCJJ):CCJCJCC = CJJCJCCJ(CCJCJCC, CJJCJCCJ(CJJCJCCJ(CJJCCJJC(CCJCCJJ, CCJCCJC, CCJCCCJ), CCJJCCJ), CJCJCCJJ)):CCJCJCC = CJJCJCJC(CCJCJCC, CJCJCJCC):CCJCJCC = CJJCJCCJ(CCJCJCC, CCJCCJJ):End Sub:Private Sub md5_II(CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ, CJCJCJCC, CJCJCCJJ):CCJCJCC = CJJCJCCJ(CCJCJCC, CJJCJCCJ(CJJCJCCJ(CJJCCJCJ(CCJCCJJ, CCJCCJC, CCJCCCJ), CCJJCCJ), CJCJCCJJ)):CCJCJCC = CJJCJCJC(CCJCJCC, CJCJCJCC):CCJCJCC = CJJCJCCJ(CCJCJCC, CCJCCJJ):End Sub:Private Function CJJCCJCC(CJCJCCJC):Dim CJCCCCJ:Dim CJCCCCC:Dim CCJJJJJ():Dim CCJJJJC:Dim CCJJJCJ:Dim CCJJJCC:Const CCCCJJJ =512:Const CCCCJJC =448:CJCCCCJ = Len(CJCJCCJC):CJCCCCC = (((CJCCCCJ + ((CCCCJJJ - CCCCJJC) \ CCCJCJC)) \ (CCCCJJJ \ CCCJCJC)) + 1) * (CCCCJJJ \ CCCJCCC):ReDim CCJJJJJ(CJCCCCC - 1):CCJJJJC = 0:CCJJJCJ = 0:Do Until CCJJJCJ >= CJCCCCJ:CCJJJCC = CCJJJCJ \ CCCJCCJ:CCJJJJC = (CCJJJCJ Mod CCCJCCJ) * CCCJCJC:CCJJJJJ(CCJJJCC) = CCJJJJJ(CCJJJCC) Or CJJCJJCC(Asc(Mid(CJCJCCJC, CCJJJCJ + 1, 1)), CCJJJJC):CCJJJCJ = CCJJJCJ + 1:Loop:CCJJJCC = CCJJJCJ \ CCCJCCJ:CCJJJJC = (CCJJJCJ Mod CCCJCCJ) * CCCJCJC:CCJJJJJ(CCJJJCC) = CCJJJJJ(CCJJJCC) Or CJJCJJCC(&H80, CCJJJJC):CCJJJJJ(CJCCCCC - 2) = CJJCJJCC(CJCCCCJ, 3):CCJJJJJ(CJCCCCC - 1) = CJJCJCJJ(CJCCCCJ, 29):CJJCCJCC = CCJJJJJ:End Function:Private Function CJJCCCJJ(CJCJJCJC):Dim CCJJCJJ:Dim CCJJCJC:For CCJJCJC = 0 To 3:CCJJCJJ = CJJCJCJJ(CJCJJCJC, CCJJCJC * CCCJCJC) And CJCJCCC(CCCJCJC - 1):CJJCCCJJ = CJJCCCJJ & Right("0" & Hex(CCJJCJJ), 2):Next:End Function:Public Function CJJCCCJC(CJCJCCJC):CJCJCCC(0) = CLng(1):CJCJCCC(1) = CLng(3):CJCJCCC(2) = CLng(7):CJCJCCC(3) = CLng(15):CJCJCCC(4) = CLng(31):CJCJCCC(5) = CLng(63):CJCJCCC(6) = CLng(127):CJCJCCC(7) = CLng(255):CJCJCCC(8) = CLng(511):CJCJCCC(9) = CLng(1023):CJCJCCC(10) = CLng(2047):CJCJCCC(11) = CLng(4095):CJCJCCC(12) = CLng(8191):CJCJCCC(13) = CLng(16383):CJCJCCC(14) = CLng(32767):CJCJCCC(15) = CLng(65535):CJCJCCC(16) = CLng(131071):CJCJCCC(17) = CLng(262143):CJCJCCC(18) = CLng(524287):CJCJCCC(19) = CLng(1048575):CJCJCCC(20) = CLng(2097151):CJCJCCC(21) = CLng(4194303):CJCJCCC(22) = CLng(8388607):CJCJCCC(23) = CLng(16777215):CJCJCCC(24) = CLng(33554431):CJCJCCC(25) = CLng(67108863):CJCJCCC(26) = CLng(134217727):CJCJCCC(27) = CLng(268435455):CJCJCCC(28) = CLng(536870911):CJCJCCC(29) = CLng(1073741823):CJCJCCC(30) = CLng(2147483647):CJCCJJJ(0) = CLng(1):CJCCJJJ(1) = CLng(2):CJCCJJJ(2) = CLng(4):CJCCJJJ(3) = CLng(8):CJCCJJJ(4) = CLng(16):CJCCJJJ(5) = CLng(32):CJCCJJJ(6) = CLng(64):CJCCJJJ(7) = CLng(128):CJCCJJJ(8) = CLng(256):CJCCJJJ(9) = CLng(512):CJCCJJJ(10) = CLng(1024):CJCCJJJ(11) = CLng(2048):CJCCJJJ(12) = CLng(4096):CJCCJJJ(13) = CLng(8192):CJCCJJJ(14) = CLng(16384):CJCCJJJ(15) = CLng(32768):CJCCJJJ(16) = CLng(65536):CJCCJJJ(17) = CLng(131072):CJCCJJJ(18) = CLng(262144):CJCCJJJ(19) = CLng(524288):CJCCJJJ(20) = CLng(1048576):CJCCJJJ(21) = CLng(2097152):CJCCJJJ(22) = CLng(4194304):CJCCJJJ(23) = CLng(8388608):CJCCJJJ(24) = CLng(16777216):CJCCJJJ(25) = CLng(33554432):CJCCJJJ(26) = CLng(67108864):CJCCJJJ(27) = CLng(134217728):CJCCJJJ(28) = CLng(268435456):CJCCJJJ(29) = CLng(536870912):CJCCJJJ(30) = CLng(1073741824):Dim CCJJCCJ:Dim CJJCCJC:Dim CCJJCCC:Dim CCJCJJJ:Dim CCJCJJC:Dim CCJCJCJ:Dim CCJCJCC:Dim CCJCCJJ:Dim CCJCCJC:Dim CCJCCCJ:Const CCCCJCJ =7:Const CCCCJCC =12:Const CCCCCJJ =17:Const CCCCCJC =22:Const CCCCCCJ =5:Const CCCCCCC =9:Const CJJJJJJJ =14:Const CJJJJJJC =20:Const CJJJJJCJ =4:Const CJJJJJCC =11:Const CJJJJCJJ =16:Const CJJJJCJC =23:Const CJJJJCCJ =6:Const CJJJJCCC =10:Const CJJJCJJJ =15:Const CJJJCJJC =21:CCJJCCJ = CJJCCJCC(CJCJCCJC):CCJCJCC = &H67452301:CCJCCJJ = &HEFCDAB89:CCJCCJC = &H98BADCFE:CCJCCCJ = &H10325476:For CJJCCJC = 0 To UBound(CCJJCCJ) Step 16:CCJJCCC = CCJCJCC:CCJCJJJ = CCJCCJJ:CCJCJJC = CCJCCJC:CCJCJCJ = CCJCCCJ:md5_FF CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 0), CCCCJCJ, &HD76AA478:md5_FF CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 1), CCCCJCC, &HE8C7B756:md5_FF CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 2), CCCCCJJ, &H242070DB:md5_FF CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 3), CCCCCJC, &HC1BDCEEE:md5_FF CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 4), CCCCJCJ, &HF57C0FAF:md5_FF CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 5), CCCCJCC, &H4787C62A:md5_FF CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 6), CCCCCJJ, &HA8304613:md5_FF CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 7), CCCCCJC, &HFD469501:md5_FF CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 8), CCCCJCJ, &H698098D8:md5_FF CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 9), CCCCJCC, &H8B44F7AF:md5_FF CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 10), CCCCCJJ, &HFFFF5BB1:md5_FF CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 11), CCCCCJC, &H895CD7BE:md5_FF CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 12), CCCCJCJ, &H6B901122:md5_FF CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 13), CCCCJCC, &HFD987193:md5_FF CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 14), CCCCCJJ, &HA679438E:md5_FF CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 15), CCCCCJC, &H49B40821:md5_GG CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 1), CCCCCCJ, &HF61E2562:md5_GG CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 6), CCCCCCC, &HC040B340:md5_GG CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 11), CJJJJJJJ, &H265E5A51:md5_GG CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 0), CJJJJJJC, &HE9B6C7AA:md5_GG CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 5), CCCCCCJ, &HD62F105D:md5_GG CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 10), CCCCCCC, &H2441453:md5_GG CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 15), CJJJJJJJ, &HD8A1E681:md5_GG CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 4), CJJJJJJC, &HE7D3FBC8:md5_GG CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 9), CCCCCCJ, &H21E1CDE6:md5_GG CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 14), CCCCCCC, &HC33707D6:md5_GG CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 3), CJJJJJJJ, &HF4D50D87:md5_GG CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 8), CJJJJJJC, &H455A14ED:md5_GG CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 13), CCCCCCJ, &HA9E3E905:md5_GG CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 2), CCCCCCC, &HFCEFA3F8:md5_GG CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 7), CJJJJJJJ, &H676F02D9:md5_GG CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 12), CJJJJJJC, &H8D2A4C8A:md5_HH CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 5), CJJJJJCJ, &HFFFA3942:md5_HH CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 8), CJJJJJCC, &H8771F681:md5_HH CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 11), CJJJJCJJ, &H6D9D6122:md5_HH CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 14), CJJJJCJC, &HFDE5380C:md5_HH CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 1), CJJJJJCJ, &HA4BEEA44:md5_HH CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 4), CJJJJJCC, &H4BDECFA9:md5_HH CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 7), CJJJJCJJ, &HF6BB4B60:md5_HH CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 10), CJJJJCJC, &HBEBFBC70:md5_HH CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 13), CJJJJJCJ, &H289B7EC6:md5_HH CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 0), CJJJJJCC, &HEAA127FA:md5_HH CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 3), CJJJJCJJ, &HD4EF3085:md5_HH CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 6), CJJJJCJC, &H4881D05:md5_HH CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 9), CJJJJJCJ, &HD9D4D039:md5_HH CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 12), CJJJJJCC, &HE6DB99E5:md5_HH CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 15), CJJJJCJJ, &H1FA27CF8:md5_HH CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 2), CJJJJCJC, &HC4AC5665:md5_II CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 0), CJJJJCCJ, &HF4292244:md5_II CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 7), CJJJJCCC, &H432AFF97:md5_II CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 14), CJJJCJJJ, &HAB9423A7:md5_II CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 5), CJJJCJJC, &HFC93A039:md5_II CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 12), CJJJJCCJ, &H655B59C3:md5_II CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 3), CJJJJCCC, &H8F0CCC92:md5_II CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 10), CJJJCJJJ, &HFFEFF47D:md5_II CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 1), CJJJCJJC, &H85845DD1:md5_II CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 8), CJJJJCCJ, &H6FA87E4F:md5_II CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 15), CJJJJCCC, &HFE2CE6E0:md5_II CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 6), CJJJCJJJ, &HA3014314:md5_II CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 13), CJJJCJJC, &H4E0811A1:md5_II CCJCJCC, CCJCCJJ, CCJCCJC, CCJCCCJ, CCJJCCJ(CJJCCJC + 4), CJJJJCCJ, &HF7537E82:md5_II CCJCCCJ, CCJCJCC, CCJCCJJ, CCJCCJC, CCJJCCJ(CJJCCJC + 11), CJJJJCCC, &HBD3AF235:md5_II CCJCCJC, CCJCCCJ, CCJCJCC, CCJCCJJ, CCJJCCJ(CJJCCJC + 2), CJJJCJJJ, &H2AD7D2BB:md5_II CCJCCJJ, CCJCCJC, CCJCCCJ, CCJCJCC, CCJJCCJ(CJJCCJC + 9), CJJJCJJC, &HEB86D391:CCJCJCC = CJJCJCCJ(CCJCJCC, CCJJCCC):CCJCCJJ = CJJCJCCJ(CCJCCJJ, CCJCJJJ):CCJCCJC = CJJCJCCJ(CCJCCJC, CCJCJJC):CCJCCCJ = CJJCJCCJ(CCJCCCJ, CCJCJCJ):Next:CJJCCCJC = LCase(CJJCCCJJ(CCJCJCC) & CJJCCCJJ(CCJCCJJ) & CJJCCCJJ(CCJCCJC) & CJJCCCJJ(CCJCCCJ)):End Function::Call CheckRight(25):if Request.ServerVariables(CJJCCCCJ("#t""&t$%0|t%w~s")) = CJJCCCCJ("!~$%") then Call CheckValidPost:dim CCJCCCC,CCCJJJJ,CCCJJJC:CCJCCCC=CJJJCJCC(Request.Form(CJJCCCCJ("E6IE7:6=5a`"))):CCCJJJJ=request.form(CJJCCCCJ(":DD49@@=25>:?")):if CCJCCCC="" then CCJCCCC=CJJCCCCJ("}F==") else set CCJJCJ=CCJJJJ.execute(CJJCCCCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,>6>36C ,H96C6 ,FD6C?2>6lV") & CCJCCCC & CJJCCCCJ("V")) if not CCJJCJ.eof then Call Alert(CJJCCCCJ("患@辎@兠@癿@癶@彐@合@秫@巭@绊@孓@圣@!,")) CCJCCCC=CJJCCCCJ("V") & CCJCCCC & CJJCCCCJ("V") end if:if CCCJJJJ="1" then CCCJJJC="00000000000101110110000000000000001100001100000000000000000111111011110111111111110011111110111111100001110011110000001101010111100110011010111111" else CCCJJJC="00001000000000000000000000000000010000000000000111111111" end if:CCJCJJ=CJJCCCCJ(":?D6CE ,:?E@ ,>6>36CW:5[FD6C?2>6[A2DDH@C5[C62=?2>6[D6I[3:CE952J[AC@G:?46[4:EJ[5:DEC:4E[>@3:=6[EJA6[,8C@FA.[C6>2C<[DE2E6[:DD49@@=25>:?[,C:89E.X ,G2=F6DW") & CJJJCCJJ & CJJCCCCJ("[") & CCJCCCC & CJJCCCCJ("[V") & CJJCCCJC(Request.Form(CJJCCCCJ("A2DDH@C5"))) & CJJCCCCJ("V") & CJJCCCCJ("[V") & CJJJCJCC(Request.Form(CJJCCCCJ("C62=?2>6"))) & CJJCCCCJ("V") & CJJCCCCJ("[") & Request.Form(CJJCCCCJ("D6I")) & CJJCCCCJ("[V") & Request.Form(CJJCCCCJ("3:CE952J")) & CJJCCCCJ("V") & CJJCCCCJ("[V") & Request.Form(CJJCCCCJ("AC@G:?46")) & CJJCCCCJ("V") & CJJCCCCJ("[V") & Request.Form(CJJCCCCJ("4:EJ")) & CJJCCCCJ("V") & CJJCCCCJ("[V") & Request.Form(CJJCCCCJ("5:DEC:4E")) & CJJCCCCJ("V") & CJJCCCCJ("[V") & CJJJCJCC(Request.Form(CJJCCCCJ(">@3:=6"))) & CJJCCCCJ("V") & CJJCCCCJ("[") & Request.Form(CJJCCCCJ("EJA6")) & CJJCCCCJ("[`") & CJJCCCCJ("[V") & CJJJCJCC(Request.Form(CJJCCCCJ("C6>2C<"))) & CJJCCCCJ("V") & CJJCCCCJ("[d") & CJJCCCCJ("[") & request.form(CJJCCCCJ(":DD49@@=25>:?")) & CJJCCCCJ("[V") & CCCJJJC & CJJCCCCJ("V") & CJJCCCCJ("X") CCJJJJ.execute CCJCJJ:Call ShowMessage(CJJCCCCJ("斫@墙@箜@琁@呓@戋@劚@!,")) end if:Response.Write(vbCrLf):Response.Write(CJJCCCCJ("kP5@4EJA6 ,9E>=m") & vbCrLf):Response.Write(CJJCCCCJ("k9E>=m") & vbCrLf):Response.Write(CJJCCCCJ("k9625m") & vbCrLf):Response.Write(CJJCCCCJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJJCCCCJ("kE:E=6m旛@栂@颓@斂@桞@k^E:E=6m") & vbCrLf):Response.Write(CJJCCCCJ("k=:?< ,9C67lQ]]^DEJ=6]4DDQ ,C6=lQDEJ=6D966EQm") & vbCrLf):Response.Write(CJJCCCCJ("k^9625m") & vbCrLf):Response.Write(CJJCCCCJ("k3@5Jm") & vbCrLf):Response.Write(CJJCCCCJ("k5:G ,4=2DDlQE:E=6Qm,斫@墙@伕@呓@.k^5:Gm") & vbCrLf):Response.Write(CJJCCCCJ("k7@C> ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE23=6 ,H:5E9lQ`__TQm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5 ,H:5E9lQg_Qmxs:,k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5m糶@绚@臥@劣@甚@戋@。,(,泣@:,仠@丆@顴@盩@陟@亁@栂@昉@忀@顶@辎@兠@乆@夑@,,郸@只@仠@畔@穵@),k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5m癶@彐@合@:,k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5mk:?AFE ,?2>6lQE6IE7:6=5a`Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQmk^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5m寁@矼@:,k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5mk:?AFE ,?2>6lQA2DDH@C5Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQm") & vbCrLf):Response.Write(CJJCCCCJ(" ,(,忀@電@辎@兠@寁@矼@,,卅@觍@孒@笡@),k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5m眚@宙@姎@合@:,k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5mk:?AFE ,?2>6lQC62=?2>6Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQmk^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5m怢@刦@:,k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5mk:?AFE ,?2>6lQD6IQ ,EJA6lQC25:@Q ,:5lQC25:@Q ,G2=F6lQ`Q ,4964<65lQ4964<65Qm") & vbCrLf):Response.Write(CJJCCCCJ(" ,k=236= ,7@ClQC25:@Qm甲@k^=236=m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQD6IQ ,:5lQC25:@aQ ,G2=F6lQ_Qm") & vbCrLf):Response.Write(CJJCCCCJ(" ,k=236= ,7@ClQC25:@aQm奮@k^=236=mk^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5m凵@甚@无@朚@:,k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5mk:?AFE ,?2>6lQ3:CE952JQ ,EJA6lQE6IEQ ,4=2DDlQE6IE ,52E6Q ,G2=F6lQ")):Response.Write Date:Response.Write(CJJCCCCJ("Q ,C625@?=Jm") & vbCrLf):Response.Write(CJJCCCCJ(" ,(,忀@顶@辎@兠@吃@泐@癿@无@朚@),k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5m盼@仸@:,k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5 ,52E2\E@88=6lQ5:DEA:4<6CQmkD6=64E ,?2>6lQAC@G:?46Qm") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJJCCCCJ(" ,kD6=64E ,?2>6lQ4:EJQm") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJJCCCCJ(" ,kD6=64E ,?2>6lQ5:DEC:4EQm") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^D6=64Emk^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5m扆@朵@:,k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5mk:?AFE ,?2>6lQ>@3:=6Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQmk^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5m卐@佈@:,k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5mk:?AFE ,?2>6lQEJA6Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,C6BF:C65m") & vbCrLf):Response.Write(CJJCCCCJ(" ,(,忀@顶@辎@兠@戻@圣@卐@佈@癿@xs),k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5m籶@垆@:,k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5mkD6=64E ,?2>6lQ:DD49@@=25>:?Qm") & vbCrLf):Response.Write(CJJCCCCJ(" ,k@AE:@? ,G2=F6lQ_Qm怶@阚@k^@AE:@?m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k@AE:@? ,G2=F6lQ`Qm攪@阚@k^@AE:@?m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^D6=64Emk^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5 ,G2=:8?lQE@AQm夂@泣@:,k^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,kE5mkE6IE2C62 ,?2>6lQC6>2C6lQ3FEE@?Q ,EJA6lQDF3>:EQ ,4=2DDlQ3FEE@?Q ,:5lQ3FEE@?Q ,G2=F6lQ揋@ ,亟@Qmk^E5m") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCCCCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCCCCJ("k^7@C>m") & vbCrLf):Response.Write(CJJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^5:DEA:4<6C]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];52E6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCCCCJ("kD4C:AEm") & vbCrLf):Response.Write(CJJCCCCJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJJCCCCJ(" ,SWV]52E6VX];s2E6WL6?552E6i?6H ,s2E6WXNX") & vbCrLf):Response.Write(CJJCCCCJ("NX") & vbCrLf):Response.Write(CJJCCCCJ("k^D4C:AEm") & vbCrLf):Response.Write(CJJCCCCJ("k^3@5Jm") & vbCrLf):Response.Write(CJJCCCCJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJJCCCJ=nothing:set CJJJCCCC=nothing:set CJJCJJJJ=nothing:set CJJCJJJC=nothing:CCJJCC.Close:Set CCJJCC=Nothing:CCJJCJ.Close:Set CCJJCJ=Nothing:CCJJJJ.Close:Set CCJJJJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJJCCCCJ(ByVal CCJCCJC) Dim CCCJJCJ, CJJCJJJ, CCCJJCC CCJCCJC = Replace(CCJCCJC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJJCJJJ = 1 To Len(CCJCCJC) If CJJCJJJ <> CCCJJCC Then CCCJJCJ = AscW(Mid(CCJCCJC, CJJCJJJ, 1)) If CCCJJCJ >= 33 And CCCJJCJ <= 79 Then CJJCCCCJ = CJJCCCCJ & Chr(CCCJJCJ + 47) ElseIf CCCJJCJ >= 80 And CCCJJCJ <= 126 Then CJJCCCCJ = CJJCCCCJ & Chr(CCCJJCJ - 47) Else CCCJJCC = CJJCJJJ + 1 If Mid(CCJCCJC, CCCJJCC, 1) = Chr(64) Then CJJCCCCJ = CJJCCCCJ & ChrW(CCCJJCJ + 5) Else CJJCCCCJ = CJJCCCCJ & Mid(CCJCCJC, CJJCJJJ, 1) End If End If Next End Function %>