<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CJJJJJJ, CJJJJJC,CJJJJCJ, CJJJJCC, CJJJCJJ:Set CJJJJJJ = server.CreateObject(CJCCCCCJ("ps~sq]r@??64E:@?")):CJJJJJJ.open Application(CJCCCCCJ("r@??64E:@?$EC:?8")):Set CJJJJJC=CJJJJJJ::Function CJCJJJJJ(CJCCCCCC):Dim str,CJJJCCJ:str = Trim(CJCCCCCC):If IsNull(str) Or str = "" Then CJCJJJJJ = "" else str=Replace(str, CJCCCCCJ("V"), "") str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CJCCCCCJ("k:7C2>6"), CJCCCCCJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJCCCCCJ("kD4C:AE"), CJCCCCCJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJJJCCJ=new RegExp:CJJJCCJ.Pattern=CJCCCCCJ("@?W,2\K.ZXl"):CJJJCCJ.IgnoreCase = True:CJJJCCJ.Global=True:str=CJJJCCJ.Replace(str,CJCCCCCJ("@?S`U6BF2=Dj")):set CJJJCCJ=nothing:CJCJJJJJ=str End If:End Function::Const CJJJCJCJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$"::Function CJCJJJJC():dim CJJJCCC:CJJJCCC = Cstr(Request.ServerVariables("HTTP_X_FORWARDED_FOR")):If CJJJCCC = "" Then CJJJCCC = Cstr(Request.ServerVariables(CJCCCCCJ("#t|~%t0pss#"))) if instr(CJJJCCC,CJCCCCCJ("i"))>0 then CJJJCCC=left(CJJJCCC,instr(CJJJCCC,CJCCCCCJ("i"))-1) elseif instr(CJJJCCC,CJCCCCCJ("["))>0 then CJJJCCC=left(CJJJCCC,instr(CJJJCCC,CJCCCCCJ("["))-1) end if:CJCJJJJC=left(CJJJCCC,15):End Function::::::::::Function CJCJJJCJ(CCJCJCC):if isnull(CCJCJCC) or trim(CCJCJCC)="" or not isnumeric(CCJCJCC) then CJCJJJCJ=false else Dim CJJJCCJ:Set CJJJCCJ = New RegExp:CJJJCCJ.Pattern = CJCCCCCJ("/-5ZS"):CJJJCCJ.IgnoreCase = True:CJCJJJCJ = CJJJCCJ.test(CCJCJCC):set CJJJCCJ=nothing end if:End Function::Function CJCJJJCC():dim CJJCJJJ,CJJCJJC,CJJCJCJ:CJJCJCJ=10001:CJJCJJJ=CJCCCCCJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\WC@H0?F>36CWX@G6CW@C56C ,3J ,:5XZ") & CJJCJCJ-1 & CJCCCCCJ("X ,2D ,5:77 ,7C@> ,>6>36C ,H96C6 ,:5m") & CJJCJCJ-1 & CJCCCCCJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJJCJJC=CJJJJJJ.execute(CJJCJJJ):CJCJJJCC = CJJCJJC(0):if isnull(CJCJJJCC) then CJCJJJCC=CJJCJCJ CJJCJJC.close : set CJJCJJC=nothing:End Function:::Sub ConnClose():On Error Resume Next:set CJCJJCJJ=nothing:set CJCJJCJC=nothing:set CJCJJCCJ=nothing:set CJCJJCCC=nothing:CJJCJJC.close : set CJJCJJC=nothing:CJJJJCC.Close : Set CJJJJCC=Nothing:CJJJJCJ.Close : Set CJJJJCJ=Nothing:CJCJCJJJ.Close : Set CJCJCJJJ = Nothing:CJJJJJJ.Close : Set CJJJJJJ = Nothing:err.Clear:On Error Goto 0:End Sub::::::::::::::::::Function CJCJCJJC(ByVal CJCJCJCJ,style):if not isdate(CJCJCJCJ) then CJCJCJJC=CJCJCJCJ:exit function end if:dim CJJCJCC,CJJCCJJ,CJJCCJC,CJJCCCJ:CJCJCJCJ=cdate(CJCJCJCJ):CJJCJCC=Year(CJCJCJCJ):CJJCCJJ=Month(CJCJCJCJ):CJJCCJC=Day(CJCJCJCJ):select case style:case 0:CJCJCJJC=CJJCJCC & CJCCCCCJ("\") & right(0 & CJJCCJJ,2) & CJCCCCCJ("\") & right(0 & CJJCCJC,2):case 1:CJCJCJJC=CJJCJCC & right(0 & CJJCCJJ,2) & right(0 & CJJCCJC,2):case 2:CJCJCJJC=right(CJJCJCC,2) & CJCCCCCJ("\") & right(0 & CJJCCJJ,2) & CJCCCCCJ("\") & right(0 & CJJCCJC,2):case 3:CJCJCJJC=CJJCJCC & CJCCCCCJ("\") & right(0 & CJJCCJJ,2):case 4:CJCJCJJC=right(0 & CJJCCJJ,2) & CJCCCCCJ("\") & right(0 & CJJCCJC,2):case 5:CJCJCJJC=right(0 & CJJCCJC,2):case 6:CJCJCJJC=CJJCJCC & CJCCCCCJ("幯@") & right(0 & CJJCCJJ,2) & CJCCCCCJ("會@") & right(0 & CJJCCJC,2) & CJCCCCCJ("无@"):case else CJCJCJJC=CJCJCJCJ:end select:End Function:::::::::::::::::::Function CJCJCJCC(str,CCJJJJJJ):if isnull(str) or str="" or CCJJJJJJ="" then CJCJCJCC=False:exit function end if:Dim CJJJCCJ:Set CJJJCCJ = New RegExp:CJJJCCJ.Pattern = CCJJJJJJ:CJJJCCJ.IgnoreCase = True:CJCJCJCC = CJJJCCJ.test(str):set CJJJCCJ=nothing:End Function:::Private Const CJJJCJCC =8:Private Const CJJJCCJJ =4:Private Const CJJJCCJC =32:Private CJJCCCC(30):Private CJCJJJJ(30):Private Function CJCJCCJJ(CCJJJJJC, CCJJJJCJ):If CCJJJJCJ = 0 Then CJCJCCJJ = CCJJJJJC:Exit Function ElseIf CCJJJJCJ = 31 Then If CCJJJJJC And 1 Then CJCJCCJJ = &H80000000 Else CJCJCCJJ = 0 End If:Exit Function ElseIf CCJJJJCJ < 0 Or CCJJJJCJ > 31 Then Err.Raise 6 End If:If (CCJJJJJC And CJCJJJJ(31 - CCJJJJCJ)) Then CJCJCCJJ = ((CCJJJJJC And CJJCCCC(31 - (CCJJJJCJ + 1))) * CJCJJJJ(CCJJJJCJ)) Or &H80000000 Else CJCJCCJJ = ((CCJJJJJC And CJJCCCC(31 - CCJJJJCJ)) * CJCJJJJ(CCJJJJCJ)) End If:End Function:Private Function CJCJCCJC(CCJJJJJC, CCJJJJCJ):If CCJJJJCJ = 0 Then CJCJCCJC = CCJJJJJC:Exit Function ElseIf CCJJJJCJ = 31 Then If CCJJJJJC And &H80000000 Then CJCJCCJC = 1 Else CJCJCCJC = 0 End If:Exit Function ElseIf CCJJJJCJ < 0 Or CCJJJJCJ > 31 Then Err.Raise 6 End If:CJCJCCJC = (CCJJJJJC And &H7FFFFFFE) \ CJCJJJJ(CCJJJJCJ):If (CCJJJJJC And &H80000000) Then CJCJCCJC = (CJCJCCJC Or (&H40000000 \ CJCJJJJ(CCJJJJCJ - 1))) End If:End Function:Private Function CJCJCCCJ(CCJJJJJC, CCJJJJCJ):CJCJCCCJ = CJCJCCJJ(CCJJJJJC, CCJJJJCJ) Or CJCJCCJC(CCJJJJJC, (32 - CCJJJJCJ)):End Function:Private Function CJCJCCCC(CCJJJJCC, CCJJJCJJ):Dim CJCJJJC:Dim CJCJJCJ:Dim CJCJJCC:Dim CJCJCJJ:Dim CJCJCJC:CJCJJCC = CCJJJJCC And &H80000000:CJCJCJJ = CCJJJCJJ And &H80000000:CJCJJJC = CCJJJJCC And &H40000000:CJCJJCJ = CCJJJCJJ And &H40000000:CJCJCJC = (CCJJJJCC And &H3FFFFFFF) + (CCJJJCJJ And &H3FFFFFFF):If CJCJJJC And CJCJJCJ Then CJCJCJC = CJCJCJC Xor &H80000000 Xor CJCJJCC Xor CJCJCJJ ElseIf CJCJJJC Or CJCJJCJ Then If CJCJCJC And &H40000000 Then CJCJCJC = CJCJCJC Xor &HC0000000 Xor CJCJJCC Xor CJCJCJJ Else CJCJCJC = CJCJCJC Xor &H40000000 Xor CJCJJCC Xor CJCJCJJ End If Else CJCJCJC = CJCJCJC Xor CJCJJCC Xor CJCJCJJ End If:CJCJCCCC = CJCJCJC:End Function:Private Function CJCCJJJJ(CJCCCCJ, CJJCJCC, CCJJJCJC):CJCCJJJJ = (CJCCCCJ And CJJCJCC) Or ((Not CJCCCCJ) And CCJJJCJC):End Function:Private Function CJCCJJJC(CJCCCCJ, CJJCJCC, CCJJJCJC):CJCCJJJC = (CJCCCCJ And CCJJJCJC) Or (CJJCJCC And (Not CCJJJCJC)):End Function:Private Function CJCCJJCJ(CJCCCCJ, CJJCJCC, CCJJJCJC):CJCCJJCJ = (CJCCCCJ Xor CJJCJCC Xor CCJJJCJC):End Function:Private Function CJCCJJCC(CJCCCCJ, CJJCJCC, CCJJJCJC):CJCCJJCC = (CJJCJCC Xor (CJCCCCJ Or (Not CCJJJCJC))):End Function:Private Sub md5_FF(CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ, CCJCJJJ, CCJJJCCJ):CCJJCJJ = CJCJCCCC(CCJJCJJ, CJCJCCCC(CJCJCCCC(CJCCJJJJ(CCJJCJC, CCJJCCJ, CJJCCJC), CJCCCCJ), CCJJJCCJ)):CCJJCJJ = CJCJCCCJ(CCJJCJJ, CCJCJJJ):CCJJCJJ = CJCJCCCC(CCJJCJJ, CCJJCJC):End Sub:Private Sub md5_GG(CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ, CCJCJJJ, CCJJJCCJ):CCJJCJJ = CJCJCCCC(CCJJCJJ, CJCJCCCC(CJCJCCCC(CJCCJJJC(CCJJCJC, CCJJCCJ, CJJCCJC), CJCCCCJ), CCJJJCCJ)):CCJJCJJ = CJCJCCCJ(CCJJCJJ, CCJCJJJ):CCJJCJJ = CJCJCCCC(CCJJCJJ, CCJJCJC):End Sub:Private Sub md5_HH(CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ, CCJCJJJ, CCJJJCCJ):CCJJCJJ = CJCJCCCC(CCJJCJJ, CJCJCCCC(CJCJCCCC(CJCCJJCJ(CCJJCJC, CCJJCCJ, CJJCCJC), CJCCCCJ), CCJJJCCJ)):CCJJCJJ = CJCJCCCJ(CCJJCJJ, CCJCJJJ):CCJJCJJ = CJCJCCCC(CCJJCJJ, CCJJCJC):End Sub:Private Sub md5_II(CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ, CCJCJJJ, CCJJJCCJ):CCJJCJJ = CJCJCCCC(CCJJCJJ, CJCJCCCC(CJCJCCCC(CJCCJJCC(CCJJCJC, CCJJCCJ, CJJCCJC), CJCCCCJ), CCJJJCCJ)):CCJJCJJ = CJCJCCCJ(CCJJCJJ, CCJCJJJ):CCJJCJJ = CJCJCCCC(CCJJCJJ, CCJJCJC):End Sub:Private Function CJCCJCJJ(CCJJJCCC):Dim CJCJCCJ:Dim CJCJCCC:Dim CJCCJJJ():Dim CJCCJJC:Dim CJCCJCJ:Dim CJCCJCC:Const CJJJCCCJ =512:Const CJJJCCCC =448:CJCJCCJ = Len(CCJJJCCC):CJCJCCC = (((CJCJCCJ + ((CJJJCCCJ - CJJJCCCC) \ CJJJCJCC)) \ (CJJJCCCJ \ CJJJCJCC)) + 1) * (CJJJCCCJ \ CJJJCCJC):ReDim CJCCJJJ(CJCJCCC - 1):CJCCJJC = 0:CJCCJCJ = 0:Do Until CJCCJCJ >= CJCJCCJ:CJCCJCC = CJCCJCJ \ CJJJCCJJ:CJCCJJC = (CJCCJCJ Mod CJJJCCJJ) * CJJJCJCC:CJCCJJJ(CJCCJCC) = CJCCJJJ(CJCCJCC) Or CJCJCCJJ(Asc(Mid(CCJJJCCC, CJCCJCJ + 1, 1)), CJCCJJC):CJCCJCJ = CJCCJCJ + 1:Loop:CJCCJCC = CJCCJCJ \ CJJJCCJJ:CJCCJJC = (CJCCJCJ Mod CJJJCCJJ) * CJJJCJCC:CJCCJJJ(CJCCJCC) = CJCCJJJ(CJCCJCC) Or CJCJCCJJ(&H80, CJCCJJC):CJCCJJJ(CJCJCCC - 2) = CJCJCCJJ(CJCJCCJ, 3):CJCCJJJ(CJCJCCC - 1) = CJCJCCJC(CJCJCCJ, 29):CJCCJCJJ = CJCCJJJ:End Function:Private Function CJCCJCJC(CCJJJJJC):Dim CJCCCJJ:Dim CJCCCJC:For CJCCCJC = 0 To 3:CJCCCJJ = CJCJCCJC(CCJJJJJC, CJCCCJC * CJJJCJCC) And CJJCCCC(CJJJCJCC - 1):CJCCJCJC = CJCCJCJC & Right("0" & Hex(CJCCCJJ), 2):Next:End Function:Public Function CJCCJCCJ(CCJJJCCC):CJJCCCC(0) = CLng(1):CJJCCCC(1) = CLng(3):CJJCCCC(2) = CLng(7):CJJCCCC(3) = CLng(15):CJJCCCC(4) = CLng(31):CJJCCCC(5) = CLng(63):CJJCCCC(6) = CLng(127):CJJCCCC(7) = CLng(255):CJJCCCC(8) = CLng(511):CJJCCCC(9) = CLng(1023):CJJCCCC(10) = CLng(2047):CJJCCCC(11) = CLng(4095):CJJCCCC(12) = CLng(8191):CJJCCCC(13) = CLng(16383):CJJCCCC(14) = CLng(32767):CJJCCCC(15) = CLng(65535):CJJCCCC(16) = CLng(131071):CJJCCCC(17) = CLng(262143):CJJCCCC(18) = CLng(524287):CJJCCCC(19) = CLng(1048575):CJJCCCC(20) = CLng(2097151):CJJCCCC(21) = CLng(4194303):CJJCCCC(22) = CLng(8388607):CJJCCCC(23) = CLng(16777215):CJJCCCC(24) = CLng(33554431):CJJCCCC(25) = CLng(67108863):CJJCCCC(26) = CLng(134217727):CJJCCCC(27) = CLng(268435455):CJJCCCC(28) = CLng(536870911):CJJCCCC(29) = CLng(1073741823):CJJCCCC(30) = CLng(2147483647):CJCJJJJ(0) = CLng(1):CJCJJJJ(1) = CLng(2):CJCJJJJ(2) = CLng(4):CJCJJJJ(3) = CLng(8):CJCJJJJ(4) = CLng(16):CJCJJJJ(5) = CLng(32):CJCJJJJ(6) = CLng(64):CJCJJJJ(7) = CLng(128):CJCJJJJ(8) = CLng(256):CJCJJJJ(9) = CLng(512):CJCJJJJ(10) = CLng(1024):CJCJJJJ(11) = CLng(2048):CJCJJJJ(12) = CLng(4096):CJCJJJJ(13) = CLng(8192):CJCJJJJ(14) = CLng(16384):CJCJJJJ(15) = CLng(32768):CJCJJJJ(16) = CLng(65536):CJCJJJJ(17) = CLng(131072):CJCJJJJ(18) = CLng(262144):CJCJJJJ(19) = CLng(524288):CJCJJJJ(20) = CLng(1048576):CJCJJJJ(21) = CLng(2097152):CJCJJJJ(22) = CLng(4194304):CJCJJJJ(23) = CLng(8388608):CJCJJJJ(24) = CLng(16777216):CJCJJJJ(25) = CLng(33554432):CJCJJJJ(26) = CLng(67108864):CJCJJJJ(27) = CLng(134217728):CJCJJJJ(28) = CLng(268435456):CJCJJJJ(29) = CLng(536870912):CJCJJJJ(30) = CLng(1073741824):Dim CJCCCCJ:Dim CJCCCCC:Dim CCJJJJJ:Dim CCJJJJC:Dim CCJJJCJ:Dim CCJJJCC:Dim CCJJCJJ:Dim CCJJCJC:Dim CCJJCCJ:Dim CJJCCJC:Const CJJCJJJJ =7:Const CJJCJJJC =12:Const CJJCJJCJ =17:Const CJJCJJCC =22:Const CJJCJCJJ =5:Const CJJCJCJC =9:Const CJJCJCCJ =14:Const CJJCJCCC =20:Const CJJCCJJJ =4:Const CJJCCJJC =11:Const CJJCCJCJ =16:Const CJJCCJCC =23:Const CJJCCCJJ =6:Const CJJCCCJC =10:Const CJJCCCCJ =15:Const CJJCCCCC =21:CJCCCCJ = CJCCJCJJ(CCJJJCCC):CCJJCJJ = &H67452301:CCJJCJC = &HEFCDAB89:CCJJCCJ = &H98BADCFE:CJJCCJC = &H10325476:For CJCCCCC = 0 To UBound(CJCCCCJ) Step 16:CCJJJJJ = CCJJCJJ:CCJJJJC = CCJJCJC:CCJJJCJ = CCJJCCJ:CCJJJCC = CJJCCJC:md5_FF CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 0), CJJCJJJJ, &HD76AA478:md5_FF CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 1), CJJCJJJC, &HE8C7B756:md5_FF CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 2), CJJCJJCJ, &H242070DB:md5_FF CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 3), CJJCJJCC, &HC1BDCEEE:md5_FF CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 4), CJJCJJJJ, &HF57C0FAF:md5_FF CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 5), CJJCJJJC, &H4787C62A:md5_FF CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 6), CJJCJJCJ, &HA8304613:md5_FF CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 7), CJJCJJCC, &HFD469501:md5_FF CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 8), CJJCJJJJ, &H698098D8:md5_FF CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 9), CJJCJJJC, &H8B44F7AF:md5_FF CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 10), CJJCJJCJ, &HFFFF5BB1:md5_FF CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 11), CJJCJJCC, &H895CD7BE:md5_FF CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 12), CJJCJJJJ, &H6B901122:md5_FF CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 13), CJJCJJJC, &HFD987193:md5_FF CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 14), CJJCJJCJ, &HA679438E:md5_FF CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 15), CJJCJJCC, &H49B40821:md5_GG CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 1), CJJCJCJJ, &HF61E2562:md5_GG CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 6), CJJCJCJC, &HC040B340:md5_GG CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 11), CJJCJCCJ, &H265E5A51:md5_GG CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 0), CJJCJCCC, &HE9B6C7AA:md5_GG CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 5), CJJCJCJJ, &HD62F105D:md5_GG CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 10), CJJCJCJC, &H2441453:md5_GG CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 15), CJJCJCCJ, &HD8A1E681:md5_GG CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 4), CJJCJCCC, &HE7D3FBC8:md5_GG CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 9), CJJCJCJJ, &H21E1CDE6:md5_GG CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 14), CJJCJCJC, &HC33707D6:md5_GG CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 3), CJJCJCCJ, &HF4D50D87:md5_GG CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 8), CJJCJCCC, &H455A14ED:md5_GG CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 13), CJJCJCJJ, &HA9E3E905:md5_GG CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 2), CJJCJCJC, &HFCEFA3F8:md5_GG CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 7), CJJCJCCJ, &H676F02D9:md5_GG CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 12), CJJCJCCC, &H8D2A4C8A:md5_HH CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 5), CJJCCJJJ, &HFFFA3942:md5_HH CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 8), CJJCCJJC, &H8771F681:md5_HH CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 11), CJJCCJCJ, &H6D9D6122:md5_HH CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 14), CJJCCJCC, &HFDE5380C:md5_HH CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 1), CJJCCJJJ, &HA4BEEA44:md5_HH CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 4), CJJCCJJC, &H4BDECFA9:md5_HH CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 7), CJJCCJCJ, &HF6BB4B60:md5_HH CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 10), CJJCCJCC, &HBEBFBC70:md5_HH CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 13), CJJCCJJJ, &H289B7EC6:md5_HH CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 0), CJJCCJJC, &HEAA127FA:md5_HH CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 3), CJJCCJCJ, &HD4EF3085:md5_HH CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 6), CJJCCJCC, &H4881D05:md5_HH CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 9), CJJCCJJJ, &HD9D4D039:md5_HH CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 12), CJJCCJJC, &HE6DB99E5:md5_HH CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 15), CJJCCJCJ, &H1FA27CF8:md5_HH CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 2), CJJCCJCC, &HC4AC5665:md5_II CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 0), CJJCCCJJ, &HF4292244:md5_II CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 7), CJJCCCJC, &H432AFF97:md5_II CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 14), CJJCCCCJ, &HAB9423A7:md5_II CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 5), CJJCCCCC, &HFC93A039:md5_II CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 12), CJJCCCJJ, &H655B59C3:md5_II CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 3), CJJCCCJC, &H8F0CCC92:md5_II CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 10), CJJCCCCJ, &HFFEFF47D:md5_II CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 1), CJJCCCCC, &H85845DD1:md5_II CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 8), CJJCCCJJ, &H6FA87E4F:md5_II CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 15), CJJCCCJC, &HFE2CE6E0:md5_II CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 6), CJJCCCCJ, &HA3014314:md5_II CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 13), CJJCCCCC, &H4E0811A1:md5_II CCJJCJJ, CCJJCJC, CCJJCCJ, CJJCCJC, CJCCCCJ(CJCCCCC + 4), CJJCCCJJ, &HF7537E82:md5_II CJJCCJC, CCJJCJJ, CCJJCJC, CCJJCCJ, CJCCCCJ(CJCCCCC + 11), CJJCCCJC, &HBD3AF235:md5_II CCJJCCJ, CJJCCJC, CCJJCJJ, CCJJCJC, CJCCCCJ(CJCCCCC + 2), CJJCCCCJ, &H2AD7D2BB:md5_II CCJJCJC, CCJJCCJ, CJJCCJC, CCJJCJJ, CJCCCCJ(CJCCCCC + 9), CJJCCCCC, &HEB86D391:CCJJCJJ = CJCJCCCC(CCJJCJJ, CCJJJJJ):CCJJCJC = CJCJCCCC(CCJJCJC, CCJJJJC):CCJJCCJ = CJCJCCCC(CCJJCCJ, CCJJJCJ):CJJCCJC = CJCJCCCC(CJJCCJC, CCJJJCC):Next:CJCCJCCJ = LCase(CJCCJCJC(CCJJCJJ) & CJCCJCJC(CCJJCJC) & CJCCJCJC(CCJJCCJ) & CJCCJCJC(CJJCCJC)):End Function::Public Function CJCCJCCC(CCJCJCC):dim CCJJCCC:if isnull(CCJCJCC) or trim(CCJCJCC)="" or not isnumeric(CCJCJCC) or instr(CCJCJCC,CJCCCCCJ("\"))>0 or instr(CCJCJCC,CJCCCCCJ("]"))>0 or left(CCJCJCC,1)="0" then CCJJCCC="" else CCJJCCC=CCJCJCC:if Len(CCJJCCC) Mod 2=1 then CCJJCCC="0" & CCJJCCC Randomize:CCJJCCC=CCJJCCC & Int((99-10+1)*Rnd+10):CCJJCCC=CJCCCJJJ(CCJJCCC):CCJJCCC=CCJJCCC & CJCCCJJC(CCJJCCC) end if:CJCCJCCC=CCJJCCC:End Function::Private Function CJCCCJJJ(str):Dim CCJCJJJ, CCJCJJC, CJCCCCC, CCJCJCJ, CJJCCJJ, CCJCJCC,CCJJCCC:CCJCJCJ = Len(str):For CCJCJJC = 1 To CCJCJCJ:CJCCCCC = CInt(Mid(str, CCJCJJC, 1)):If CJCCCCC < 5 Then CJCCCCC = CJCCCCC + 5 Else CJCCCCC = CJCCCCC - 5 CCJCJJJ = CCJCJJJ & CJCCCCC:Next:For CCJCJJC = 1 To CCJCJCJ - 1 Step 2:CJJCCJJ = Mid(CCJCJJJ, CCJCJJC, 1):CCJCJCC = Mid(CCJCJJJ, CCJCJJC + 1, 1):CCJJCCC = CCJJCCC & CCJCJCC & CJJCCJJ:Next:CJCCCJJJ = StrReverse(CCJJCCC):End Function:Private Function CJCCCJJC(CCJJCJJJ):Dim CCJCJCJ, CCJCJJC, CCJCJCC, CCJCJJJ:CCJCJCJ = Len(CCJJCJJJ):CCJCJCC = 0:For CCJCJJC = 1 To CCJCJCJ:CCJCJJJ = CInt(Mid(CCJJCJJJ, CCJCJJC, 1)):If CCJCJJC Mod 2 = 0 Then CCJCJCC = CCJCJCC + CCJCJJJ * 3 Else CCJCJCC = CCJCJCC + CCJCJJJ Next:CCJCJCC = CCJCJCC Mod 100:CCJCJCC = 100 - CCJCJCC:CJCCCJJC = Right("0" & CCJCJCC, 2):End Function::dim CCJCCJJ,CCJCCJC:CCJCCJJ=Date:CCJCCJC=CJCJCJJC(CCJCCJJ,1):if Request.QueryString="" and Request.Form="" then dim CCJCCCJ:CCJCCCJ=CJCCCCCJ("kF= ,DEJ=6lV=:DE\DEJ=6iDBF2C6j=:?6\96:89Ei`g_TjVmk=:m诠@掠@叞@産@争@笧@丄@斴@糶@绚@(,筻@秫@糶@绚@),三@朧@徾@琁@幮@叫@(,筻@秫@幮@叫@),亵@呓@贿@斔@癿@雁@戋@,,宙@玫@绚@一,讟@讼@,,産@戲@讟@讼@戋@劚@吉@伕@臥@劣@癶@兠@幮@叫@;,k^=:m") & CJCCCCCJ("k=:m釂@産@vt%^!~$%(,卮@&#{拷@掠@我@u@C>),斴@弊@同@朧@稆@床@伛@逍@厽@敫@(,泣@愊@剈@b严@忀@逄@),:,k@=m") & CJCCCCCJ("k=:mD49@@=:,孡@栜@xs,,忀@逄@,,丵@纪@敫@孒@;,k^=:m") & CJCCCCCJ("k=:m?F>36C:,孡@巠@史@,,忀@逄@,,甬@敫@孒@、,孒@毈@我@共@线@吃@线@戋@;,k^=:m") & CJCCCCCJ("k=:m<6J:,骇@讼@孒@笡@中@,,忀@逄@,,甬@孡@栜@xsZ孡@巠@史@Z彎@剈@g佈@幯@會@无@(,好@:,") & CCJCCJC & CJCCCCCJ("),Z揜@扆@寁@钠@拷@掠@(,c严@厽@敫@,,丈@否@Z史@),,,焱@吉@ba佈@|sd力@寁@,,尊@冔@;,k^=:m") & CJCCCCCJ("k=:mC62=?2>6:,眚@宙@姎@合@,,只@逄@,,好@林@丵@穵@刔@釂@産@缑@史@佗@丵@眚@宙@姎@合@;,k^=:m") & CJCCCCCJ("k=:mD6I:,怢@刦@,,只@逄@,,甲@怢@産@`衣@礵@,,奮@怢@産@_衣@礵@,,好@林@丵@穵@刔@黓@讟@丵@甲@怢@;,k^=:m") & CJCCCCCJ("k=:m3:CE952J:,凵@甚@无@朚@,,只@逄@,,g佈@幯@會@无@(,好@:,") & CCJCCJC & CJCCCCCJ("),,,好@林@丵@穵@我@样@弊@丈@歞@硩@,,刔@黓@讟@丵@彎@剈@糶@绚@无@朚@;,k^=:m") & CJCCCCCJ("k=:m56AE`:,陝@糶@合@秫@,,只@逄@,,好@林@丵@穵@刔@黓@讟@改@圣@孡@栜@尽@欜@,,好@林@伛@兠@合@秫@圣@幮@叫@丨@丈@孓@圣@刔@臥@劣@斫@墙@,,敔@聇@巠@诲@囵@宕@丵@斂@孒@“,敔@聇@巠@”,;,k^=:m") & CJCCCCCJ("k=:m56AEa:,与@丕@合@秫@,,只@逄@,,好@林@丵@穵@刔@黓@讟@改@圣@陝@糶@尽@欜@,,好@林@伛@兠@合@秫@圣@幮@叫@丨@丈@孓@圣@刔@臥@劣@斫@墙@,,敔@聇@巠@诲@讹@罩@丵@戻@圣@郣@闣@合@秫@;,k^=:m") & CJCCCCCJ("k=:m56AEb:,珨@红@合@秫@,,只@逄@,,好@林@丵@穵@刔@黓@讟@改@圣@与@丕@尽@欜@,,好@林@伛@兠@合@秫@圣@幮@叫@丨@丈@孓@圣@刔@臥@劣@斫@墙@,,敔@聇@巠@诲@讹@罩@丵@戻@圣@亇@红@郣@闣@合@秫@(,好@旛@亇@红@郣@闣@诲@畔@穵@),;,k^=:m") & CJCCCCCJ("k=:m8C256:,幯@红@合@秫@,,只@逄@,,好@林@伛@兠@合@秫@圣@幮@叫@丨@丈@孓@圣@刔@臥@劣@斫@墙@,,敔@聇@巠@丈@伛@歟@厽@敫@;,k^=:m") & CJCCCCCJ("k=:mC65:C64E:,釈@宕@同@罌@圻@,,只@逄@,,好@林@丵@穵@刔@甬@幮@叫@冮@宕@;,k^=:mk^@=mk^=:m") & CJCCCCCJ("k=:m兮@争@揜@扆@寁@钠@,,诲@迖@兠@幮@叫@孡@栜@吉@叫@癿@糶@绚@厽@敫@讹@罩@丨@讹@宕@,,好@林@寁@钠@丵@穵@,,刔@衣@礵@兮@门@掠@叞@;,k^=:m") & CJCCCCCJ("k=:m兮@争@斫@墙@^曯@斫@癿@惀@冰@误@昉@:,k@=m") & CJCCCCCJ("k=:m彎@孡@巠@史@圣@幮@叫@丨@孓@圣@,,刔@産@伛@兠@厽@敫@丨@朄@倷@癿@顴@曯@斫@亵@呓@埵@朧@贿@斔@,,伛@兠@厽@敫@丵@穵@癿@顴@丈@伕@曯@斫@;,k^=:m") & CJCCCCCJ("k=:m彎@孡@巠@史@圣@幮@叫@丨@丈@孓@圣@,,刔@臥@劣@斫@墙@,,斫@墙@亵@呓@圣@幮@叫@癿@刘@姆@寁@矼@丵@孡@巠@史@吉@e佈@,,好@林@孡@巠@史@丈@趮@e佈@,,尬@産@孡@巠@史@佗@寁@矼@;,k^=:mk^@=mk^=:m") & CJCCCCCJ("k=:m扻@未@攪@拼@:,k@=mk=:m"""":,g____gahek^=:mk=:m田@诘@:,_`_\eahge_``k^=:mk^@=mk^=:mk^F=m") Call ConnClose:Response.Charset=CJCCCCCJ("FE7\g"):Response.Write CCJCCCJ:Response.End() end if:dim CCJCCCC,CCCJJJJ,CCCJJJC,CCCJJCJ,CCCJJCC,CCCJCJJ,CCCJCJC,CCCJCCJ,CCCJCCC,CCCCJJJ,CCCCJJC,CCCCJCJ,CCCCJCC,CCCCCJJ,CCCCCJC,CCCCCCJ,CCCCCCC,CJJJJJJJ,redirect:CCJCCCC=request(CJCCCCCJ("D49@@=")):CCCJJJJ=CJCJJJJJ(request(CJCCCCCJ("?F>36C"))):CCCJJCJ=request(CJCCCCCJ("<6J")):CCCJJCC=CJCJJJJJ(request(CJCCCCCJ("C62=?2>6"))):CCCJCJJ=request(CJCCCCCJ("D6I")):CCCJCJC=request(CJCCCCCJ("3:CE952J")):CCCJCCJ=CJCJJJJJ(request(CJCCCCCJ("56AE`"))):CCCJCCC=CJCJJJJJ(request(CJCCCCCJ("56AEa"))):CCCCJJJ=CJCJJJJJ(request(CJCCCCCJ("56AEb"))):CCCCJCJ=CJCJJJJJ(request(CJCCCCCJ("8C256"))):redirect=request(CJCCCCCJ("C65:C64E")):CCCCCCC=Request.ServerVariables(CJCCCCCJ("w%%!0&$t#0pvt}%")):if not CJCJJJCJ(CCJCCCC) then Call ShowError_(CJCCCCCJ("厽@敫@W$49@@=X忀@顶@丵@纪@敫@孒@")) set CJJJJCJ=CJJJJJJ.execute(CJCCCCCJ("D6=64E ,E@A ,` ,<6JDEC[>6>36C0EJA60A2E9 ,7C@> ,G0D49@@= ,H96C6 ,:5l") & CCJCCCC):if CJJJJCJ.eof then Call ShowError_(CJCCCCCJ("孡@栜@W") & CCJCCCC & CJCCCCCJ("X朥@批@别@")) else CCCJJJC=trim(CJJJJCJ(0)) & "":CCCCCJJ=CJJJJCJ(1):if CCCJJJC="" then Call ShowError_(CJCCCCCJ("掠@叞@兮@门@")) end if:if CCCJJJJ="" then Call ShowError_(CJCCCCCJ("孡@巠@史@W}F>36CX丵@穵@")) if CCCJJCJ="" or Len(CCCJJCJ)<>32 then Call ShowError_(CJCCCCCJ("骇@讼@孒@笡@中@Wz6JX丵@穵@我@佈@敫@丈@寴@")) if CCCJJCJ<>CJCCJCCJ(CCJCCCC & CCCJJJJ & CCJCCJC & CCCJJJC) then Call ShowError_(CJCCCCCJ("骇@讼@夬@贠@")) dim CJJJJJCJ:set CJJJJCC=CJJJJJJ.execute(CJCCCCCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,>6>36C0EJA6 ,@C56C ,3J ,:5 ,56D4")):CJJJJJCJ=CJJJJCC(0)+1:CCCCJJC=CJCCCJCJ(CCCJCCJ,CCCJCCC,CCCCJJJ):CCCCCCJ=CJCCCCJJ(CCCCJCJ):dim CJJJJJCC,CJJJJCJJ:CJJJJJCC=false:CJJJJCJJ=false:set CJJJJCJ=CJJJJJJ.execute(CJCCCCCJ("D6=64E ,E@A ,` ,:5[A2DDH@C5[:DD49@@=25>:? ,7C@> ,G0>6>36C ,H96C6 ,?F>36ClV") & CCCJJJJ & CJCCCCCJ("V ,2?5 ,>6>36C0EJA60E@Al") & CCJCCCC) if CJJJJCJ.eof then CCCCJCC=CJCJJJCC:CCCCCJC=CJCCJCCJ(Right(CCCJJJJ,6)):CJJJJJJJ=false:if CCCJJCC="" then CCCJJCC=CCCJJJJ if CCCJCJJ<>"1" and CCCJCJJ<>"0" then CCCJCJJ=1 if len(CCCJCJC)=8 then CCCJCJC=left(CCCJCJC,4) & CJCCCCCJ("\") & mid(CCCJCJC,5,2) & CJCCCCCJ("\") & right(CCCJCJC,2):if not isdate(CCCJCJC) then CCCJCJC=CCJCCJJ else CCCJCJC=CCJCCJJ end if:CJJJCJJ=CJCCCCCJ(":?D6CE ,:?E@ ,>6>36CW:5[?F>36C[A2DDH@C5[C62=?2>6[D6I[3:CE952J[EJA6[8C256[,DE2E6.[,8C@FA.[4FDE@>8C@FA[:DDEF56?E[=2DEE:>6[=2DE:A[=@8E:>6DX ,G2=F6DW") & CCCCJCC & CJCCCCCJ("[V") & CCCJJJJ & CJCCCCCJ("V") & CJCCCCCJ("[V") & CCCCCJC & CJCCCCCJ("V") & CJCCCCCJ("[}V") & CCCJJCC & CJCCCCCJ("V") & CJCCCCCJ("[") & CCCJCJJ & CJCCCCCJ("[V") & CCCJCJC & CJCCCCCJ("V") & CJCCCCCJ("[") & CCCCJJC & CJCCCCCJ("[") & CCCCCCJ & CJCCCCCJ("[d") & CJCCCCCJ("[_") & CJCCCCCJ("[_") & CJCCCCCJ("[`") & CJCCCCCJ("[86E52E6WX") & CJCCCCCJ("[V") & CJCJJJJC & CJCCCCCJ("V") & CJCCCCCJ("[`") & CJCCCCCJ("X") CJJJJJJ.Execute CJJJCJJ else CCCCJCC=CJJJJCJ(0):CCCCCJC=CJJJJCJ(1):CJJJJJJJ=CJJJJCJ(2):CJJJCJJ="":if CCCJJCC<>"" then CJJJCJJ=CJJJCJJ & CJCCCCCJ("[C62=?2>6l}V") & CCCJJCC & CJCCCCCJ("V") if CCCJCJJ="1" or CCCJCJJ="0" then CJJJCJJ=CJJJCJJ & CJCCCCCJ("[D6Il") & CCCJCJJ if len(CCCJCJC)=8 then CCCJCJC=left(CCCJCJC,4) & CJCCCCCJ("\") & mid(CCCJCJC,5,2) & CJCCCCCJ("\") & right(CCCJCJC,2):if not isdate(CCCJCJC) then CCCJCJC=CCJCCJJ CJJJCJJ=CJJJCJJ & CJCCCCCJ("[3:CE952JlV") & CCCJCJC & CJCCCCCJ("V") end if:if CCCJCCJ<>"" or CCCJCCC<>"" or CCCCJJJ<>"" then CJJJCJJ=CJJJCJJ & CJCCCCCJ("[EJA6l") & CCCCJJC if CCCCJCJ<>"" then CJJJCJJ=CJJJCJJ & CJCCCCCJ("[8C256l") & CCCCCCJ if CJJJCJJ<>"" then CJJJCJJ=CJCCCCCJ("FA52E6 ,>6>36C ,D6E ,=2DEE:>6l86E52E6WX[=2DE:AlV") & CJCJJJJC & CJCCCCCJ("V[=@8E:>6Dl=@8E:>6DZ`[>5dlV") & CJCCJCCJ(CCCCJCC & Now) & CJCCCCCJ("V") & CJJJCJJ & CJCCCCCJ(" ,H96C6 ,:5l") & CCCCJCC CJJJJJJ.execute CJJJCJJ end if end if:if CJJJJJCC then Application.Contents.Remove CJCCCCCJ("!$*0|t|qt#0%*!t") if CJJJJCJJ then Application.Contents.Remove CJCCCCCJ("!$*0|t|qt#0v#pst") Call SetMemberCookie_(CCCCJCC,CCCCCJC):Call ConnClose:if redirect<>"" then Response.Redirect redirect elseif CJCJCJCC(CCCCCCC,CJCCCCCJ(":!9@?6M:!@5Mp?5C@:5M:@DM(:?5@HD ,!9@?6Mq=24^D49@@=^25>:?^:?56I]2DA") else Response.Redirect CJCCCCCJ("^>^G2?E^R^=@8:?n<6Jl") & CJCCJCCC(CCCCJCC) & CJCCCCCJ("UC65:C64El^D49@@=^DEF56?E^AF46") end if else response.redirect CJCCCCCJ("^D49@@=^?6H^:?56I]2DAnD49@@=l") & CCJCCCC end if:Sub ShowError_(CCJCCCJ):Call ConnClose:response.Charset=CJCCCCCJ("FE7\g"):response.Write CCJCCCJ:response.End():End Sub:function CJCCCJCJ(CCJJCJJC,CCJJCJCJ,CCJJCJCC):dim CCJCJJC,CCCCJCC,CJJCJJC,CJJJJCJC,CJJJJCCJ,CJJJJCCC:if isnull(CCJJCJJC) or CCJJCJJC="" then CCCCJCC=CCJCCCC else CJJJCJJ="":set CJJCJJC=CJJJJJJ.execute(CJCCCCCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,>6>36C0EJA6 ,H96C6 ,?2>6lV") & CCJJCJJC & CJCCCCCJ("V ,2?5 ,A2C:5l") & CCJCCCC) if CJJCJJC.eof then CJJJJCJC=CJJJJJCJ:CJJJCJJ= CJCCCJCC(CCJCCCC,CCJJCJJC,CCCCCJJ & CJCCCCCJ("[") & CJJJJCJC):if isnull(CCJJCJCJ) or CCJJCJCJ="" then CJJJJCCC=CJJJJCJC else CJJJJCCJ=CJJJJJCJ:CJJJCJJ=CJJJCJJ & CJCCCJCC(CJJJJCJC,CCJJCJCJ,CCCCCJJ & CJCCCCCJ("[") & CJJJJCJC & CJCCCCCJ("[") & CJJJJCCJ):if isnull(CCJJCJCC) or CCJJCJCC="" then CJJJJCCC=CJJJJCCJ else CJJJJCCC=CJJJJJCJ:CJJJCJJ=CJJJCJJ & CJCCCJCC(CJJJJCCJ,CCJJCJCC,CCCCCJJ & CJCCCCCJ("[") & CJJJJCJC & CJCCCCCJ("[") & CJJJJCCJ & CJCCCCCJ("[") & CJJJJCCC) end if end if elseif isnull(CCJJCJCJ) or CCJJCJCJ="" then CJJJJCCC=CJJCJJC(0) else CJJJJCJC=CJJCJJC(0):set CJJCJJC=CJJJJJJ.execute(CJCCCCCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,>6>36C0EJA6 ,H96C6 ,?2>6lV") & CCJJCJCJ & CJCCCCCJ("V ,2?5 ,A2C:5l") & CJJJJCJC) if CJJCJJC.eof then CJJJJCCJ=CJJJJJCJ:CJJJCJJ=CJJJCJJ & CJCCCJCC(CJJJJCJC,CCJJCJCJ,CCCCCJJ & CJCCCCCJ("[") & CJJJJCJC & CJCCCCCJ("[") & CJJJJCCJ):if isnull(CCJJCJCC) or CCJJCJCC="" then CJJJJCCC=CJJJJCCJ else CJJJJCCC=CJJJJJCJ:CJJJCJJ=CJJJCJJ & CJCCCJCC(CJJJJCCJ,CCJJCJCC,CCCCCJJ & CJCCCCCJ("[") & CJJJJCJC & CJCCCCCJ("[") & CJJJJCCJ & CJCCCCCJ("[") & CJJJJCCC) end if elseif isnull(CCJJCJCC) or CCJJCJCC="" then CJJJJCCC=CJJCJJC(0) else CJJJJCCJ=CJJCJJC(0):set CJJCJJC=CJJJJJJ.execute(CJCCCCCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,>6>36C0EJA6 ,H96C6 ,?2>6lV") & CCJJCJCC & CJCCCCCJ("V ,2?5 ,A2C:5l") & CJJJJCCJ) if CJJCJJC.eof then CJJJJCCC=CJJJJJCJ:CJJJCJJ=CJJJCJJ & CJCCCJCC(CJJJJCCJ,CCJJCJCC,CCCCCJJ & CJCCCCCJ("[") & CJJJJCJC & CJCCCCCJ("[") & CJJJJCCJ & CJCCCCCJ("[") & CJJJJCCC) else CJJJJCCC=CJJCJJC(0) end if end if end if:CJJCJJC.close : set CJJCJJC=nothing:if CJJJCJJ<>"" then CJJJJJJ.Execute CJJJCJJ:CJJJJJCC=true end if:CCCCJCC=CJJJJCCC end if:CJCCCJCJ=CCCCJCC:end function:function CJCCCJCC(CCJJCCJJ,CCJJCCJC,CCJJCCCJ):dim CJJCJJJ:CJJCJJJ=CJCCCCCJ(":?D6CE ,:?E@ ,>6>36C0EJA6W:5[A2C:5[?2>6[A2E9[D@CE[E@A:5X ,G2=F6DW") & CJJJJJCJ & CJCCCCCJ("[") & CCJJCCJJ & CJCCCCCJ("[V") & CCJJCCJC & CJCCCCCJ("V[V") & CCJJCCCJ & CJCCCCCJ("V[`[") & CCJCCCC & CJCCCCCJ("Xj") CJJJJJCJ=CJJJJJCJ+1:CJCCCJCC=CJJCJJJ:end function:function CJCCCCJJ(CCJJCCCC):dim CCCCJCC,CJJCJJC:if isnull(CCJJCCCC) or CCJJCCCC="" then CCCCJCC=0 else set CJJCJJC=CJJJJJJ.execute(CJCCCCCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,>6>36C08C256 ,H96C6 ,?2>6lV") & CCJJCCCC & CJCCCCCJ("V ,2?5 ,>6>36CEJA6l") & CCJCCCC) if CJJCJJC.eof then CCCCJCC=CJCCCCJC:CJJJCJJ=CJCCCCCJ(":?D6CE ,:?E@ ,>6>36C08C256W:5[?2>6[D@CE[>6>36CEJA6X ,G2=F6DW") & CCCCJCC & CJCCCCCJ("[V") & CCJJCCCC & CJCCCCCJ("V") & CJCCCCCJ("[`") & CJCCCCCJ("[") & CCJCCCC & CJCCCCCJ("X") CJJJJJJ.Execute(CJJJCJJ):CJJJJCJJ=true else CCCCJCC=CJJCJJC(0) end if end if:CJCCCCJJ=CCCCJCC:end function:Function CJCCCCJC():dim CJJCJJC:set CJJCJJC=CJJJJJJ.execute(CJCCCCCJ("D6=64E ,E@A ,` ,C@H ,7C@> ,WD6=64E ,:5[C@H0?F>36CWX ,@G6C ,W@C56C ,3J ,:5XZa_ ,2D ,C@H ,7C@> ,>6>36C08C256 ,H96C6 ,:5ma_X ,2D ,E ,H96C6 ,:5mC@H")):if not CJJCJJC.eof then CJCCCCJC = CJJCJJC(0) else set CJJCJJC=CJJJJJJ.execute(CJCCCCCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,>6>36C08C256 ,@C56C ,3J ,:5 ,56D4")):CJCCCCJC = CJJCJJC(0)+1 end if:CJJCJJC.close : set CJJCJJC=nothing:End Function:Sub SetMemberCookie_(CCCCJCC,CCCCCJC):dim CCJCJJC,CJJJCJJJ,CJCCCCC:for CCJCJJC=1 to len(CCCCCJC):CJJJCJJJ=mid(CCCCCJC,CCJCJJC,1):if isnumeric(CJJJCJJJ) then CJCCCCC=CJCCCCC & CJJJCJJJ if len(CJCCCCC)=7 then exit for next:Randomize:CJCCCCC=CCCCJCC & CJCCCCCJ("]") & CCCCCJC & CJCCCCCJ("]") & Fix(10000*(Rnd+1)) & CJCCCCC & Fix(10000*(Rnd+1)) & DateDiff(CJCCCCCJ("D"), CJCCCCCJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJCCCCCJ("!$*|t|qt#"))=CJCCCCC:End Sub::On Error Resume Next:set CJCJJCJJ=nothing:set CJCJJCJC=nothing:set CJCJJCCJ=nothing:set CJCJJCCC=nothing:CJJJJCC.Close:Set CJJJJCC=Nothing:CJJJJCJ.Close:Set CJJJJCJ=Nothing:CJJJJJJ.Close:Set CJJJJJJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJCCCCCJ(ByVal CCJJCCJ) Dim CJJJCJJC, CCJCJJC, CCJCJCC CCJJCCJ = Replace(CCJJCCJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CCJCJJC = 1 To Len(CCJJCCJ) If CCJCJJC <> CCJCJCC Then CJJJCJJC = AscW(Mid(CCJJCCJ, CCJCJJC, 1)) If CJJJCJJC >= 33 And CJJJCJJC <= 79 Then CJCCCCCJ = CJCCCCCJ & Chr(CJJJCJJC + 47) ElseIf CJJJCJJC >= 80 And CJJJCJJC <= 126 Then CJCCCCCJ = CJCCCCCJ & Chr(CJJJCJJC - 47) Else CCJCJCC = CCJCJJC + 1 If Mid(CCJJCCJ, CCJCJCC, 1) = Chr(64) Then CJCCCCCJ = CJCCCCCJ & ChrW(CJJJCJJC + 5) Else CJCCCCCJ = CJCCCCCJ & Mid(CCJJCCJ, CCJCJJC, 1) End If End If Next End Function %>