<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCCCJC, CCCCCJ,CCCCCC, CJJJJJJ, CJJJJJC:Set CCCCJC = server.CreateObject(CJCJCJJC("ps~sq]r@??64E:@?")):CCCCJC.open Application(CJCJCJJC("r@??64E:@?$EC:?8")):Set CCCCCJ=CCCCJC::Dim CJJJJCJ,CJJJJCC,CJJJCJJ,CJJJCJC,CJJJCCJ,CJJJCCC,CJJCJJJ,CJJCJJC,CJJCJCJ:Dim CJJCJCC,CJJCCJJ,CJJCCJC,CJJCCCJ,CJJCCCC,CJCJJJJ:Dim CJCJJJC,CJCJJCJ,CJCJJCC:Dim CJCJCJJ:CJCJCJJ=Trim(Request.Cookies(CJCJCJJC("!$*|t|qt#"))):if CJCJCJJ="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CJJJJCJ>0 then CJJJJJC=CJCJCJJC("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(CJCJCJJC("弬@寁@矼@,,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,")) Call SetMemberCookie(CJJJJCJ,CJJJJCC) End IF end if:Sub CheckRight(CJCJCJCJ):dim CJCJCJC,CJCJCCJ:if CJJJJCJ=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJCJCJJC("癶@彐@俜@恪@夬@敃@,,诲@釈@斫@癶@彐@。,")) elseIf not CJJCJCJJ(CJCJCJCJ) then Call RedirectMessage(CJCJCJJC("朾@陋@W") & CJCJCJCJ & CJCJCJJC("X袦@祼@歝@,,诲@三@糶@绚@箜@琁@呓@聏@糶@。,")) end if:End Sub:Function CJJCJCJJ(CJCJCJCJ):dim CJCJCJC,CJCJCCJ:CJCJCCJ=split(CJCJCJCJ,CJCJCJJC("[")):CJJCJCJJ=False:for CJCJCJC=0 to ubound(CJCJCCJ):If Mid(CJJJCJJ,CJCJCCJ(CJCJCJC),1)="1" then CJJCJCJJ=True:exit function end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CJCJCJJC("!$*|t|qt#"))="":CJJJJCJ=0:CJJJCCC=0:CJJJJCC=Empty:CJJJCCJ=0:CJJCJJC=0:CJJCJJJ=0:CJJJCJC=0:CJJCJCC=False:CJCJJCJ=False:CJCJJCC=Empty:End Sub:Sub CheckMemberCookie():dim CJCJCCC,CJCCJJJ,CJCJCJC,CJCCJJC,CJCCJCJ:CJCJCCC=split(CJCJCJJ,CJCJCJJC("]")):if ubound(CJCJCCC)<>2 then Call ClearMemberCookie elseif not isnumeric(CJCJCCC(0)) or len(CJCJCCC(1))<>32 or len(CJCJCCC(2))<>32 then Call ClearMemberCookie else CJCCJJJ=CJCJCCC(1):for CJCJCJC=1 to len(CJCCJJJ):CJCCJJC=mid(CJCCJJJ,CJCJCJC,1):if isnumeric(CJCCJJC) then CJCCJCJ=CJCCJCJ & CJCCJJC if len(CJCCJCJ)=7 then exit for next:CJCCJJJ=CJCJCCC(2):if CJCCJCJ<>mid(CJCCJJJ,6,7) then Call ClearMemberCookie else CJCCJJC=mid(CJCCJJJ,18,10)/2:if CJCCJJC6"), CJCJCJJC("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJCJCJJC("kD4C:AE"), CJCJCJJC("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJCCCJJ=new RegExp:CJCCCJJ.Pattern=CJCJCJJC("@?W,2\K.ZXl"):CJCCCJJ.IgnoreCase = True:CJCCCJJ.Global=True:str=CJCCCJJ.Replace(str,CJCJCJJC("@?S`U6BF2=Dj")):set CJCCCJJ=nothing:CJJCJCJC=str End If:End Function::Const CCCCCCJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$"::Function CJJCJCCJ():dim CJCCCJC:CJCCCJC = Cstr(Request.ServerVariables("HTTP_X_FORWARDED_FOR")):If CJCCCJC = "" Then CJCCCJC = Cstr(Request.ServerVariables(CJCJCJJC("#t|~%t0pss#"))) if instr(CJCCCJC,CJCJCJJC("i"))>0 then CJCCCJC=left(CJCCCJC,instr(CJCCCJC,CJCJCJJC("i"))-1) elseif instr(CJCCCJC,CJCJCJJC("["))>0 then CJCCCJC=left(CJCCCJC,instr(CJCCCJC,CJCJCJJC("["))-1) end if:CJJCJCCJ=left(CJCCCJC,15):End Function::Public Function CJJCJCCC():Dim CJCCCCJ, CJCCCCC:CJCCCCC = Request.ServerVariables(CJCJCJJC("!p%w0x}u~")):CJCCCCJ = Request.ServerVariables(CJCJCJJC("""&t#*0$%#x}v")):If CJCCCCJ <> Empty Then if instr(lcase(CJCCCCJ),CJCJCJJC("Tb4:7C2>6"))>0 or instr(lcase(CJCCCCJ),CJCJCJJC("Tb4D4C:AE"))>0 then Call RedirectMessage(CJCJCJJC("寴@丈@赲@,,患@癿@圫@圻@栊@否@朄@静@泐@孒@笡@!,!,!,")) CJCCCCC = CJCCCCC & CJCJCJJC("n") & CJCCCCJ end if:CJJCJCCC = CJCCCCC:End Function:Sub SetHttpOnlyCookie(CJCJCCCJ,CJCJCCCC):dim CJCJCCC:CJCJCCC=CJCJCCCJ & CJCJCJJC("l") & CJCJCCCC & CJCJCJJC("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJCJCJJC("$6E\r@@<:6"),CJCJCCC):End Sub::::::::::::Sub ConnClose():On Error Resume Next:set CJJCCJJJ=nothing:set CJJCCJJC=nothing:set CJJCCJCJ=nothing:set CJJCCJCC=nothing:CJJCCCJJ.close : set CJJCCCJJ=nothing:CJJJJJJ.Close : Set CJJJJJJ=Nothing:CCCCCC.Close : Set CCCCCC=Nothing:CJJCCCJC.Close : Set CJJCCCJC = Nothing:CCCCJC.Close : Set CCCCJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJCCJJJJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJCJCJJC("!$*0|6DD286"),server.URLEncode(CJCCJJJJ)):Response.Redirect CJCJCJJC("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::Sub InsertLog(CJCCJJJC,CCCJCCC):dim CCJJJJJ:CCJJJJJ=CJCJCJJC("x?D6CE ,:?E@ ,=@8W>6>36C[:A[4@?E6?E[EJA6[FC=X ,G2=F6DW") & CJJJJCJ & CJCJCJJC("[V") & CJJCJCCJ & CJCJCJJC("V") & CJCJCJJC("[V") & CJJCJCJC(CCCJCCC) & CJCJCJJC("V") & CJCJCJJC("[") & CJCCJJJC & CJCJCJJC("[V") & CJJCJCCC & CJCJCJJC("V") & CJCJCJJC("X") CCCCJC.execute CCJJJJJ:End Sub::::::::::::::::::Private Const CCCCCCC =8:Private Const CJJJJJJJ =4:Private Const CJJJJJJC =32:Private CCJJJJC(30):Private CCJJJCJ(30):Private Function CJJCCCCJ(CJCCJJCJ, CJCCJJCC):If CJCCJJCC = 0 Then CJJCCCCJ = CJCCJJCJ:Exit Function ElseIf CJCCJJCC = 31 Then If CJCCJJCJ And 1 Then CJJCCCCJ = &H80000000 Else CJJCCCCJ = 0 End If:Exit Function ElseIf CJCCJJCC < 0 Or CJCCJJCC > 31 Then Err.Raise 6 End If:If (CJCCJJCJ And CCJJJCJ(31 - CJCCJJCC)) Then CJJCCCCJ = ((CJCCJJCJ And CCJJJJC(31 - (CJCCJJCC + 1))) * CCJJJCJ(CJCCJJCC)) Or &H80000000 Else CJJCCCCJ = ((CJCCJJCJ And CCJJJJC(31 - CJCCJJCC)) * CCJJJCJ(CJCCJJCC)) End If:End Function:Private Function CJJCCCCC(CJCCJJCJ, CJCCJJCC):If CJCCJJCC = 0 Then CJJCCCCC = CJCCJJCJ:Exit Function ElseIf CJCCJJCC = 31 Then If CJCCJJCJ And &H80000000 Then CJJCCCCC = 1 Else CJJCCCCC = 0 End If:Exit Function ElseIf CJCCJJCC < 0 Or CJCCJJCC > 31 Then Err.Raise 6 End If:CJJCCCCC = (CJCCJJCJ And &H7FFFFFFE) \ CCJJJCJ(CJCCJJCC):If (CJCCJJCJ And &H80000000) Then CJJCCCCC = (CJJCCCCC Or (&H40000000 \ CCJJJCJ(CJCCJJCC - 1))) End If:End Function:Private Function CJCJJJJJ(CJCCJJCJ, CJCCJJCC):CJCJJJJJ = CJJCCCCJ(CJCCJJCJ, CJCCJJCC) Or CJJCCCCC(CJCCJJCJ, (32 - CJCCJJCC)):End Function:Private Function CJCJJJJC(CJCCJCJJ, CJCCJCJC):Dim CCJJJCC:Dim CCJJCJJ:Dim CCJJCJC:Dim CCJJCCJ:Dim CCJJCCC:CCJJCJC = CJCCJCJJ And &H80000000:CCJJCCJ = CJCCJCJC And &H80000000:CCJJJCC = CJCCJCJJ And &H40000000:CCJJCJJ = CJCCJCJC And &H40000000:CCJJCCC = (CJCCJCJJ And &H3FFFFFFF) + (CJCCJCJC And &H3FFFFFFF):If CCJJJCC And CCJJCJJ Then CCJJCCC = CCJJCCC Xor &H80000000 Xor CCJJCJC Xor CCJJCCJ ElseIf CCJJJCC Or CCJJCJJ Then If CCJJCCC And &H40000000 Then CCJJCCC = CCJJCCC Xor &HC0000000 Xor CCJJCJC Xor CCJJCCJ Else CCJJCCC = CCJJCCC Xor &H40000000 Xor CCJJCJC Xor CCJJCCJ End If Else CCJJCCC = CCJJCCC Xor CCJJCJC Xor CCJJCCJ End If:CJCJJJJC = CCJJCCC:End Function:Private Function CJCJJJCJ(CCCJJJJ, CJCCJCCJ, CJCCJCCC):CJCJJJCJ = (CCCJJJJ And CJCCJCCJ) Or ((Not CCCJJJJ) And CJCCJCCC):End Function:Private Function CJCJJJCC(CCCJJJJ, CJCCJCCJ, CJCCJCCC):CJCJJJCC = (CCCJJJJ And CJCCJCCC) Or (CJCCJCCJ And (Not CJCCJCCC)):End Function:Private Function CJCJJCJJ(CCCJJJJ, CJCCJCCJ, CJCCJCCC):CJCJJCJJ = (CCCJJJJ Xor CJCCJCCJ Xor CJCCJCCC):End Function:Private Function CJCJJCJC(CCCJJJJ, CJCCJCCJ, CJCCJCCC):CJCJJCJC = (CJCCJCCJ Xor (CCCJJJJ Or (Not CJCCJCCC))):End Function:Private Sub md5_FF(CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ, CJCCCJJJ, CJCCCJJC):CCCJCJC = CJCJJJJC(CCCJCJC, CJCJJJJC(CJCJJJJC(CJCJJJCJ(CCCJCCJ, CCCJCCC, CCCCJJJ), CCCJJJJ), CJCCCJJC)):CCCJCJC = CJCJJJJJ(CCCJCJC, CJCCCJJJ):CCCJCJC = CJCJJJJC(CCCJCJC, CCCJCCJ):End Sub:Private Sub md5_GG(CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ, CJCCCJJJ, CJCCCJJC):CCCJCJC = CJCJJJJC(CCCJCJC, CJCJJJJC(CJCJJJJC(CJCJJJCC(CCCJCCJ, CCCJCCC, CCCCJJJ), CCCJJJJ), CJCCCJJC)):CCCJCJC = CJCJJJJJ(CCCJCJC, CJCCCJJJ):CCCJCJC = CJCJJJJC(CCCJCJC, CCCJCCJ):End Sub:Private Sub md5_HH(CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ, CJCCCJJJ, CJCCCJJC):CCCJCJC = CJCJJJJC(CCCJCJC, CJCJJJJC(CJCJJJJC(CJCJJCJJ(CCCJCCJ, CCCJCCC, CCCCJJJ), CCCJJJJ), CJCCCJJC)):CCCJCJC = CJCJJJJJ(CCCJCJC, CJCCCJJJ):CCCJCJC = CJCJJJJC(CCCJCJC, CCCJCCJ):End Sub:Private Sub md5_II(CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ, CJCCCJJJ, CJCCCJJC):CCCJCJC = CJCJJJJC(CCCJCJC, CJCJJJJC(CJCJJJJC(CJCJJCJC(CCCJCCJ, CCCJCCC, CCCCJJJ), CCCJJJJ), CJCCCJJC)):CCCJCJC = CJCJJJJJ(CCCJCJC, CJCCCJJJ):CCCJCJC = CJCJJJJC(CCCJCJC, CCCJCCJ):End Sub:Private Function CJCJJCCJ(CJCCCJCJ):Dim CCJCJJJ:Dim CCJCJJC:Dim CCJCJCJ():Dim CCJCJCC:Dim CCJCCJJ:Dim CCJCCJC:Const CJJJJJCJ =512:Const CJJJJJCC =448:CCJCJJJ = Len(CJCCCJCJ):CCJCJJC = (((CCJCJJJ + ((CJJJJJCJ - CJJJJJCC) \ CCCCCCC)) \ (CJJJJJCJ \ CCCCCCC)) + 1) * (CJJJJJCJ \ CJJJJJJC):ReDim CCJCJCJ(CCJCJJC - 1):CCJCJCC = 0:CCJCCJJ = 0:Do Until CCJCCJJ >= CCJCJJJ:CCJCCJC = CCJCCJJ \ CJJJJJJJ:CCJCJCC = (CCJCCJJ Mod CJJJJJJJ) * CCCCCCC:CCJCJCJ(CCJCCJC) = CCJCJCJ(CCJCCJC) Or CJJCCCCJ(Asc(Mid(CJCCCJCJ, CCJCCJJ + 1, 1)), CCJCJCC):CCJCCJJ = CCJCCJJ + 1:Loop:CCJCCJC = CCJCCJJ \ CJJJJJJJ:CCJCJCC = (CCJCCJJ Mod CJJJJJJJ) * CCCCCCC:CCJCJCJ(CCJCCJC) = CCJCJCJ(CCJCCJC) Or CJJCCCCJ(&H80, CCJCJCC):CCJCJCJ(CCJCJJC - 2) = CJJCCCCJ(CCJCJJJ, 3):CCJCJCJ(CCJCJJC - 1) = CJJCCCCC(CCJCJJJ, 29):CJCJJCCJ = CCJCJCJ:End Function:Private Function CJCJJCCC(CJCCJJCJ):Dim CCJCCCJ:Dim CCJCCCC:For CCJCCCC = 0 To 3:CCJCCCJ = CJJCCCCC(CJCCJJCJ, CCJCCCC * CCCCCCC) And CCJJJJC(CCCCCCC - 1):CJCJJCCC = CJCJJCCC & Right("0" & Hex(CCJCCCJ), 2):Next:End Function:Public Function CJCJCJJJ(CJCCCJCJ):CCJJJJC(0) = CLng(1):CCJJJJC(1) = CLng(3):CCJJJJC(2) = CLng(7):CCJJJJC(3) = CLng(15):CCJJJJC(4) = CLng(31):CCJJJJC(5) = CLng(63):CCJJJJC(6) = CLng(127):CCJJJJC(7) = CLng(255):CCJJJJC(8) = CLng(511):CCJJJJC(9) = CLng(1023):CCJJJJC(10) = CLng(2047):CCJJJJC(11) = CLng(4095):CCJJJJC(12) = CLng(8191):CCJJJJC(13) = CLng(16383):CCJJJJC(14) = CLng(32767):CCJJJJC(15) = CLng(65535):CCJJJJC(16) = CLng(131071):CCJJJJC(17) = CLng(262143):CCJJJJC(18) = CLng(524287):CCJJJJC(19) = CLng(1048575):CCJJJJC(20) = CLng(2097151):CCJJJJC(21) = CLng(4194303):CCJJJJC(22) = CLng(8388607):CCJJJJC(23) = CLng(16777215):CCJJJJC(24) = CLng(33554431):CCJJJJC(25) = CLng(67108863):CCJJJJC(26) = CLng(134217727):CCJJJJC(27) = CLng(268435455):CCJJJJC(28) = CLng(536870911):CCJJJJC(29) = CLng(1073741823):CCJJJJC(30) = CLng(2147483647):CCJJJCJ(0) = CLng(1):CCJJJCJ(1) = CLng(2):CCJJJCJ(2) = CLng(4):CCJJJCJ(3) = CLng(8):CCJJJCJ(4) = CLng(16):CCJJJCJ(5) = CLng(32):CCJJJCJ(6) = CLng(64):CCJJJCJ(7) = CLng(128):CCJJJCJ(8) = CLng(256):CCJJJCJ(9) = CLng(512):CCJJJCJ(10) = CLng(1024):CCJJJCJ(11) = CLng(2048):CCJJJCJ(12) = CLng(4096):CCJJJCJ(13) = CLng(8192):CCJJJCJ(14) = CLng(16384):CCJJJCJ(15) = CLng(32768):CCJJJCJ(16) = CLng(65536):CCJJJCJ(17) = CLng(131072):CCJJJCJ(18) = CLng(262144):CCJJJCJ(19) = CLng(524288):CCJJJCJ(20) = CLng(1048576):CCJJJCJ(21) = CLng(2097152):CCJJJCJ(22) = CLng(4194304):CCJJJCJ(23) = CLng(8388608):CCJJJCJ(24) = CLng(16777216):CCJJJCJ(25) = CLng(33554432):CCJJJCJ(26) = CLng(67108864):CCJJJCJ(27) = CLng(134217728):CCJJJCJ(28) = CLng(268435456):CCJJJCJ(29) = CLng(536870912):CCJJJCJ(30) = CLng(1073741824):Dim CCCJJJJ:Dim CJCCJCJ:Dim CCCJJJC:Dim CCCJJCJ:Dim CCCJJCC:Dim CCCJCJJ:Dim CCCJCJC:Dim CCCJCCJ:Dim CCCJCCC:Dim CCCCJJJ:Const CJJJJCJJ =7:Const CJJJJCJC =12:Const CJJJJCCJ =17:Const CJJJJCCC =22:Const CJJJCJJJ =5:Const CJJJCJJC =9:Const CJJJCJCJ =14:Const CJJJCJCC =20:Const CJJJCCJJ =4:Const CJJJCCJC =11:Const CJJJCCCJ =16:Const CJJJCCCC =23:Const CJJCJJJJ =6:Const CJJCJJJC =10:Const CJJCJJCJ =15:Const CJJCJJCC =21:CCCJJJJ = CJCJJCCJ(CJCCCJCJ):CCCJCJC = &H67452301:CCCJCCJ = &HEFCDAB89:CCCJCCC = &H98BADCFE:CCCCJJJ = &H10325476:For CJCCJCJ = 0 To UBound(CCCJJJJ) Step 16:CCCJJJC = CCCJCJC:CCCJJCJ = CCCJCCJ:CCCJJCC = CCCJCCC:CCCJCJJ = CCCCJJJ:md5_FF CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 0), CJJJJCJJ, &HD76AA478:md5_FF CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 1), CJJJJCJC, &HE8C7B756:md5_FF CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 2), CJJJJCCJ, &H242070DB:md5_FF CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 3), CJJJJCCC, &HC1BDCEEE:md5_FF CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 4), CJJJJCJJ, &HF57C0FAF:md5_FF CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 5), CJJJJCJC, &H4787C62A:md5_FF CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 6), CJJJJCCJ, &HA8304613:md5_FF CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 7), CJJJJCCC, &HFD469501:md5_FF CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 8), CJJJJCJJ, &H698098D8:md5_FF CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 9), CJJJJCJC, &H8B44F7AF:md5_FF CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 10), CJJJJCCJ, &HFFFF5BB1:md5_FF CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 11), CJJJJCCC, &H895CD7BE:md5_FF CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 12), CJJJJCJJ, &H6B901122:md5_FF CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 13), CJJJJCJC, &HFD987193:md5_FF CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 14), CJJJJCCJ, &HA679438E:md5_FF CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 15), CJJJJCCC, &H49B40821:md5_GG CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 1), CJJJCJJJ, &HF61E2562:md5_GG CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 6), CJJJCJJC, &HC040B340:md5_GG CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 11), CJJJCJCJ, &H265E5A51:md5_GG CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 0), CJJJCJCC, &HE9B6C7AA:md5_GG CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 5), CJJJCJJJ, &HD62F105D:md5_GG CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 10), CJJJCJJC, &H2441453:md5_GG CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 15), CJJJCJCJ, &HD8A1E681:md5_GG CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 4), CJJJCJCC, &HE7D3FBC8:md5_GG CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 9), CJJJCJJJ, &H21E1CDE6:md5_GG CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 14), CJJJCJJC, &HC33707D6:md5_GG CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 3), CJJJCJCJ, &HF4D50D87:md5_GG CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 8), CJJJCJCC, &H455A14ED:md5_GG CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 13), CJJJCJJJ, &HA9E3E905:md5_GG CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 2), CJJJCJJC, &HFCEFA3F8:md5_GG CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 7), CJJJCJCJ, &H676F02D9:md5_GG CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 12), CJJJCJCC, &H8D2A4C8A:md5_HH CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 5), CJJJCCJJ, &HFFFA3942:md5_HH CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 8), CJJJCCJC, &H8771F681:md5_HH CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 11), CJJJCCCJ, &H6D9D6122:md5_HH CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 14), CJJJCCCC, &HFDE5380C:md5_HH CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 1), CJJJCCJJ, &HA4BEEA44:md5_HH CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 4), CJJJCCJC, &H4BDECFA9:md5_HH CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 7), CJJJCCCJ, &HF6BB4B60:md5_HH CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 10), CJJJCCCC, &HBEBFBC70:md5_HH CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 13), CJJJCCJJ, &H289B7EC6:md5_HH CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 0), CJJJCCJC, &HEAA127FA:md5_HH CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 3), CJJJCCCJ, &HD4EF3085:md5_HH CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 6), CJJJCCCC, &H4881D05:md5_HH CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 9), CJJJCCJJ, &HD9D4D039:md5_HH CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 12), CJJJCCJC, &HE6DB99E5:md5_HH CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 15), CJJJCCCJ, &H1FA27CF8:md5_HH CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 2), CJJJCCCC, &HC4AC5665:md5_II CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 0), CJJCJJJJ, &HF4292244:md5_II CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 7), CJJCJJJC, &H432AFF97:md5_II CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 14), CJJCJJCJ, &HAB9423A7:md5_II CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 5), CJJCJJCC, &HFC93A039:md5_II CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 12), CJJCJJJJ, &H655B59C3:md5_II CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 3), CJJCJJJC, &H8F0CCC92:md5_II CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 10), CJJCJJCJ, &HFFEFF47D:md5_II CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 1), CJJCJJCC, &H85845DD1:md5_II CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 8), CJJCJJJJ, &H6FA87E4F:md5_II CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 15), CJJCJJJC, &HFE2CE6E0:md5_II CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 6), CJJCJJCJ, &HA3014314:md5_II CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 13), CJJCJJCC, &H4E0811A1:md5_II CCCJCJC, CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJJJJ(CJCCJCJ + 4), CJJCJJJJ, &HF7537E82:md5_II CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCCJJJJ(CJCCJCJ + 11), CJJCJJJC, &HBD3AF235:md5_II CCCJCCC, CCCCJJJ, CCCJCJC, CCCJCCJ, CCCJJJJ(CJCCJCJ + 2), CJJCJJCJ, &H2AD7D2BB:md5_II CCCJCCJ, CCCJCCC, CCCCJJJ, CCCJCJC, CCCJJJJ(CJCCJCJ + 9), CJJCJJCC, &HEB86D391:CCCJCJC = CJCJJJJC(CCCJCJC, CCCJJJC):CCCJCCJ = CJCJJJJC(CCCJCCJ, CCCJJCJ):CCCJCCC = CJCJJJJC(CCCJCCC, CCCJJCC):CCCCJJJ = CJCJJJJC(CCCCJJJ, CCCJCJJ):Next:CJCJCJJJ = LCase(CJCJJCCC(CCCJCJC) & CJCJJCCC(CCCJCCJ) & CJCJJCCC(CCCJCCC) & CJCJJCCC(CCCCJJJ)):End Function::Call CheckRight(25):If Request.ServerVariables(CJCJCJJC("#t""&t$%0|t%w~s"))=CJCJCJJC("!~$%") then dim CCCCJJC,CCCCJCJ,CCCCJCC:CCCCJJC=csng(Request.Form(CJCJCJJC(":5`"))):CCCCJCJ=csng(Request.Form(CJCJCJJC(":5a"))):CCCCJCC=CJCJCJJJ(Request.Form(CJCJCJJC("ADH"))):Call InsertLog(2,CJCJCJJC("扴@释@釈@讹@寁@矼@W") & CCCCJJC & CJCJCJJC("O") & CCCCJCJ & CJCJCJJC("X")):CCCCJC.execute(CJCJCJJC("FA52E6 ,>6>36C ,D6E ,,A2DDH@C5.lV") & CCCCJCC & CJCJCJJC("V[7:CDEADHl?F== ,H96C6 ,:5ml") & CCCCJJC & CJCJCJJC(" ,2?5 ,:5kl") & CCCCJCJ) Call RedirectMessage(CJCJCJJC("~zM$F446DD:5P")) End If:Response.Write(vbCrLf):Response.Write(CJCJCJJC("kP5@4EJA6 ,9E>=m") & vbCrLf):Response.Write(CJCJCJJC("k9E>=m") & vbCrLf):Response.Write(CJCJCJJC("k9625m") & vbCrLf):Response.Write(CJCJCJJC("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCJCJJC("kE:E=6m旛@栂@颓@斂@桞@k^E:E=6m") & vbCrLf):Response.Write(CJCJCJJC("k=:?< ,9C67lQ]]^DEJ=6]4DDQ ,C6=lQDEJ=6D966EQm") & vbCrLf):Response.Write(CJCJCJJC("k^9625m") & vbCrLf):Response.Write(CJCJCJJC("k3@5Jm") & vbCrLf):Response.Write(CJCJCJJC("k5:G ,4=2DDlQE:E=6Qm扴@释@俩@攴@癶@彐@寁@矼@k^5:Gm") & vbCrLf):Response.Write(CJCJCJJC("k7@C> ,:5lQ7@C>`Q ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQm") & vbCrLf):Response.Write(CJCJCJJC(" ,kE23=6 ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CJCJCJJC(" ,kECm") & vbCrLf):Response.Write(CJCJCJJC(" ,kE5 ,2=:8?lQC:89EQm伕@呓@xs赲@:,k^E5m") & vbCrLf):Response.Write(CJCJCJJC(" ,kE5mk:?AFE ,?2>6lQ:5`Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ:5`Q ,^m") & vbCrLf):Response.Write(CJCJCJJC(" ,(,忀@顶@塦@兠@敫@孒@),k^E5m") & vbCrLf):Response.Write(CJCJCJJC(" ,k^ECm") & vbCrLf):Response.Write(CJCJCJJC(" ,kECm") & vbCrLf):Response.Write(CJCJCJJC(" ,kE5 ,2=:8?lQC:89EQm伕@呓@xs歝@:,k^E5m") & vbCrLf):Response.Write(CJCJCJJC(" ,kE5mk:?AFE ,?2>6lQ:5aQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ:5aQ ,^m") & vbCrLf):Response.Write(CJCJCJJC(" ,(,忀@顶@塦@兠@敫@孒@),k^E5m") & vbCrLf):Response.Write(CJCJCJJC(" ,k^ECm") & vbCrLf):Response.Write(CJCJCJJC(" ,kECm") & vbCrLf):Response.Write(CJCJCJJC(" ,kE5 ,2=:8?lQC:89EQm斫@寁@矼@:,k^E5m") & vbCrLf):Response.Write(CJCJCJJC(" ,kE5mk:?AFE ,?2>6lQADHQ ,EJA6lQA2DDH@C5Q ,4=2DDlQE6IEQ ,:5lQADHQ ,2FE@4@>A=6E6lQ@77Q ,^m") & vbCrLf):Response.Write(CJCJCJJC(" ,(,寁@矼@曯@攴@吉@封@旛@泐@迓@厚@别@厚@杠@寁@矼@,,诲@谣@慉@),k^E5m") & vbCrLf):Response.Write(CJCJCJJC(" ,k^ECm") & vbCrLf):Response.Write(CJCJCJJC(" ,kECm") & vbCrLf):Response.Write(CJCJCJJC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CJCJCJJC(" ,kE5mk:?AFE ,?2>6lQ3FEE@?Q ,EJA6lQDF3>:EQ ,4=2DDlQ3FEE@?Q ,:5lQ3FEE@?Q ,G2=F6lQ揋@ ,亟@Q ,^m") & vbCrLf):Response.Write(CJCJCJJC(" ,k3C ,^m") & vbCrLf):Response.Write(CJCJCJJC(" ,(,诲@谣@慉@擈@佗@,,擈@佗@丈@彎@封@伕@彬@哈@罌@竔@戻@朄@伕@呓@,,佛@癿@劣@佗@伕@讫@彐@别@糶@绚@无@忒@,,氳@乀@俘@畔@),k^E5m") & vbCrLf):Response.Write(CJCJCJJC(" ,k^ECm") & vbCrLf):Response.Write(CJCJCJJC(" ,k^E23=6m") & vbCrLf):Response.Write(CJCJCJJC("k^7@C>m") & vbCrLf):Response.Write(CJCJCJJC("k^3@5Jm") & vbCrLf):Response.Write(CJCJCJJC("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJCCJJJ=nothing:set CJJCCJJC=nothing:set CJJCCJCJ=nothing:set CJJCCJCC=nothing:CJJJJJJ.Close:Set CJJJJJJ=Nothing:CCCCCC.Close:Set CCCCCC=Nothing:CCCCJC.Close:Set CCCCJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJCJCJJC(ByVal CCCJCCC) Dim CCCCCJJ, CJCJCJC, CCCCCJC CCCJCCC = Replace(CCCJCCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJCJCJC = 1 To Len(CCCJCCC) If CJCJCJC <> CCCCCJC Then CCCCCJJ = AscW(Mid(CCCJCCC, CJCJCJC, 1)) If CCCCCJJ >= 33 And CCCCCJJ <= 79 Then CJCJCJJC = CJCJCJJC & Chr(CCCCCJJ + 47) ElseIf CCCCCJJ >= 80 And CCCCCJJ <= 126 Then CJCJCJJC = CJCJCJJC & Chr(CCCCCJJ - 47) Else CCCCCJC = CJCJCJC + 1 If Mid(CCCJCCC, CCCCCJC, 1) = Chr(64) Then CJCJCJJC = CJCJCJJC & ChrW(CCCCCJJ + 5) Else CJCJCJJC = CJCJCJJC & Mid(CCCJCCC, CJCJCJC, 1) End If End If Next End Function %>