Edit D:\xinhaisoft\crisis_new\admin\member\modify.asp
??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCCCJJ, CCCCJC,CCCCCJ, CCCCCC, CJJJJJJ:Set CCCCJJ = server.CreateObject(CJCJCCCJ("ps~sq]r@??64E:@?")):CCCCJJ.open Application(CJCJCCCJ("r@??64E:@?$EC:?8")):Set CCCCJC=CCCCJJ::Dim CJJJJJC,CJJJJCJ,CJJJJCC,CJJJCJJ,CJJJCJC,CJJJCCJ,CJJJCCC,CJJCJJJ,CJJCJJC:Dim CJJCJCJ,CJJCJCC,CJJCCJJ,CJJCCJC,CJJCCCJ,CJJCCCC:Dim CJCJJJJ,CJCJJJC,CJCJJCJ:Dim CJCJJCC:CJCJJCC=Trim(Request.Cookies(CJCJCCCJ("!$*|t|qt#"))):if CJCJJCC="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CJJJJJC>0 then CJJJJJJ=CJCJCCCJ("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") & CJJJJCJ & CJCJCCCJ("V ,2?5 ,:5l") & CJJJJJC set CCCCCJ=CCCCJJ.execute(CJJJJJJ):If CCCCCJ.EOF Then Call ClearMemberCookie Else CJJJJCC=CCCCCJ(2) & "":CJJJCJJ=CCCCCJ(3):CJJJCJC=CCCCCJ(5):CJJJCCJ=CCCCCJ(6):CJJJCCC=CCCCCJ(9):CJJCJJJ=CCCCCJ(15):CJJCJCJ=CCCCCJ(0):CJCJJJC=CCCCCJ(1):CJCJJJJ=CCCCCJ(11) & "":CJJCJCC=CCCCCJ(10) & "":CJJCJJC=CCCCCJ(12):CJJCCJJ=CCCCCJ(14):CJJCCJC=CCCCCJ(13):CJJCCCJ=CCCCCJ(7) & "":CJJCCCC=CCCCCJ(4):CJCJJCJ=CCCCCJ(8):if isnull(CJJCJJJ) then CJJCJJJ=0 if isnull(CJJJCCC) or CJJJCCC=0 then CJJJCCC=CJJJCJJ if isnull(CJJCCCC) then CJJCCCC=0 if isnull(CJJJCJC) then CJJJCJC=0 if instr(CJCJCCCJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CJJJJCJ)>0 then Call RedirectMessage(CJCJCCCJ("????????,????????????????????????????????,")) Call SetMemberCookie(CJJJJJC,CJJJJCJ) End IF end if:Sub CheckRight(CJCJCCCC):dim CJCJCJJ,CJCJCJC:if CJJJJJC=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJCJCCCJ("??????????????,????????????,")) elseIf not CJJCJCCJ(CJCJCCCC) then Call RedirectMessage(CJCJCCCJ("????W") & CJCJCCCC & CJCJCCCJ("X????????,????????????????????,")) end if:End Sub:Function CJJCJCCJ(CJCJCCCC):dim CJCJCJJ,CJCJCJC:CJCJCJC=split(CJCJCCCC,CJCJCCCJ("[")):CJJCJCCJ=False:for CJCJCJJ=0 to ubound(CJCJCJC):If Mid(CJJJJCC,CJCJCJC(CJCJCJJ),1)="1" then CJJCJCCJ=True:exit function end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CJCJCCCJ("!$*|t|qt#"))="":CJJJJJC=0:CJJJCCJ=0:CJJJJCJ=Empty:CJJJCJC=0:CJJCJJJ=0:CJJJCCC=0:CJJJCJJ=0:CJJCJCJ=False:CJCJJJC=False:CJCJJCJ=Empty:End Sub:Sub CheckMemberCookie():dim CJCJCCJ,CJCJCCC,CJCJCJJ,CJCCJJJ,CJCCJJC:CJCJCCJ=split(CJCJJCC,CJCJCCCJ("]")):if ubound(CJCJCCJ)<>2 then Call ClearMemberCookie elseif not isnumeric(CJCJCCJ(0)) or len(CJCJCCJ(1))<>32 or len(CJCJCCJ(2))<>32 then Call ClearMemberCookie else CJCJCCC=CJCJCCJ(1):for CJCJCJJ=1 to len(CJCJCCC):CJCCJJJ=mid(CJCJCCC,CJCJCJJ,1):if isnumeric(CJCCJJJ) then CJCCJJC=CJCCJJC & CJCCJJJ if len(CJCCJJC)=7 then exit for next:CJCJCCC=CJCJCCJ(2):if CJCCJJC<>mid(CJCJCCC,6,7) then Call ClearMemberCookie else CJCCJJJ=mid(CJCJCCC,18,10)/2:if CJCCJJJ<DateDiff(CJCJCCCJ("D"), CJCJCCCJ("`hf_\`\` ,gi__i__"), Now)-28800 then Call ClearMemberCookie else CJJJJJC=Clng(CJCJCCJ(0)):CJJJJCJ=CJCJCCJ(1) end if end if end if:End Sub:Sub SetMemberCookie(CCCCJJJ,CCCCJCJ):dim CJCJCJJ,CJCCJJJ,CJCCJJC:for CJCJCJJ=1 to len(CCCCJCJ):CJCCJJJ=mid(CCCCJCJ,CJCJCJJ,1):if isnumeric(CJCCJJJ) then CJCCJJC=CJCCJJC & CJCCJJJ if len(CJCCJJC)=7 then exit for next:CJCCJJC=CCCCJJJ & CJCJCCCJ("]") & CCCCJCJ & CJCJCCCJ("]") & Fix(10000*(Rnd+1)) & CJCCJJC & Fix(10000*(Rnd+1)) & DateDiff(CJCJCCCJ("D"), CJCJCCCJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJCJCCCJ("!$*|t|qt#"))=CJCCJJC:End Sub::Function CJJCJCCC(CJCCJJJJ):Dim str,CJCCJCC:str = Trim(CJCCJJJJ):If IsNull(str) Or str = "" Then CJJCJCCC = "" else str=Replace(str, CJCJCCCJ("V"), "") str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CJCJCCCJ("k:7C2>6"), CJCJCCCJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJCJCCCJ("kD4C:AE"), CJCJCCCJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJCCJCC=new RegExp:CJCCJCC.Pattern=CJCJCCCJ("@?W,2\K.ZXl"):CJCCJCC.IgnoreCase = True:CJCCJCC.Global=True:str=CJCCJCC.Replace(str,CJCJCCCJ("@?S`U6BF2=Dj")):set CJCCJCC=nothing:CJJCJCCC=str End If:End Function:Function IIf(CJCCJJJC, CJCCJJCJ, CJCCJJCC):if isnull(CJCCJJJC) or isempty(CJCCJJJC) then IIf = CJCCJJCC elseif CJCCJJJC Then IIf = CJCCJJCJ Else IIf = CJCCJJCC end if:End Function:Const CJJJJJJJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$"::Function CJJCCJJC():dim CJCCCJJ:CJCCCJJ = Cstr(Request.ServerVariables("HTTP_X_FORWARDED_FOR")):If CJCCCJJ = "" Then CJCCCJJ = Cstr(Request.ServerVariables(CJCJCCCJ("#t|~%t0pss#"))) if instr(CJCCCJJ,CJCJCCCJ("i"))>0 then CJCCCJJ=left(CJCCCJJ,instr(CJCCCJJ,CJCJCCCJ("i"))-1) elseif instr(CJCCCJJ,CJCJCCCJ("["))>0 then CJCCCJJ=left(CJCCCJJ,instr(CJCCCJJ,CJCJCCCJ("["))-1) end if:CJJCCJJC=left(CJCCCJJ,15):End Function::Public Function CJJCCJCJ():Dim CJCCCJC, CJCCCCJ:CJCCCCJ = Request.ServerVariables(CJCJCCCJ("!p%w0x}u~")):CJCCCJC = Request.ServerVariables(CJCJCCCJ("""&t#*0$%#x}v")):If CJCCCJC <> Empty Then if instr(lcase(CJCCCJC),CJCJCCCJ("Tb4:7C2>6"))>0 or instr(lcase(CJCCCJC),CJCJCCCJ("Tb4D4C:AE"))>0 then Call RedirectMessage(CJCJCCCJ("????????,????????????????????????,??,??,")) CJCCCCJ = CJCCCCJ & CJCJCCCJ("n") & CJCCCJC end if:CJJCCJCJ = CJCCCCJ:End Function:Sub SetHttpOnlyCookie(CJCCJCJJ,CJCCJCJC):dim CJCJCCJ:CJCJCCJ=CJCCJCJJ & CJCJCCCJ("l") & CJCCJCJC & CJCJCCCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJCJCCCJ("$6E\r@@<:6"),CJCJCCJ):End Sub::Function CJJCCJCC():CJJCCJCC = Request.Cookies(CJCJCCCJ("!$*"))(CJCJCCCJ("&#{")):End Function:::::Function CJJCCCJJ(CCCCCCC):if isnull(CCCCCCC) or trim(CCCCCCC)="" or not isnumeric(CCCCCCC) then CJJCCCJJ=false else Dim CJCCJCC:Set CJCCJCC = New RegExp:CJCCJCC.Pattern = CJCJCCCJ("/-5ZS"):CJCCJCC.IgnoreCase = True:CJJCCCJJ = CJCCJCC.test(CCCCCCC):set CJCCJCC=nothing end if:End Function:::::Sub ConnClose():On Error Resume Next:set CJJCCCJC=nothing:set CJJCCCCJ=nothing:set CJJCCCCC=nothing:set CJCJJJJJ=nothing:CJCJJJJC.close : set CJCJJJJC=nothing:CCCCCC.Close : Set CCCCCC=Nothing:CCCCCJ.Close : Set CCCCCJ=Nothing:CJCJJJCJ.Close : Set CJCJJJCJ = Nothing:CCCCJJ.Close : Set CCCCJJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJCCJCCJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJCJCCCJ("!$*0|6DD286"),server.URLEncode(CJCCJCCJ)):Response.Redirect CJCJCCCJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::Sub InsertLog(CJCCJCCC,CCCJCCJ):dim CJCCCCC:CJCCCCC=CJCJCCCJ("x?D6CE ,:?E@ ,=@8W>6>36C[:A[4@?E6?E[EJA6[FC=X ,G2=F6DW") & CJJJJJC & CJCJCCCJ("[V") & CJJCCJJC & CJCJCCCJ("V") & CJCJCCCJ("[V") & CJJCJCCC(CCCJCCJ) & CJCJCCCJ("V") & CJCJCCCJ("[") & CJCCJCCC & CJCJCCCJ("[V") & CJJCCJCJ & CJCJCCCJ("V") & CJCJCCCJ("X") CCCCJJ.execute CJCCCCC:End Sub::::::::::::::::::Private Const CJJJJJJC =8:Private Const CJJJJJCJ =4:Private Const CJJJJJCC =32:Private CCJJJJJ(30):Private CCJJJJC(30):Private Function CJCJJJCC(CJCCCJJJ, CJCCCJJC):If CJCCCJJC = 0 Then CJCJJJCC = CJCCCJJJ:Exit Function ElseIf CJCCCJJC = 31 Then If CJCCCJJJ And 1 Then CJCJJJCC = &H80000000 Else CJCJJJCC = 0 End If:Exit Function ElseIf CJCCCJJC < 0 Or CJCCCJJC > 31 Then Err.Raise 6 End If:If (CJCCCJJJ And CCJJJJC(31 - CJCCCJJC)) Then CJCJJJCC = ((CJCCCJJJ And CCJJJJJ(31 - (CJCCCJJC + 1))) * CCJJJJC(CJCCCJJC)) Or &H80000000 Else CJCJJJCC = ((CJCCCJJJ And CCJJJJJ(31 - CJCCCJJC)) * CCJJJJC(CJCCCJJC)) End If:End Function:Private Function CJCJJCJJ(CJCCCJJJ, CJCCCJJC):If CJCCCJJC = 0 Then CJCJJCJJ = CJCCCJJJ:Exit Function ElseIf CJCCCJJC = 31 Then If CJCCCJJJ And &H80000000 Then CJCJJCJJ = 1 Else CJCJJCJJ = 0 End If:Exit Function ElseIf CJCCCJJC < 0 Or CJCCCJJC > 31 Then Err.Raise 6 End If:CJCJJCJJ = (CJCCCJJJ And &H7FFFFFFE) \ CCJJJJC(CJCCCJJC):If (CJCCCJJJ And &H80000000) Then CJCJJCJJ = (CJCJJCJJ Or (&H40000000 \ CCJJJJC(CJCCCJJC - 1))) End If:End Function:Private Function CJCJJCJC(CJCCCJJJ, CJCCCJJC):CJCJJCJC = CJCJJJCC(CJCCCJJJ, CJCCCJJC) Or CJCJJCJJ(CJCCCJJJ, (32 - CJCCCJJC)):End Function:Private Function CJCJJCCJ(CJCCCJCJ, CJCCCJCC):Dim CCJJJCJ:Dim CCJJJCC:Dim CCJJCJJ:Dim CCJJCJC:Dim CCJJCCJ:CCJJCJJ = CJCCCJCJ And &H80000000:CCJJCJC = CJCCCJCC And &H80000000:CCJJJCJ = CJCCCJCJ And &H40000000:CCJJJCC = CJCCCJCC And &H40000000:CCJJCCJ = (CJCCCJCJ And &H3FFFFFFF) + (CJCCCJCC And &H3FFFFFFF):If CCJJJCJ And CCJJJCC Then CCJJCCJ = CCJJCCJ Xor &H80000000 Xor CCJJCJJ Xor CCJJCJC ElseIf CCJJJCJ Or CCJJJCC Then If CCJJCCJ And &H40000000 Then CCJJCCJ = CCJJCCJ Xor &HC0000000 Xor CCJJCJJ Xor CCJJCJC Else CCJJCCJ = CCJJCCJ Xor &H40000000 Xor CCJJCJJ Xor CCJJCJC End If Else CCJJCCJ = CCJJCCJ Xor CCJJCJJ Xor CCJJCJC End If:CJCJJCCJ = CCJJCCJ:End Function:Private Function CJCJJCCC(CCJCCCC, CJCCCCJJ, CJCCCCJC):CJCJJCCC = (CCJCCCC And CJCCCCJJ) Or ((Not CCJCCCC) And CJCCCCJC):End Function:Private Function CJCJCJJJ(CCJCCCC, CJCCCCJJ, CJCCCCJC):CJCJCJJJ = (CCJCCCC And CJCCCCJC) Or (CJCCCCJJ And (Not CJCCCCJC)):End Function:Private Function CJCJCJJC(CCJCCCC, CJCCCCJJ, CJCCCCJC):CJCJCJJC = (CCJCCCC Xor CJCCCCJJ Xor CJCCCCJC):End Function:Private Function CJCJCJCJ(CCJCCCC, CJCCCCJJ, CJCCCCJC):CJCJCJCJ = (CJCCCCJJ Xor (CCJCCCC Or (Not CJCCCCJC))):End Function:Private Sub md5_FF(CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC, CJCCCCCJ, CJCCCCCC):CCCJCJJ = CJCJJCCJ(CCCJCJJ, CJCJJCCJ(CJCJJCCJ(CJCJJCCC(CCCJCJC, CCCJCCJ, CCCJCCC), CCJCCCC), CJCCCCCC)):CCCJCJJ = CJCJJCJC(CCCJCJJ, CJCCCCCJ):CCCJCJJ = CJCJJCCJ(CCCJCJJ, CCCJCJC):End Sub:Private Sub md5_GG(CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC, CJCCCCCJ, CJCCCCCC):CCCJCJJ = CJCJJCCJ(CCCJCJJ, CJCJJCCJ(CJCJJCCJ(CJCJCJJJ(CCCJCJC, CCCJCCJ, CCCJCCC), CCJCCCC), CJCCCCCC)):CCCJCJJ = CJCJJCJC(CCCJCJJ, CJCCCCCJ):CCCJCJJ = CJCJJCCJ(CCCJCJJ, CCCJCJC):End Sub:Private Sub md5_HH(CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC, CJCCCCCJ, CJCCCCCC):CCCJCJJ = CJCJJCCJ(CCCJCJJ, CJCJJCCJ(CJCJJCCJ(CJCJCJJC(CCCJCJC, CCCJCCJ, CCCJCCC), CCJCCCC), CJCCCCCC)):CCCJCJJ = CJCJJCJC(CCCJCJJ, CJCCCCCJ):CCCJCJJ = CJCJJCCJ(CCCJCJJ, CCCJCJC):End Sub:Private Sub md5_II(CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC, CJCCCCCJ, CJCCCCCC):CCCJCJJ = CJCJJCCJ(CCCJCJJ, CJCJJCCJ(CJCJJCCJ(CJCJCJCJ(CCCJCJC, CCCJCCJ, CCCJCCC), CCJCCCC), CJCCCCCC)):CCCJCJJ = CJCJJCJC(CCCJCJJ, CJCCCCCJ):CCCJCJJ = CJCJJCCJ(CCCJCJJ, CCCJCJC):End Sub:Private Function CJCJCJCC(CCJJJJJJ):Dim CCJJCCC:Dim CCJCJJJ:Dim CCJCJJC():Dim CCJCJCJ:Dim CCJCJCC:Dim CCJCCJJ:Const CJJJJCJJ =512:Const CJJJJCJC =448:CCJJCCC = Len(CCJJJJJJ):CCJCJJJ = (((CCJJCCC + ((CJJJJCJJ - CJJJJCJC) \ CJJJJJJC)) \ (CJJJJCJJ \ CJJJJJJC)) + 1) * (CJJJJCJJ \ CJJJJJCC):ReDim CCJCJJC(CCJCJJJ - 1):CCJCJCJ = 0:CCJCJCC = 0:Do Until CCJCJCC >= CCJJCCC:CCJCCJJ = CCJCJCC \ CJJJJJCJ:CCJCJCJ = (CCJCJCC Mod CJJJJJCJ) * CJJJJJJC:CCJCJJC(CCJCCJJ) = CCJCJJC(CCJCCJJ) Or CJCJJJCC(Asc(Mid(CCJJJJJJ, CCJCJCC + 1, 1)), CCJCJCJ):CCJCJCC = CCJCJCC + 1:Loop:CCJCCJJ = CCJCJCC \ CJJJJJCJ:CCJCJCJ = (CCJCJCC Mod CJJJJJCJ) * CJJJJJJC:CCJCJJC(CCJCCJJ) = CCJCJJC(CCJCCJJ) Or CJCJJJCC(&H80, CCJCJCJ):CCJCJJC(CCJCJJJ - 2) = CJCJJJCC(CCJJCCC, 3):CCJCJJC(CCJCJJJ - 1) = CJCJJCJJ(CCJJCCC, 29):CJCJCJCC = CCJCJJC:End Function:Private Function CJCJCCJJ(CJCCCJJJ):Dim CCJCCJC:Dim CCJCCCJ:For CCJCCCJ = 0 To 3:CCJCCJC = CJCJJCJJ(CJCCCJJJ, CCJCCCJ * CJJJJJJC) And CCJJJJJ(CJJJJJJC - 1):CJCJCCJJ = CJCJCCJJ & Right("0" & Hex(CCJCCJC), 2):Next:End Function:Public Function CJCJCCJC(CCJJJJJJ):CCJJJJJ(0) = CLng(1):CCJJJJJ(1) = CLng(3):CCJJJJJ(2) = CLng(7):CCJJJJJ(3) = CLng(15):CCJJJJJ(4) = CLng(31):CCJJJJJ(5) = CLng(63):CCJJJJJ(6) = CLng(127):CCJJJJJ(7) = CLng(255):CCJJJJJ(8) = CLng(511):CCJJJJJ(9) = CLng(1023):CCJJJJJ(10) = CLng(2047):CCJJJJJ(11) = CLng(4095):CCJJJJJ(12) = CLng(8191):CCJJJJJ(13) = CLng(16383):CCJJJJJ(14) = CLng(32767):CCJJJJJ(15) = CLng(65535):CCJJJJJ(16) = CLng(131071):CCJJJJJ(17) = CLng(262143):CCJJJJJ(18) = CLng(524287):CCJJJJJ(19) = CLng(1048575):CCJJJJJ(20) = CLng(2097151):CCJJJJJ(21) = CLng(4194303):CCJJJJJ(22) = CLng(8388607):CCJJJJJ(23) = CLng(16777215):CCJJJJJ(24) = CLng(33554431):CCJJJJJ(25) = CLng(67108863):CCJJJJJ(26) = CLng(134217727):CCJJJJJ(27) = CLng(268435455):CCJJJJJ(28) = CLng(536870911):CCJJJJJ(29) = CLng(1073741823):CCJJJJJ(30) = CLng(2147483647):CCJJJJC(0) = CLng(1):CCJJJJC(1) = CLng(2):CCJJJJC(2) = CLng(4):CCJJJJC(3) = CLng(8):CCJJJJC(4) = CLng(16):CCJJJJC(5) = CLng(32):CCJJJJC(6) = CLng(64):CCJJJJC(7) = CLng(128):CCJJJJC(8) = CLng(256):CCJJJJC(9) = CLng(512):CCJJJJC(10) = CLng(1024):CCJJJJC(11) = CLng(2048):CCJJJJC(12) = CLng(4096):CCJJJJC(13) = CLng(8192):CCJJJJC(14) = CLng(16384):CCJJJJC(15) = CLng(32768):CCJJJJC(16) = CLng(65536):CCJJJJC(17) = CLng(131072):CCJJJJC(18) = CLng(262144):CCJJJJC(19) = CLng(524288):CCJJJJC(20) = CLng(1048576):CCJJJJC(21) = CLng(2097152):CCJJJJC(22) = CLng(4194304):CCJJJJC(23) = CLng(8388608):CCJJJJC(24) = CLng(16777216):CCJJJJC(25) = CLng(33554432):CCJJJJC(26) = CLng(67108864):CCJJJJC(27) = CLng(134217728):CCJJJJC(28) = CLng(268435456):CCJJJJC(29) = CLng(536870912):CCJJJJC(30) = CLng(1073741824):Dim CCJCCCC:Dim CJCCJJC:Dim CCCJJJJ:Dim CCCJJJC:Dim CCCJJCJ:Dim CCCJJCC:Dim CCCJCJJ:Dim CCCJCJC:Dim CCCJCCJ:Dim CCCJCCC:Const CJJJJCCJ =7:Const CJJJJCCC =12:Const CJJJCJJJ =17:Const CJJJCJJC =22:Const CJJJCJCJ =5:Const CJJJCJCC =9:Const CJJJCCJJ =14:Const CJJJCCJC =20:Const CJJJCCCJ =4:Const CJJJCCCC =11:Const CJJCJJJJ =16:Const CJJCJJJC =23:Const CJJCJJCJ =6:Const CJJCJJCC =10:Const CJJCJCJJ =15:Const CJJCJCJC =21:CCJCCCC = CJCJCJCC(CCJJJJJJ):CCCJCJJ = &H67452301:CCCJCJC = &HEFCDAB89:CCCJCCJ = &H98BADCFE:CCCJCCC = &H10325476:For CJCCJJC = 0 To UBound(CCJCCCC) Step 16:CCCJJJJ = CCCJCJJ:CCCJJJC = CCCJCJC:CCCJJCJ = CCCJCCJ:CCCJJCC = CCCJCCC:md5_FF CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 0), CJJJJCCJ, &HD76AA478:md5_FF CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 1), CJJJJCCC, &HE8C7B756:md5_FF CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 2), CJJJCJJJ, &H242070DB:md5_FF CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 3), CJJJCJJC, &HC1BDCEEE:md5_FF CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 4), CJJJJCCJ, &HF57C0FAF:md5_FF CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 5), CJJJJCCC, &H4787C62A:md5_FF CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 6), CJJJCJJJ, &HA8304613:md5_FF CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 7), CJJJCJJC, &HFD469501:md5_FF CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 8), CJJJJCCJ, &H698098D8:md5_FF CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 9), CJJJJCCC, &H8B44F7AF:md5_FF CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 10), CJJJCJJJ, &HFFFF5BB1:md5_FF CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 11), CJJJCJJC, &H895CD7BE:md5_FF CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 12), CJJJJCCJ, &H6B901122:md5_FF CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 13), CJJJJCCC, &HFD987193:md5_FF CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 14), CJJJCJJJ, &HA679438E:md5_FF CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 15), CJJJCJJC, &H49B40821:md5_GG CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 1), CJJJCJCJ, &HF61E2562:md5_GG CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 6), CJJJCJCC, &HC040B340:md5_GG CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 11), CJJJCCJJ, &H265E5A51:md5_GG CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 0), CJJJCCJC, &HE9B6C7AA:md5_GG CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 5), CJJJCJCJ, &HD62F105D:md5_GG CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 10), CJJJCJCC, &H2441453:md5_GG CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 15), CJJJCCJJ, &HD8A1E681:md5_GG CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 4), CJJJCCJC, &HE7D3FBC8:md5_GG CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 9), CJJJCJCJ, &H21E1CDE6:md5_GG CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 14), CJJJCJCC, &HC33707D6:md5_GG CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 3), CJJJCCJJ, &HF4D50D87:md5_GG CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 8), CJJJCCJC, &H455A14ED:md5_GG CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 13), CJJJCJCJ, &HA9E3E905:md5_GG CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 2), CJJJCJCC, &HFCEFA3F8:md5_GG CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 7), CJJJCCJJ, &H676F02D9:md5_GG CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 12), CJJJCCJC, &H8D2A4C8A:md5_HH CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 5), CJJJCCCJ, &HFFFA3942:md5_HH CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 8), CJJJCCCC, &H8771F681:md5_HH CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 11), CJJCJJJJ, &H6D9D6122:md5_HH CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 14), CJJCJJJC, &HFDE5380C:md5_HH CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 1), CJJJCCCJ, &HA4BEEA44:md5_HH CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 4), CJJJCCCC, &H4BDECFA9:md5_HH CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 7), CJJCJJJJ, &HF6BB4B60:md5_HH CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 10), CJJCJJJC, &HBEBFBC70:md5_HH CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 13), CJJJCCCJ, &H289B7EC6:md5_HH CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 0), CJJJCCCC, &HEAA127FA:md5_HH CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 3), CJJCJJJJ, &HD4EF3085:md5_HH CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 6), CJJCJJJC, &H4881D05:md5_HH CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 9), CJJJCCCJ, &HD9D4D039:md5_HH CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 12), CJJJCCCC, &HE6DB99E5:md5_HH CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 15), CJJCJJJJ, &H1FA27CF8:md5_HH CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 2), CJJCJJJC, &HC4AC5665:md5_II CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 0), CJJCJJCJ, &HF4292244:md5_II CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 7), CJJCJJCC, &H432AFF97:md5_II CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 14), CJJCJCJJ, &HAB9423A7:md5_II CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 5), CJJCJCJC, &HFC93A039:md5_II CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 12), CJJCJJCJ, &H655B59C3:md5_II CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 3), CJJCJJCC, &H8F0CCC92:md5_II CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 10), CJJCJCJJ, &HFFEFF47D:md5_II CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 1), CJJCJCJC, &H85845DD1:md5_II CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 8), CJJCJJCJ, &H6FA87E4F:md5_II CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 15), CJJCJJCC, &HFE2CE6E0:md5_II CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 6), CJJCJCJJ, &HA3014314:md5_II CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 13), CJJCJCJC, &H4E0811A1:md5_II CCCJCJJ, CCCJCJC, CCCJCCJ, CCCJCCC, CCJCCCC(CJCCJJC + 4), CJJCJJCJ, &HF7537E82:md5_II CCCJCCC, CCCJCJJ, CCCJCJC, CCCJCCJ, CCJCCCC(CJCCJJC + 11), CJJCJJCC, &HBD3AF235:md5_II CCCJCCJ, CCCJCCC, CCCJCJJ, CCCJCJC, CCJCCCC(CJCCJJC + 2), CJJCJCJJ, &H2AD7D2BB:md5_II CCCJCJC, CCCJCCJ, CCCJCCC, CCCJCJJ, CCJCCCC(CJCCJJC + 9), CJJCJCJC, &HEB86D391:CCCJCJJ = CJCJJCCJ(CCCJCJJ, CCCJJJJ):CCCJCJC = CJCJJCCJ(CCCJCJC, CCCJJJC):CCCJCCJ = CJCJJCCJ(CCCJCCJ, CCCJJCJ):CCCJCCC = CJCJJCCJ(CCCJCCC, CCCJJCC):Next:CJCJCCJC = LCase(CJCJCCJJ(CCCJCJJ) & CJCJCCJJ(CCCJCJC) & CJCJCCJJ(CCCJCCJ) & CJCJCCJJ(CCCJCCC)):End Function::Call CheckRight(25):dim CCCCJJJ,CCCCJJC:CCCCJJJ=Request.QueryString(CJCJCCCJ(":5")):CCCCJJC=Request.QueryString(CJCJCCCJ("24E")):if not CJJCCCJJ(CCCCJJJ) then Call RedirectMessage(CJCJCCCJ("????????M??????????????,??????????????????????,")) if Request.ServerVariables(CJCJCCCJ("#t""&t$%0|t%w~s")) = CJCJCCCJ("!~$%") then dim CCCCJCJ,CCCCJCC,CCCCCJJ,CCCCCJC:CCCCJCJ=Trim(Request.Form(CJCJCCCJ("E6IE7:6=5d"))):CCCCJCC=cint(Request.Form(CJCJCCCJ("E6IE7:6=5g"))):CCCCCJJ=Request.Form(CJCJCCCJ("E6IE7:6=5a")):CCCCCJC=Request.Form(CJCJCCCJ("8C256")):if not CJJCCCJJ(CCCCCJJ) then CCCCCJJ=CJCJCCCJ("}F==") if not CJJCCCJJ(CCCCCJC) then CCCCCJC=CJCJCCCJ("}F==") CJJJJJJ=CJCJCCCJ("FA52E6 ,>6>36C ,D6E") & CJCJCCCJ(" ,EJA6l") & Request.Form(CJCJCCCJ(">6>36CEJA6")) & CJCJCCCJ("[8C256l") & CCCCCJC & CJCJCCCJ("[FD6C?2>6lV") & CJJCJCCC(Request.Form(CJCJCCCJ("FD6C?2>6"))) & CJCJCCCJ("V") & CJCJCCCJ("[2CE:4=60EJA6lV") & Trim(Request.Form(CJCJCCCJ("E6IE7:6=5"))) & CJCJCCCJ("V") & CJCJCCCJ("[DE2E6l") & Request.Form(CJCJCCCJ("C25:@3FEE@?")) & CJCJCCCJ("[6>2:=lV") & CJJCJCCC(Request.Form(CJCJCCCJ("E6IE7:6=5f"))) & CJCJCCCJ("V") & CJCJCCCJ("[?:4<?2>6lV") & CJJCJCCC(Request.Form(CJCJCCCJ("E6IE7:6=5b"))) & CJCJCCCJ("V") & CJCJCCCJ("[,8C@FA.l") & CCCCJCC & CJCJCCCJ("[:?EC@lV") & CJJCJCCC(Request.Form(CJCJCCCJ("E6IE2C62"))) & CJCJCCCJ("V") & CJCJCCCJ("[C6>2C<lV") & CJJCJCCC(Request.Form(CJCJCCCJ("E6IE2C62a"))) & CJCJCCCJ("V") & CJCJCCCJ("[AC@G:?46lV") & Request.Form(CJCJCCCJ("AC@G:?46")) & CJCJCCCJ("V") & CJCJCCCJ("[4:EJlV") & Request.Form(CJCJCCCJ("4:EJ")) & CJCJCCCJ("V") & CJCJCCCJ("[5:DEC:4ElV") & Request.Form(CJCJCCCJ("5:DEC:4E")) & CJCJCCCJ("V") & CJCJCCCJ("[H63D:E6lV") & CJJCJCCC(Request.Form(CJCJCCCJ("E6IE7:6=5`_"))) & CJCJCCCJ("V") & CJCJCCCJ("[D4@C6l") & Request.Form(CJCJCCCJ("E6IE7:6=5`a")) & CJCJCCCJ("[:D$49@@=p5>:?l") & Cint(Request.Form(CJCJCCCJ("4964<3@Ic"))) & CJCJCCCJ("[A9@E@lV") & CJJCJCCC(Request.Form(CJCJCCCJ("A9@E@"))) & CJCJCCCJ("V") & CJCJCCCJ("[286?4Jl") & CCCCCJJ & CJCJCCCJ("[>@3:=6lV") & Request.Form(CJCJCCCJ(">@3:=6")) & CJCJCCCJ("V") & CJCJCCCJ("[7246lV") & CJJCJCCC(Request.Form(CJCJCCCJ("7246"))) & CJCJCCCJ("V") & CJCJCCCJ("[H6:I:?0F?:@?:5lV") & CJJCJCCC(Request.Form(CJCJCCCJ("H6:I:?0F?:@?:5"))) & CJCJCCCJ("V") if CCCCJCJ<>"" then CJJJJJJ=CJJJJJJ & CJCJCCCJ("[,A2DDH@C5.lV") & CJCJCCJC(CCCCJCJ) & CJCJCCCJ("V[7:CDEADHl}F==") Call InsertLog(2,CJCJCCCJ("??????????") & CCCCJJJ & CJCJCCCJ("??????")) end if:if Request.Form(CJCJCCCJ("C25:@3FEE@?"))="1" then CJJJJJJ=CJJJJJJ & CJCJCCCJ("[,C:89E.l?F==") end if:CJJJJJJ=CJJJJJJ & CJCJCCCJ(" ,H96C6 ,:5l") & CCCCJJJ:CCCCJJ.execute CJJJJJJ:Call RedirectMessage(CJCJCCCJ("????????M??????????????????,??????,k2 ,9C67lV]]^25>:?^>6>36C^>@5:7J]2DAn:5l") & CCCCJJJ & CJCJCCCJ("Vm????????k^2m.????@????,k2 ,9C67lQ") & CJJCCJCC & CJCJCCCJ("Qm????????k^2m.??,")) end if:CJJJJJJ=CJCJCCCJ("D6=64E ,E@A ,` ,4:EJ[?:4<?2>6[286?4J[9@>6A286[A9@E@[6>2:=[H63D:E6[EJA6[EJA6?2>6[FD6C?2>6[DE2E6[2CE:4=60EJA6[:D$49@@=p5>:?[C6>2C<[D4@C6[,8C@FA.[:?EC@[,``c0DE2EFD.[AC@G:?46[>@3:=6[7246[H6:I:?0F?:@?:5[8C256[5:DEC:4E ,7C@> ,G0>6>36C ,H96C6 ,:5l") & CCCCJJJ set CCCCCJ=CCCCJJ.execute(CJJJJJJ):if CCCCCJ.eof then Call RedirectMessage(CJCJCCCJ("????????M??????????????????????,")) Response.Write(vbCrLf):Response.Write(CJCJCCCJ("kP5@4EJA6 ,9E>=m") & vbCrLf):Response.Write(CJCJCCCJ("k9E>=m") & vbCrLf):Response.Write(CJCJCCCJ("k9625m") & vbCrLf):Response.Write(CJCJCCCJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCJCCCJ("k=:?< ,9C67lQ]]^DEJ=6]4DDQ ,C6=lQDEJ=6D966EQm") & vbCrLf):Response.Write(CJCJCCCJ("kE:E=6m??????????k^E:E=6m") & vbCrLf):Response.Write(CJCJCCCJ("k^9625m") & vbCrLf):Response.Write(CJCJCCCJ("k3@5Jm") & vbCrLf):Response.Write(CJCJCCCJ("k5:G ,4=2DDlQE:E=6Qm????????????k^5:Gm") & vbCrLf):Response.Write(CJCJCCCJ("k7@C> ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE23=6 ,4=2DDlQE30E:E=6Qm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm????????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,:5lQ>6>:5Qm")):Response.Write CCCCJJJ:Response.Write(CJCJCCCJ("k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm????????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5m")):If isnull(CCCCCJ(9)) or CCCCCJ(9)="" Then Response.Write(vbCrLf):Response.Write(CJCJCCCJ(" ,k:?AFE ,?2>6lQFD6C?2>6Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,2FE@4@>A=6E6lQ@77Qm") & vbCrLf):Response.Write(CJCJCCCJ(" ,??,??????????????,??????????????????,") & vbCrLf):Response.Write(CJCJCCCJ(" ,")) Else Response.Write CCCCCJ(9):Response.Write(vbCrLf):Response.Write(CJCJCCCJ(" ,k:?AFE ,?2>6lQFD6C?2>6Q ,EJA6lQ9:556?Q ,G2=F6lQ")):Response.Write CCCCCJ(9):Response.Write(CJCJCCCJ("Qm") & vbCrLf):Response.Write(CJCJCCCJ(" ,")) End If:Response.Write(CJCJCCCJ("k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQE6IE7:6=5dQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,E:E=6lQ????????????????,????????????????Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQE6IE7:6=5`_Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQE6IE7:6=5cQ ,G2=F6lQ")):Response.Write CCCCCJ(6):Response.Write(CJCJCCCJ("Q ,D:K6lQc_Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,52E2\E@88=6lQ5:DEA:4<6CQmkD6=64E ,?2>6lQAC@G:?46Q ,52E2\AC@G:?46lQ")):Response.Write CCCCCJ(18):Response.Write(CJCJCCCJ("Qm") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCJCCCJ(" ,kD6=64E ,?2>6lQ4:EJQ ,52E2\4:EJlQ")):Response.Write CCCCCJ(0):Response.Write(CJCJCCCJ("Qm") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCJCCCJ(" ,kD6=64E ,?2>6lQ5:DEC:4EQ ,52E2\5:DEC:4ElQ")):Response.Write CCCCCJ(23):Response.Write(CJCJCCCJ("Qm") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^D6=64Emk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qmt>2:=??,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQE6IE7:6=5fQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,G2=F6lQ")):Response.Write CCCCCJ(5):Response.Write(CJCJCCCJ("Q ,D:K6lQc_Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQE6IE7:6=5bQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,G2=F6lQ")):Response.Write CCCCCJ(1):Response.Write(CJCJCCCJ("Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQE6IE7:6=5Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQa_Q ,E:E=6lQ??????????,M??,??????????????xs????,????,????????????????????,UR`bj????????????????????????,??????????????????????????,UR`bj??????????????????????@??????@??????????,Q ,G2=F6lQ")):Response.Write CCCCCJ(11):Response.Write(CJCJCCCJ("Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQE6IE7:6=5`aQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQE6IE7:6=5fQ ,G2=F6lQ")):Response.Write CCCCCJ(14):Response.Write(CJCJCCCJ("Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQ>6>36CEJA6Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,E:E=6lQ??????????????xsQ ,G2=F6lQ")):Response.Write CCCCCJ(7):Response.Write(CJCJCCCJ("Q ,D:K6lQ`_Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=QmU?3DAjk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQ8C256Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,G2=F6lQ")):Response.Write CCCCCJ(22):Response.Write(CJCJCCCJ("Q ,D:K6lQ`_Qm") & vbCrLf):Response.Write(CJCJCCCJ(" ,??,??????????_????????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????xs??,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQE6IE7:6=5aQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQE6IE7:6=5dQ ,G2=F6lQ")):Response.Write CCCCCJ(2):Response.Write(CJCJCCCJ("Q ,E:E=6lQ??????????????xs??,??????????????Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQE6IE7:6=5gQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQE6IE7:6=5Q ,E:E=6lQ??????????????xsQ ,G2=F6lQ")):Response.Write CCCCCJ(15):Response.Write(CJCJCCCJ("Q ,D:K6lQ`_Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm????????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQ>@3:=6Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,G2=F6lQ")):Response.Write CCCCCJ(19):Response.Write(CJCJCCCJ("Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk:?AFE ,?2>6lQ7246Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ7246Q ,D:K6lQc_Q ,G2=F6lQ")):Response.Write CCCCCJ(20):Response.Write(CJCJCCCJ("Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=QmU?3DAjk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5mk=236=m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQC25:@3FEE@?Q ,G2=F6lQdQ ,")):If CCCCCJ(10)=5 Then Response.Write(CJCJCCCJ("4964<65")) Response.Write(CJCJCCCJ("m") & vbCrLf):Response.Write(CJCJCCCJ(" ,????k^=236=m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k=236=m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQC25:@3FEE@?Q ,G2=F6lQ`Q ,")):If CCCCCJ(10)=1 Then Response.Write(CJCJCCCJ("4964<65")) Response.Write(CJCJCCCJ("m") & vbCrLf):Response.Write(CJCJCCCJ(" ,????k^=236=m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k=236=m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQC25:@3FEE@?Q ,G2=F6lQ_Q ,")):If CCCCCJ(10)=0 Then Response.Write(CJCJCCCJ("4964<65")) Response.Write(CJCJCCCJ("m") & vbCrLf):Response.Write(CJCJCCCJ(" ,??????k^=236=mk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm????&?:@?xsk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4@=DA2?lQbQmk:?AFE ,?2>6lQH6:I:?0F?:@?:5Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQH6:I:?0F?:@?:5Q ,G2=F6lQ")):Response.Write CCCCCJ(21):Response.Write(CJCJCCCJ("Q ,D:K6lQc_Qm") & vbCrLf):Response.Write(CJCJCCCJ(" ,??,??@??????????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4@=DA2?lQbQmk:?AFE ,?2>6lQA9@E@Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQA9@E@Q ,D:K6lQg_Q ,G2=F6lQ")):Response.Write CCCCCJ(4):Response.Write(CJCJCCCJ("Qmk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4@=DA2?lQbQmkE6IE2C62 ,?2>6lQE6IE2C62Q ,4@=DlQf_Q ,C@HDlQdQ ,4=2DDlQE6IEQ ,:5lQE6IE2C62Qm")):Response.Write CCCCCJ(16):Response.Write(CJCJCCCJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4@=DA2?lQbQmkE6IE2C62 ,?2>6lQE6IE2C62aQ ,4@=DlQf_Q ,C@HDlQcQ ,4=2DDlQE6IEQ ,:5lQE6IE2C62aQm")):Response.Write CCCCCJ(13):Response.Write(CJCJCCCJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,kE5 ,4@=DA2?lQbQm") & vbCrLf):Response.Write(CJCJCCCJ(" ,k:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQ4964<3@IcQ ,:5lQ4964<3@IbQ ,G2=F6lQ`Q ,")):Response.Write IIf(CCCCCJ(12),CJCJCCCJ("4964<65"),""):Response.Write(CJCJCCCJ("m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k=236= ,7@ClQ4964<3@IbQm??????????k^=236=m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCJCCCJ(" ,k3Cm") & vbCrLf):Response.Write(CJCJCCCJ(" ,k5:G ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CJCJCCCJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,4=2DDlQ3FEE@?Q ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CJCJCCCJ(" ,k:?AFE ,EJA6lQC6D6EQ ,4=2DDlQ3FEE@?Q ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CJCJCCCJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,4=2DDlQ3FEE@?Q ,G2=F6lQ?? ,??Q ,@?r=:4<lQ;2G2D4C:AEi9:DE@CJ]324<WXQm") & vbCrLf):Response.Write(CJCJCCCJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJCJCCCJ("k^7@C>m") & vbCrLf):Response.Write(CJCJCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]G2=:52E6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJCCCJ("kD4C:AE ,DC4lQ^$4C:AED^5:DEA:4<6C]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJCCCJ("kD4C:AEm") & vbCrLf):Response.Write(CJCJCCCJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJCJCCCJ(" ,^^????????") & vbCrLf):Response.Write(CJCJCCCJ(" ,SWQ7@C>QX]G2=:52E6WL") & vbCrLf):Response.Write(CJCJCCCJ(" ,CF=6DiL") & vbCrLf):Response.Write(CJCJCCCJ(" ,FD6C?2>6iLC6>@E6iQ^>6>36C^C68:DE04964<FD6C?2>6]2DAQN[") & vbCrLf):Response.Write(CJCJCCCJ(" ,>@3:=6iLC6>@E6iQ^>6>36C^C68:DE04964<>@3:=6]2DAn:5lQZSWQR>6>:5QX]E6IEWXN") & vbCrLf):Response.Write(CJCJCCCJ(" ,N[") & vbCrLf):Response.Write(CJCJCCCJ(" ,>6DD286DiL") & vbCrLf):Response.Write(CJCJCCCJ(" ,FD6C?2>6iLC6>@E6iQ??????????????????,????????????????QN[") & vbCrLf):Response.Write(CJCJCCCJ(" ,>@3:=6iLC6>@E6iQ??????????????????,????????????????QN") & vbCrLf):Response.Write(CJCJCCCJ(" ,N") & vbCrLf):Response.Write(CJCJCCCJ(" ,NXj") & vbCrLf):Response.Write(CJCJCCCJ("NXj") & vbCrLf):Response.Write(CJCJCCCJ("k^D4C:AEm") & vbCrLf):Response.Write(CJCJCCCJ("k^3@5Jm") & vbCrLf):Response.Write(CJCJCCCJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJCCCJC=nothing:set CJJCCCCJ=nothing:set CJJCCCCC=nothing:set CJCJJJJJ=nothing:CCCCCC.Close:Set CCCCCC=Nothing:CCCCCJ.Close:Set CCCCCJ=Nothing:CCCCJJ.Close:Set CCCCJJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJCJCCCJ(ByVal CCCJCCJ) Dim CCCCCCJ, CJCJCJJ, CCCCCCC CCCJCCJ = Replace(CCCJCCJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJCJCJJ = 1 To Len(CCCJCCJ) If CJCJCJJ <> CCCCCCC Then CCCCCCJ = AscW(Mid(CCCJCCJ, CJCJCJJ, 1)) If CCCCCCJ >= 33 And CCCCCCJ <= 79 Then CJCJCCCJ = CJCJCCCJ & Chr(CCCCCCJ + 47) ElseIf CCCCCCJ >= 80 And CCCCCCJ <= 126 Then CJCJCCCJ = CJCJCCCJ & Chr(CCCCCCJ - 47) Else CCCCCCC = CJCJCJJ + 1 If Mid(CCCJCCJ, CCCCCCC, 1) = Chr(64) Then CJCJCCCJ = CJCJCCCJ & ChrW(CCCCCCJ + 5) Else CJCJCCCJ = CJCJCCCJ & Mid(CCCJCCJ, CJCJCJJ, 1) End If End If Next End Function %>
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de