Edit D:\xinhaisoft\crisis_new\admin\member\changepsw.asp
??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCJJJC, CCJJCJ,CCJJCC, CCJCJJ, CCJCJC:Set CCJJJC = server.CreateObject(CJJJCCCJ("ps~sq]r@??64E:@?")):CCJJJC.open Application(CJJJCCCJ("r@??64E:@?$EC:?8")):Set CCJJCJ=CCJJJC::Dim CCJCCJ,CCJCCC,CCCJJJ,CCCJJC,CCCJCJ,CCCJCC,CCCCJJ,CCCCJC,CCCCCJ:Dim CCCCCC,CJJJJJJ,CJJJJJC,CJJJJCJ,CJJJJCC,CJJJCJJ:Dim CJJJCJC,CJJJCCJ,CJJJCCC:Dim CJJCJJJ:CJJCJJJ=Trim(Request.Cookies(CJJJCCCJ("!$*|t|qt#"))):if CJJCJJJ="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CCJCCJ>0 then CCJCJC=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?@=@4<X ,(wt#t ,!2DDH@C5lV") & CCJCCC & CJJJCCCJ("V ,2?5 ,:5l") & CCJCCJ set CCJJCC=CCJJJC.execute(CCJCJC):If CCJJCC.EOF Then Call ClearMemberCookie Else CCCJJJ=CCJJCC(2) & "":CCCJJC=CCJJCC(3):CCCJCJ=CCJJCC(5):CCCJCC=CCJJCC(6):CCCCJJ=CCJJCC(9):CCCCJC=CCJJCC(15):CCCCCC=CCJJCC(0):CJJJCCJ=CCJJCC(1):CJJJCJC=CCJJCC(11) & "":CJJJJJJ=CCJJCC(10) & "":CCCCCJ=CCJJCC(12):CJJJJJC=CCJJCC(14):CJJJJCJ=CCJJCC(13):CJJJJCC=CCJJCC(7) & "":CJJJCJJ=CCJJCC(4):CJJJCCC=CCJJCC(8):if isnull(CCCCJC) then CCCCJC=0 if isnull(CCCCJJ) or CCCCJJ=0 then CCCCJJ=CCCJJC if isnull(CJJJCJJ) then CJJJCJJ=0 if isnull(CCCJCJ) then CCCJCJ=0 if instr(CJJJCCCJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CCJCCC)>0 then Call RedirectMessage(CJJJCCCJ("????????,????????????????????????????????,")) Call SetMemberCookie(CCJCCJ,CCJCCC) End IF end if::::Sub ClearMemberCookie():Response.Cookies(CJJJCCCJ("!$*|t|qt#"))="":CCJCCJ=0:CCCJCC=0:CCJCCC=Empty:CCCJCJ=0:CCCCJC=0:CCCCJJ=0:CCCJJC=0:CCCCCC=False:CJJJCCJ=False:CJJJCCC=Empty:End Sub:Sub CheckMemberCookie():dim CJJCJJC,CJJCJCJ,CJJCJCC,CJJCCJJ,CJJCCJC:CJJCJJC=split(CJJCJJJ,CJJJCCCJ("]")):if ubound(CJJCJJC)<>2 then Call ClearMemberCookie elseif not isnumeric(CJJCJJC(0)) or len(CJJCJJC(1))<>32 or len(CJJCJJC(2))<>32 then Call ClearMemberCookie else CJJCJCJ=CJJCJJC(1):for CJJCJCC=1 to len(CJJCJCJ):CJJCCJJ=mid(CJJCJCJ,CJJCJCC,1):if isnumeric(CJJCCJJ) then CJJCCJC=CJJCCJC & CJJCCJJ if len(CJJCCJC)=7 then exit for next:CJJCJCJ=CJJCJJC(2):if CJJCCJC<>mid(CJJCJCJ,6,7) then Call ClearMemberCookie else CJJCCJJ=mid(CJJCJCJ,18,10)/2:if CJJCCJJ<DateDiff(CJJJCCCJ("D"), CJJJCCCJ("`hf_\`\` ,gi__i__"), Now)-28800 then Call ClearMemberCookie else CCJCCJ=Clng(CJJCJJC(0)):CCJCCC=CJJCJJC(1) end if end if end if:End Sub:Sub SetMemberCookie(CJJJCCCC,CJJCJJJJ):dim CJJCJCC,CJJCCJJ,CJJCCJC:for CJJCJCC=1 to len(CJJCJJJJ):CJJCCJJ=mid(CJJCJJJJ,CJJCJCC,1):if isnumeric(CJJCCJJ) then CJJCCJC=CJJCCJC & CJJCCJJ if len(CJJCCJC)=7 then exit for next:CJJCCJC=CJJJCCCC & CJJJCCCJ("]") & CJJCJJJJ & CJJJCCCJ("]") & Fix(10000*(Rnd+1)) & CJJCCJC & Fix(10000*(Rnd+1)) & DateDiff(CJJJCCCJ("D"), CJJJCCCJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJJJCCCJ("!$*|t|qt#"))=CJJCCJC:End Sub::Private Const CCJCJCJ =8:Private Const CCJCJCC =4:Private Const CCJCCJJ =32:Private CJJCCCJ(30):Private CJJCCCC(30):Private Function CCCCCCC(CJJCJJJC, CJJCJJCJ):If CJJCJJCJ = 0 Then CCCCCCC = CJJCJJJC:Exit Function ElseIf CJJCJJCJ = 31 Then If CJJCJJJC And 1 Then CCCCCCC = &H80000000 Else CCCCCCC = 0 End If:Exit Function ElseIf CJJCJJCJ < 0 Or CJJCJJCJ > 31 Then Err.Raise 6 End If:If (CJJCJJJC And CJJCCCC(31 - CJJCJJCJ)) Then CCCCCCC = ((CJJCJJJC And CJJCCCJ(31 - (CJJCJJCJ + 1))) * CJJCCCC(CJJCJJCJ)) Or &H80000000 Else CCCCCCC = ((CJJCJJJC And CJJCCCJ(31 - CJJCJJCJ)) * CJJCCCC(CJJCJJCJ)) End If:End Function:Private Function CJJJJJJJ(CJJCJJJC, CJJCJJCJ):If CJJCJJCJ = 0 Then CJJJJJJJ = CJJCJJJC:Exit Function ElseIf CJJCJJCJ = 31 Then If CJJCJJJC And &H80000000 Then CJJJJJJJ = 1 Else CJJJJJJJ = 0 End If:Exit Function ElseIf CJJCJJCJ < 0 Or CJJCJJCJ > 31 Then Err.Raise 6 End If:CJJJJJJJ = (CJJCJJJC And &H7FFFFFFE) \ CJJCCCC(CJJCJJCJ):If (CJJCJJJC And &H80000000) Then CJJJJJJJ = (CJJJJJJJ Or (&H40000000 \ CJJCCCC(CJJCJJCJ - 1))) End If:End Function:Private Function CJJJJJJC(CJJCJJJC, CJJCJJCJ):CJJJJJJC = CCCCCCC(CJJCJJJC, CJJCJJCJ) Or CJJJJJJJ(CJJCJJJC, (32 - CJJCJJCJ)):End Function:Private Function CJJJJJCJ(CJJCJJCC, CJJCJCJJ):Dim CJCJJJJ:Dim CJCJJJC:Dim CJCJJCJ:Dim CJCJJCC:Dim CJCJCJJ:CJCJJCJ = CJJCJJCC And &H80000000:CJCJJCC = CJJCJCJJ And &H80000000:CJCJJJJ = CJJCJJCC And &H40000000:CJCJJJC = CJJCJCJJ And &H40000000:CJCJCJJ = (CJJCJJCC And &H3FFFFFFF) + (CJJCJCJJ And &H3FFFFFFF):If CJCJJJJ And CJCJJJC Then CJCJCJJ = CJCJCJJ Xor &H80000000 Xor CJCJJCJ Xor CJCJJCC ElseIf CJCJJJJ Or CJCJJJC Then If CJCJCJJ And &H40000000 Then CJCJCJJ = CJCJCJJ Xor &HC0000000 Xor CJCJJCJ Xor CJCJJCC Else CJCJCJJ = CJCJCJJ Xor &H40000000 Xor CJCJJCJ Xor CJCJJCC End If Else CJCJCJJ = CJCJCJJ Xor CJCJJCJ Xor CJCJJCC End If:CJJJJJCJ = CJCJCJJ:End Function:Private Function CJJJJJCC(CJCCCJC, CJJCJCJC, CJJCJCCJ):CJJJJJCC = (CJCCCJC And CJJCJCJC) Or ((Not CJCCCJC) And CJJCJCCJ):End Function:Private Function CJJJJCJJ(CJCCCJC, CJJCJCJC, CJJCJCCJ):CJJJJCJJ = (CJCCCJC And CJJCJCCJ) Or (CJJCJCJC And (Not CJJCJCCJ)):End Function:Private Function CJJJJCJC(CJCCCJC, CJJCJCJC, CJJCJCCJ):CJJJJCJC = (CJCCCJC Xor CJJCJCJC Xor CJJCJCCJ):End Function:Private Function CJJJJCCJ(CJCCCJC, CJJCJCJC, CJJCJCCJ):CJJJJCCJ = (CJJCJCJC Xor (CJCCCJC Or (Not CJJCJCCJ))):End Function:Private Sub md5_FF(CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC, CJJCJCCC, CJJCCJJJ):CCJJJCJ = CJJJJJCJ(CCJJJCJ, CJJJJJCJ(CJJJJJCJ(CJJJJJCC(CCJJJCC, CCJJCJJ, CCJJCJC), CJCCCJC), CJJCCJJJ)):CCJJJCJ = CJJJJJJC(CCJJJCJ, CJJCJCCC):CCJJJCJ = CJJJJJCJ(CCJJJCJ, CCJJJCC):End Sub:Private Sub md5_GG(CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC, CJJCJCCC, CJJCCJJJ):CCJJJCJ = CJJJJJCJ(CCJJJCJ, CJJJJJCJ(CJJJJJCJ(CJJJJCJJ(CCJJJCC, CCJJCJJ, CCJJCJC), CJCCCJC), CJJCCJJJ)):CCJJJCJ = CJJJJJJC(CCJJJCJ, CJJCJCCC):CCJJJCJ = CJJJJJCJ(CCJJJCJ, CCJJJCC):End Sub:Private Sub md5_HH(CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC, CJJCJCCC, CJJCCJJJ):CCJJJCJ = CJJJJJCJ(CCJJJCJ, CJJJJJCJ(CJJJJJCJ(CJJJJCJC(CCJJJCC, CCJJCJJ, CCJJCJC), CJCCCJC), CJJCCJJJ)):CCJJJCJ = CJJJJJJC(CCJJJCJ, CJJCJCCC):CCJJJCJ = CJJJJJCJ(CCJJJCJ, CCJJJCC):End Sub:Private Sub md5_II(CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC, CJJCJCCC, CJJCCJJJ):CCJJJCJ = CJJJJJCJ(CCJJJCJ, CJJJJJCJ(CJJJJJCJ(CJJJJCCJ(CCJJJCC, CCJJCJJ, CCJJCJC), CJCCCJC), CJJCCJJJ)):CCJJJCJ = CJJJJJJC(CCJJJCJ, CJJCJCCC):CCJJJCJ = CJJJJJCJ(CCJJJCJ, CCJJJCC):End Sub:Private Function CJJJJCCC(CJJCCJJC):Dim CJCJCJC:Dim CJCJCCJ:Dim CJCJCCC():Dim CJCCJJJ:Dim CJCCJJC:Dim CJCCJCJ:Const CCJCCJC =512:Const CCJCCCJ =448:CJCJCJC = Len(CJJCCJJC):CJCJCCJ = (((CJCJCJC + ((CCJCCJC - CCJCCCJ) \ CCJCJCJ)) \ (CCJCCJC \ CCJCJCJ)) + 1) * (CCJCCJC \ CCJCCJJ):ReDim CJCJCCC(CJCJCCJ - 1):CJCCJJJ = 0:CJCCJJC = 0:Do Until CJCCJJC >= CJCJCJC:CJCCJCJ = CJCCJJC \ CCJCJCC:CJCCJJJ = (CJCCJJC Mod CCJCJCC) * CCJCJCJ:CJCJCCC(CJCCJCJ) = CJCJCCC(CJCCJCJ) Or CCCCCCC(Asc(Mid(CJJCCJJC, CJCCJJC + 1, 1)), CJCCJJJ):CJCCJJC = CJCCJJC + 1:Loop:CJCCJCJ = CJCCJJC \ CCJCJCC:CJCCJJJ = (CJCCJJC Mod CCJCJCC) * CCJCJCJ:CJCJCCC(CJCCJCJ) = CJCJCCC(CJCCJCJ) Or CCCCCCC(&H80, CJCCJJJ):CJCJCCC(CJCJCCJ - 2) = CCCCCCC(CJCJCJC, 3):CJCJCCC(CJCJCCJ - 1) = CJJJJJJJ(CJCJCJC, 29):CJJJJCCC = CJCJCCC:End Function:Private Function CJJJCJJJ(CJJCJJJC):Dim CJCCJCC:Dim CJCCCJJ:For CJCCCJJ = 0 To 3:CJCCJCC = CJJJJJJJ(CJJCJJJC, CJCCCJJ * CCJCJCJ) And CJJCCCJ(CCJCJCJ - 1):CJJJCJJJ = CJJJCJJJ & Right("0" & Hex(CJCCJCC), 2):Next:End Function:Public Function CJJJCJJC(CJJCCJJC):CJJCCCJ(0) = CLng(1):CJJCCCJ(1) = CLng(3):CJJCCCJ(2) = CLng(7):CJJCCCJ(3) = CLng(15):CJJCCCJ(4) = CLng(31):CJJCCCJ(5) = CLng(63):CJJCCCJ(6) = CLng(127):CJJCCCJ(7) = CLng(255):CJJCCCJ(8) = CLng(511):CJJCCCJ(9) = CLng(1023):CJJCCCJ(10) = CLng(2047):CJJCCCJ(11) = CLng(4095):CJJCCCJ(12) = CLng(8191):CJJCCCJ(13) = CLng(16383):CJJCCCJ(14) = CLng(32767):CJJCCCJ(15) = CLng(65535):CJJCCCJ(16) = CLng(131071):CJJCCCJ(17) = CLng(262143):CJJCCCJ(18) = CLng(524287):CJJCCCJ(19) = CLng(1048575):CJJCCCJ(20) = CLng(2097151):CJJCCCJ(21) = CLng(4194303):CJJCCCJ(22) = CLng(8388607):CJJCCCJ(23) = CLng(16777215):CJJCCCJ(24) = CLng(33554431):CJJCCCJ(25) = CLng(67108863):CJJCCCJ(26) = CLng(134217727):CJJCCCJ(27) = CLng(268435455):CJJCCCJ(28) = CLng(536870911):CJJCCCJ(29) = CLng(1073741823):CJJCCCJ(30) = CLng(2147483647):CJJCCCC(0) = CLng(1):CJJCCCC(1) = CLng(2):CJJCCCC(2) = CLng(4):CJJCCCC(3) = CLng(8):CJJCCCC(4) = CLng(16):CJJCCCC(5) = CLng(32):CJJCCCC(6) = CLng(64):CJJCCCC(7) = CLng(128):CJJCCCC(8) = CLng(256):CJJCCCC(9) = CLng(512):CJJCCCC(10) = CLng(1024):CJJCCCC(11) = CLng(2048):CJJCCCC(12) = CLng(4096):CJJCCCC(13) = CLng(8192):CJJCCCC(14) = CLng(16384):CJJCCCC(15) = CLng(32768):CJJCCCC(16) = CLng(65536):CJJCCCC(17) = CLng(131072):CJJCCCC(18) = CLng(262144):CJJCCCC(19) = CLng(524288):CJJCCCC(20) = CLng(1048576):CJJCCCC(21) = CLng(2097152):CJJCCCC(22) = CLng(4194304):CJJCCCC(23) = CLng(8388608):CJJCCCC(24) = CLng(16777216):CJJCCCC(25) = CLng(33554432):CJJCCCC(26) = CLng(67108864):CJJCCCC(27) = CLng(134217728):CJJCCCC(28) = CLng(268435456):CJJCCCC(29) = CLng(536870912):CJJCCCC(30) = CLng(1073741824):Dim CJCCCJC:Dim CJJCCJC:Dim CJCCCCJ:Dim CJCCCCC:Dim CCJJJJJ:Dim CCJJJJC:Dim CCJJJCJ:Dim CCJJJCC:Dim CCJJCJJ:Dim CCJJCJC:Const CCJCCCC =7:Const CCCJJJJ =12:Const CCCJJJC =17:Const CCCJJCJ =22:Const CCCJJCC =5:Const CCCJCJJ =9:Const CCCJCJC =14:Const CCCJCCJ =20:Const CCCJCCC =4:Const CCCCJJJ =11:Const CCCCJJC =16:Const CCCCJCJ =23:Const CCCCJCC =6:Const CCCCCJJ =10:Const CCCCCJC =15:Const CCCCCCJ =21:CJCCCJC = CJJJJCCC(CJJCCJJC):CCJJJCJ = &H67452301:CCJJJCC = &HEFCDAB89:CCJJCJJ = &H98BADCFE:CCJJCJC = &H10325476:For CJJCCJC = 0 To UBound(CJCCCJC) Step 16:CJCCCCJ = CCJJJCJ:CJCCCCC = CCJJJCC:CCJJJJJ = CCJJCJJ:CCJJJJC = CCJJCJC:md5_FF CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 0), CCJCCCC, &HD76AA478:md5_FF CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 1), CCCJJJJ, &HE8C7B756:md5_FF CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 2), CCCJJJC, &H242070DB:md5_FF CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 3), CCCJJCJ, &HC1BDCEEE:md5_FF CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 4), CCJCCCC, &HF57C0FAF:md5_FF CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 5), CCCJJJJ, &H4787C62A:md5_FF CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 6), CCCJJJC, &HA8304613:md5_FF CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 7), CCCJJCJ, &HFD469501:md5_FF CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 8), CCJCCCC, &H698098D8:md5_FF CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 9), CCCJJJJ, &H8B44F7AF:md5_FF CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 10), CCCJJJC, &HFFFF5BB1:md5_FF CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 11), CCCJJCJ, &H895CD7BE:md5_FF CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 12), CCJCCCC, &H6B901122:md5_FF CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 13), CCCJJJJ, &HFD987193:md5_FF CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 14), CCCJJJC, &HA679438E:md5_FF CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 15), CCCJJCJ, &H49B40821:md5_GG CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 1), CCCJJCC, &HF61E2562:md5_GG CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 6), CCCJCJJ, &HC040B340:md5_GG CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 11), CCCJCJC, &H265E5A51:md5_GG CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 0), CCCJCCJ, &HE9B6C7AA:md5_GG CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 5), CCCJJCC, &HD62F105D:md5_GG CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 10), CCCJCJJ, &H2441453:md5_GG CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 15), CCCJCJC, &HD8A1E681:md5_GG CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 4), CCCJCCJ, &HE7D3FBC8:md5_GG CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 9), CCCJJCC, &H21E1CDE6:md5_GG CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 14), CCCJCJJ, &HC33707D6:md5_GG CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 3), CCCJCJC, &HF4D50D87:md5_GG CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 8), CCCJCCJ, &H455A14ED:md5_GG CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 13), CCCJJCC, &HA9E3E905:md5_GG CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 2), CCCJCJJ, &HFCEFA3F8:md5_GG CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 7), CCCJCJC, &H676F02D9:md5_GG CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 12), CCCJCCJ, &H8D2A4C8A:md5_HH CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 5), CCCJCCC, &HFFFA3942:md5_HH CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 8), CCCCJJJ, &H8771F681:md5_HH CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 11), CCCCJJC, &H6D9D6122:md5_HH CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 14), CCCCJCJ, &HFDE5380C:md5_HH CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 1), CCCJCCC, &HA4BEEA44:md5_HH CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 4), CCCCJJJ, &H4BDECFA9:md5_HH CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 7), CCCCJJC, &HF6BB4B60:md5_HH CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 10), CCCCJCJ, &HBEBFBC70:md5_HH CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 13), CCCJCCC, &H289B7EC6:md5_HH CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 0), CCCCJJJ, &HEAA127FA:md5_HH CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 3), CCCCJJC, &HD4EF3085:md5_HH CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 6), CCCCJCJ, &H4881D05:md5_HH CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 9), CCCJCCC, &HD9D4D039:md5_HH CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 12), CCCCJJJ, &HE6DB99E5:md5_HH CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 15), CCCCJJC, &H1FA27CF8:md5_HH CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 2), CCCCJCJ, &HC4AC5665:md5_II CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 0), CCCCJCC, &HF4292244:md5_II CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 7), CCCCCJJ, &H432AFF97:md5_II CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 14), CCCCCJC, &HAB9423A7:md5_II CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 5), CCCCCCJ, &HFC93A039:md5_II CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 12), CCCCJCC, &H655B59C3:md5_II CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 3), CCCCCJJ, &H8F0CCC92:md5_II CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 10), CCCCCJC, &HFFEFF47D:md5_II CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 1), CCCCCCJ, &H85845DD1:md5_II CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 8), CCCCJCC, &H6FA87E4F:md5_II CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 15), CCCCCJJ, &HFE2CE6E0:md5_II CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 6), CCCCCJC, &HA3014314:md5_II CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 13), CCCCCCJ, &H4E0811A1:md5_II CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CJCCCJC(CJJCCJC + 4), CCCCJCC, &HF7537E82:md5_II CCJJCJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CJCCCJC(CJJCCJC + 11), CCCCCJJ, &HBD3AF235:md5_II CCJJCJJ, CCJJCJC, CCJJJCJ, CCJJJCC, CJCCCJC(CJJCCJC + 2), CCCCCJC, &H2AD7D2BB:md5_II CCJJJCC, CCJJCJJ, CCJJCJC, CCJJJCJ, CJCCCJC(CJJCCJC + 9), CCCCCCJ, &HEB86D391:CCJJJCJ = CJJJJJCJ(CCJJJCJ, CJCCCCJ):CCJJJCC = CJJJJJCJ(CCJJJCC, CJCCCCC):CCJJCJJ = CJJJJJCJ(CCJJCJJ, CCJJJJJ):CCJJCJC = CJJJJJCJ(CCJJCJC, CCJJJJC):Next:CJJJCJJC = LCase(CJJJCJJJ(CCJJJCJ) & CJJJCJJJ(CCJJJCC) & CJJJCJJJ(CCJJCJJ) & CJJJCJJJ(CCJJCJC)):End Function::If Request.ServerVariables(CJJJCCCJ("#t""&t$%0|t%w~s"))=CJJJCCCJ("!~$%") then dim CCJJCCJ,CCJJCCC:CCJJCCJ=CJJJCJJC(Trim(Request.Form(CJJJCCCJ("ADH`")))):CCJJCCC=CJJJCJJC(Trim(Request.Form(CJJJCCCJ("ADHa")))):set CCJJCC=CCJJJC.Execute(CJJJCCCJ("D6=64E ,A2DDH@C5 ,7C@> ,>6>36C ,H96C6 ,:5l") & CCJCCJ):if CCJJCCJ<>Lcase(CCJJCC(0)) then Call RedirectMessage(CJJJCCCJ("????????M??????????????????,??????????????????,")) elseif CCJJCCC=Lcase(CCJJCC(0)) then Call RedirectMessage(CJJJCCCJ("????????M??????????????????????,??????,????@??????,")) else CCJJJC.execute(CJJJCCCJ("FA52E6 ,>6>36C ,D6E ,,A2DDH@C5.lV") & CCJJCCC & CJJJCCCJ("V[7:DEADHl?F== ,H96C6 ,:5l") & CCJCCJ) Call InsertLog(2,CCJCCJ & CJJJCCCJ("??????????????????")):Call RedirectMessage(CJJJCCCJ("????M??????????????,")) end if End If:Response.Write(vbCrLf):Response.Write(CJJJCCCJ("k9E>=m") & vbCrLf):Response.Write(CJJJCCCJ("k9625m") & vbCrLf):Response.Write(CJJJCCCJ("k>6E2 ,9EEA\6BF:GlQr@?E6?E\%JA6Q ,4@?E6?ElQE6IE^9E>=j ,492CD6ElFE7\gQm") & vbCrLf):Response.Write(CJJJCCCJ("kE:E=6m??????????k^E:E=6m") & vbCrLf):Response.Write(CJJJCCCJ("k=:?< ,9C67lQ]]^DEJ=6]4DDQ ,C6=lQDEJ=6D966EQm") & vbCrLf):Response.Write(CJJJCCCJ("kD4C:AE ,=2?8F286lQy2G2$4C:AEQm") & vbCrLf):Response.Write(CJJJCCCJ("7F?4E:@? ,7@C>`0G2=:52E@CWXL") & vbCrLf):Response.Write(CJJJCCCJ(" ,H:E9W5@4F>6?E]7@C>`XL") & vbCrLf):Response.Write(CJJJCCCJ(" ,:7WADH`]G2=F6llQQMMADHa]G2=F6llQQMMADHb]G2=F6llQQXL") & vbCrLf):Response.Write(CJJJCCCJ(" ,2=6CEWQ??????,??????????????@????????,QXj") & vbCrLf):Response.Write(CJJJCCCJ(" ,ADH`]7@4FDWXj") & vbCrLf):Response.Write(CJJJCCCJ(" ,C6EFC? ,72=D6j") & vbCrLf):Response.Write(CJJJCCCJ(" ,N") & vbCrLf):Response.Write(CJJJCCCJ(" ,:7WADHa]G2=F6PlADHb]G2=F6XL") & vbCrLf):Response.Write(CJJJCCCJ(" ,2=6CEWQ????????????????????,????,????????????,QXj") & vbCrLf):Response.Write(CJJJCCCJ(" ,ADHb]7@4FDWXj") & vbCrLf):Response.Write(CJJJCCCJ(" ,C6EFC? ,72=D6j") & vbCrLf):Response.Write(CJJJCCCJ(" ,N") & vbCrLf):Response.Write(CJJJCCCJ(" ,N") & vbCrLf):Response.Write(CJJJCCCJ("N") & vbCrLf):Response.Write(CJJJCCCJ("k^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCJ("k^9625m") & vbCrLf):Response.Write(CJJJCCCJ("k3@5Jm") & vbCrLf):Response.Write(CJJJCCCJ("k3Cm") & vbCrLf):Response.Write(CJJJCCCJ("k5:G ,4=2DDlQE:E=6Qm????????????k^5:Gm") & vbCrLf):Response.Write(CJJJCCCJ("k7@C> ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQ ,@?$F3>:ElQC6EFC? ,7@C>`0G2=:52E@CWXQm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE23=6 ,H:5E9lQhdTQ , ,3@C56ClQ_Q ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5 ,H:5E9lQc`TQ ,2=:8?lQC:89EQm????????,k^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5 ,H:5E9lQdhTQmk:?AFE ,?2>6lQADH`Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQADH`Qmk^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5 ,2=:8?lQC:89EQm????????,k^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5mk:?AFE ,?2>6lQADHaQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQADHaQmk^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5 ,2=:8?lQC:89EQm????????????,k^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5mk:?AFE ,?2>6lQADHbQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQADHbQmk^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,kE5mk:?AFE ,?2>6lQ$F3>:EQ ,EJA6lQDF3>:EQ ,4=2DDlQ3FEE@?Q ,G2=F6lQ?? ,??Qmk^E5m") & vbCrLf):Response.Write(CJJJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCCCJ("k^7@C>m") & vbCrLf):Response.Write(CJJJCCCJ("k^3@5Jm") & vbCrLf):Response.Write(CJJJCCCJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJJCJCJ=nothing:set CJJJCJCC=nothing:set CJJJCCJJ=nothing:set CJJJCCJC=nothing:CCJCJJ.Close:Set CCJCJJ=Nothing:CCJJCC.Close:Set CCJJCC=Nothing:CCJJJC.Close:Set CCJJJC = Nothing:err.Clear:On Error Goto 0 Function CJJJCCCJ(ByVal CCJJCJJ) Dim CCJCJJJ, CJJCJCC, CCJCJJC CCJJCJJ = Replace(CCJJCJJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJJCJCC = 1 To Len(CCJJCJJ) If CJJCJCC <> CCJCJJC Then CCJCJJJ = AscW(Mid(CCJJCJJ, CJJCJCC, 1)) If CCJCJJJ >= 33 And CCJCJJJ <= 79 Then CJJJCCCJ = CJJJCCCJ & Chr(CCJCJJJ + 47) ElseIf CCJCJJJ >= 80 And CCJCJJJ <= 126 Then CJJJCCCJ = CJJJCCCJ & Chr(CCJCJJJ - 47) Else CCJCJJC = CJJCJCC + 1 If Mid(CCJJCJJ, CCJCJJC, 1) = Chr(64) Then CJJJCCCJ = CJJJCCCJ & ChrW(CCJCJJJ + 5) Else CJJJCCCJ = CJJJCCCJ & Mid(CCJJCJJ, CJJCJCC, 1) End If End If Next End Function %>
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de