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