Edit D:\xinhaisoft\crisis_new\admin\lb\modify.asp
??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CJCJCJ, CJCJCC,CJCCJJ, CJCCJC, CJCCCJ:Set CJCJCJ = server.CreateObject(CCJJJJJ("ps~sq]r@??64E:@?")):CJCJCJ.open Application(CCJJJJJ("r@??64E:@?$EC:?8")):Set CJCJCC=CJCJCJ::Dim CJCCCC,CCJJJJ,CCJJJC,CCJJCJ,CCJJCC,CCJCJJ,CCJCJC,CCJCCJ,CCJCCC:Dim CCCJJJ,CCCJJC,CCCJCJ,CCCJCC,CCCCJJ,CCCCJC:Dim CCCCCJ,CCCCCC,CJJJJJJ:Dim CJJJJJC:CJJJJJC=Trim(Request.Cookies(CCJJJJJ("!$*|t|qt#"))):if CJJJJJC="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CJCCCC>0 then CJCCCJ=CCJJJJJ("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") & CCJJJJ & CCJJJJJ("V ,2?5 ,:5l") & CJCCCC set CJCCJJ=CJCJCJ.execute(CJCCCJ):If CJCCJJ.EOF Then Call ClearMemberCookie Else CCJJJC=CJCCJJ(2) & "":CCJJCJ=CJCCJJ(3):CCJJCC=CJCCJJ(5):CCJCJJ=CJCCJJ(6):CCJCJC=CJCCJJ(9):CCJCCJ=CJCCJJ(15):CCCJJJ=CJCCJJ(0):CCCCCC=CJCCJJ(1):CCCCCJ=CJCCJJ(11) & "":CCCJJC=CJCCJJ(10) & "":CCJCCC=CJCCJJ(12):CCCJCJ=CJCCJJ(14):CCCJCC=CJCCJJ(13):CCCCJJ=CJCCJJ(7) & "":CCCCJC=CJCCJJ(4):CJJJJJJ=CJCCJJ(8):if isnull(CCJCCJ) then CCJCCJ=0 if isnull(CCJCJC) or CCJCJC=0 then CCJCJC=CCJJCJ if isnull(CCCCJC) then CCCCJC=0 if isnull(CCJJCC) then CCJJCC=0 if instr(CCJJJJJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CCJJJJ)>0 then Call RedirectMessage(CCJJJJJ("????????,????????????????????????????????,")) Call SetMemberCookie(CJCCCC,CCJJJJ) End IF end if:Sub CheckRight(CCJJJJC):dim CJJJJCJ,CJJJJCC:if CJCCCC=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CCJJJJJ("??????????????,????????????,")) elseIf not CJCJJCC(CCJJJJC) then Call RedirectMessage(CCJJJJJ("????W") & CCJJJJC & CCJJJJJ("X????????,????????????????????,")) end if:End Sub:Function CJCJJCC(CCJJJJC):dim CJJJJCJ,CJJJJCC:CJJJJCC=split(CCJJJJC,CCJJJJJ("[")):CJCJJCC=False:for CJJJJCJ=0 to ubound(CJJJJCC):If Mid(CCJJJC,CJJJJCC(CJJJJCJ),1)="1" then CJCJJCC=True:exit function end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CCJJJJJ("!$*|t|qt#"))="":CJCCCC=0:CCJCJJ=0:CCJJJJ=Empty:CCJJCC=0:CCJCCJ=0:CCJCJC=0:CCJJCJ=0:CCCJJJ=False:CCCCCC=False:CJJJJJJ=Empty:End Sub:Sub CheckMemberCookie():dim CJJJCJJ,CJJJCJC,CJJJJCJ,CJJJCCJ,CJJJCCC:CJJJCJJ=split(CJJJJJC,CCJJJJJ("]")):if ubound(CJJJCJJ)<>2 then Call ClearMemberCookie elseif not isnumeric(CJJJCJJ(0)) or len(CJJJCJJ(1))<>32 or len(CJJJCJJ(2))<>32 then Call ClearMemberCookie else CJJJCJC=CJJJCJJ(1):for CJJJJCJ=1 to len(CJJJCJC):CJJJCCJ=mid(CJJJCJC,CJJJJCJ,1):if isnumeric(CJJJCCJ) then CJJJCCC=CJJJCCC & CJJJCCJ if len(CJJJCCC)=7 then exit for next:CJJJCJC=CJJJCJJ(2):if CJJJCCC<>mid(CJJJCJC,6,7) then Call ClearMemberCookie else CJJJCCJ=mid(CJJJCJC,18,10)/2:if CJJJCCJ<DateDiff(CCJJJJJ("D"), CCJJJJJ("`hf_\`\` ,gi__i__"), Now)-28800 then Call ClearMemberCookie else CJCCCC=Clng(CJJJCJJ(0)):CCJJJJ=CJJJCJJ(1) end if end if end if:End Sub:Sub SetMemberCookie(CJJCCCC,CCJJJCJ):dim CJJJJCJ,CJJJCCJ,CJJJCCC:for CJJJJCJ=1 to len(CCJJJCJ):CJJJCCJ=mid(CCJJJCJ,CJJJJCJ,1):if isnumeric(CJJJCCJ) then CJJJCCC=CJJJCCC & CJJJCCJ if len(CJJJCCC)=7 then exit for next:CJJJCCC=CJJCCCC & CCJJJJJ("]") & CCJJJCJ & CCJJJJJ("]") & Fix(10000*(Rnd+1)) & CJJJCCC & Fix(10000*(Rnd+1)) & DateDiff(CCJJJJJ("D"), CCJJJJJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CCJJJJJ("!$*|t|qt#"))=CJJJCCC:End Sub::Function CJCJCJJ(CCJJJCC):Dim str,CJJCJJC:str = Trim(CCJJJCC):If IsNull(str) Or str = "" Then CJCJCJJ = "" else str=Replace(str, CCJJJJJ("V"), "") str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CCJJJJJ("k:7C2>6"), CCJJJJJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CCJJJJJ("kD4C:AE"), CCJJJJJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJJCJJC=new RegExp:CJJCJJC.Pattern=CCJJJJJ("@?W,2\K.ZXl"):CJJCJJC.IgnoreCase = True:CJJCJJC.Global=True:str=CJJCJJC.Replace(str,CCJJJJJ("@?S`U6BF2=Dj")):set CJJCJJC=nothing:CJCJCJJ=str End If:End Function:Function IIf(CCJJCJJ, CCJJCJC, CCJJCCJ):if isnull(CCJJCJJ) or isempty(CCJJCJJ) then IIf = CCJJCCJ elseif CCJJCJJ Then IIf = CCJJCJC Else IIf = CCJJCCJ end if:End Function:Const CJCJJCJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CCJJCCC,CCJCJJJ):dim CJJJCJJ:CJJJCJJ=CCJJCCC & "=" & CCJCJJJ & CCJJJJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CCJJJJJ("$6E\r@@<:6"),CJJJCJJ):End Sub::Function CJCJCCJ():CJCJCCJ = Request.Cookies(CCJJJJJ("!$*"))(CCJJJJJ("&#{")):End Function::::::::::Sub ConnClose():On Error Resume Next:set CJCJCCC=nothing:set CJCCJJJ=nothing:set CJCCJJC=nothing:set CJCCJCJ=nothing:CJCCJCC.close : set CJCCJCC=nothing:CJCCJC.Close : Set CJCCJC=Nothing:CJCCJJ.Close : Set CJCCJJ=Nothing:CJCCCJJ.Close : Set CJCCCJJ = Nothing:CJCJCJ.Close : Set CJCJCJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCJCJJC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CCJJJJJ("!$*0|6DD286"),server.URLEncode(CCJCJJC)):Response.Redirect CCJJJJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub::::::::::Function CJCCCCJ(ByVal URL,ByVal CJCCCJC,Data) Dim CJJCJCJ,CJJCJCC,CJJCCJJ,CJJCCJC,CJJCCCJ:if left(Url,7)<>CCJJJJJ("9EEAi^^") then Url=CCJJJJJ("9EEAi^^") & request.ServerVariables(CCJJJJJ("$t#'t#0}p|t")) & CCJJJJJ("i") & request.ServerVariables(CCJJJJJ("$t#'t#0!~#%")) & Url CJCCCJC=Ucase(CJCCCJC):Set CJJCJCJ = Server.CreateObject(CCJJJJJ("|DI>=a]$6CG6C)|{w%%!")):CJJCJCJ.Open CJCCCJC, Url, False:if CJCCCJC=CCJJJJJ("!~$%") then CJJCJCJ.setRequestHeader CCJJJJJ("r@?E6?E\%JA6"),CCJJJJJ("2AA=:42E:@?^I\HHH\7@C>\FC=6?4@565") On Error Resume Next:CJJCJCJ.Send Data:if err then Call RedirectMessage(CCJJJJJ("$6CG6C)|{w%%!\tCC@C\,") & CJCCCJC & CCJJJJJ(".") & Url & CCJJJJJ("i ,") & err.description) On Error Goto 0:if CJJCJCJ.Readystate <> 4 or CJJCJCJ.Status<>200 then CJJCCJJ = "" else CJJCCJJ = CJJCJCJ.ResponseText end if:Set CJJCJCJ = Nothing:CJCCCCJ=CJJCCJJ End Function::::::::::::::::::Sub CreateTextFile(CCJCJCJ, CCJCJCC):if isnull(CCJCJCC) or CCJCJCC="" then Call RedirectMessage(CCJJJJJ("????????,??????????@????????,??????????????,")) dim CJJCJCC:Set CJJCJCC = Server.CreateObject(CCJJJJJ("ps~sq]$EC62>")):With CJJCJCC:.Type=2:.Mode=3:.Charset = CCJJJJJ("FE7\g"):.Open:.WriteText CCJCJCC:.SaveToFile server.mappath(CCJCJCJ),2:.Close:End With:Set CJJCJCC = Nothing:End Sub:::::::::::Call CheckRight(13):dim CJJCCCC,CJCJJJJ:CJJCCCC=Request.QueryString(CCJJJJJ(":5")):CJCJJJJ=Request.QueryString(CCJJJJJ("24E")):if CJCJJJJ=CCJJJJJ("r=62Cr2496") then Application.Contents.Remove CCJJJJJ("!$*0%6DED") Call RedirectMessage(CCJJJJJ("????????M??@????????????????,")) elseif CJCJJJJ=CCJJJJJ("|2<6wE>=") then Call CreateTextFile(CCJJJJJ("]]^]]^=3^9E>=^") & CJJCCCC & CCJJJJJ("]9E>"),CJCCCCJ(CCJJJJJ("^=3^:?4^D9@HE6DE]2DAn=3:5l") & CJJCCCC,CCJJJJJ("v6E"),"")) Call RedirectMessage(CCJJJJJ("????????M??????????????,")) end if:if Request.ServerVariables(CCJJJJJ("#t""&t$%0|t%w~s"))=CCJJJJJ("!~$%") then CJCCCJ=CCJJJJJ("FA52E6 ,=3 ,D6E") & CCJJJJJ(" ,?2>6049lV") & CJCJCJJ(Request.Form(CCJJJJJ("?2>6049"))) & CCJJJJJ("V") & CCJJJJJ("[?2>607ClV") & CJCJCJJ(Request.Form(CCJJJJJ("?2>607C"))) & CCJJJJJ("V") & CCJJJJJ("[?2>606?lV") & lcase(CJCJCJJ(Request.Form(CCJJJJJ("?2>606?")))) & CCJJJJJ("V") & CCJJJJJ("[E:>60>:?l") & Request.Form(CCJJJJJ("E:>60>:?")) & CCJJJJJ("[E:>60>2Il") & Request.Form(CCJJJJJ("E:>60>2I")) & CCJJJJJ("[2860>:?l") & Request.Form(CCJJJJJ("2860>:?")) & CCJJJJJ("[2860>2Il") & Request.Form(CCJJJJJ("2860>2I")) & CCJJJJJ("[>@?6Jl") & Request.Form(CCJJJJJ(">@?6J")) & CCJJJJJ("[BF6DE4@F?El") & Request.Form(CCJJJJJ("B4@F?E")) & CCJJJJJ("[E6DE4@F?El") & Request.Form(CCJJJJJ("E6DE4@F?E")) & CCJJJJJ("[24ElV") & Request.Form(CCJJJJJ("24E")) & CCJJJJJ("V") & CCJJJJJ("[:?EC@`lV") & CJCJCJJ(Request.Form(CCJJJJJ(":?EC@`"))) & CCJJJJJ("V") & CCJJJJJ("[:?EC@alV") & CJCJCJJ(Request.Form(CCJJJJJ(":?EC@a"))) & CCJJJJJ("V") & CCJJJJJ("[:?EC@blV") & CJCJCJJ(Request.Form(CCJJJJJ(":?EC@b"))) & CCJJJJJ("V") & CCJJJJJ("[E6DEE:AlV") & CJCJCJJ(Request.Form(CCJJJJJ("E6DEE:A"))) & CCJJJJJ("V") & CCJJJJJ("[AFCA@D6lV") & CJCJCJJ(Request.Form(CCJJJJJ("AFCA@D6"))) & CCJJJJJ("V") & CCJJJJJ("[6IA=2:?0C625lV") & CJCJCJJ(Request.Form(CCJJJJJ("6IA=2:?0C625"))) & CCJJJJJ("V") & CCJJJJJ("[6IA=2:?0C6DF=ElV") & CJCJCJJ(Request.Form(CCJJJJJ("6IA=2:?0C6DF=E"))) & CCJJJJJ("V") & CCJJJJJ("[E@@=:?EC@lV") & CJCJCJJ(Request.Form(CCJJJJJ("E@@=:?EC@"))) & CCJJJJJ("V") & CCJJJJJ("[2?DH6ClV") & CJCJCJJ(Request.Form(CCJJJJJ("2?DH6C"))) & CCJJJJJ("V") & CCJJJJJ("[724E@C`lV") & CJCJCJJ(Request.Form(CCJJJJJ("724E@C`"))) & CCJJJJJ("V") & CCJJJJJ("[724E@CalV") & CJCJCJJ(Request.Form(CCJJJJJ("724E@Ca"))) & CCJJJJJ("V") & CCJJJJJ("[2G2:=23=6l") & Cint(Request.Form(CCJJJJJ("2G2:=23=6"))) & CCJJJJJ("[@AEl") & Cint(Request.Form(CCJJJJJ("@AE"))) & CCJJJJJ("[@AE0>@?6Jl") & Request.Form(CCJJJJJ("@AE0>@?6J")) & CCJJJJJ("[492CEl") & Cint(Request.Form(CCJJJJJ("492CE"))) & CCJJJJJ("[A:4EFC6lV") & CJCJCJJ(Request.Form(CCJJJJJ("A:4EFC6"))) & CCJJJJJ("V") & CCJJJJJ("[5@4lV") & CJCJCJJ(Request.Form(CCJJJJJ("5@4"))) & CCJJJJJ("V") & CCJJJJJ("[2CE:4=6lV") & replace(Request.Form(CCJJJJJ("2CE:4=6")),CCJJJJJ("??,"),CCJJJJJ("[")) & CCJJJJJ("V") & CCJJJJJ(" ,H96C6 ,:5l") & CJJCCCC CJCJCJ.execute CJCCCJ:Application.Contents.Remove CCJJJJJ("!$*0%6DED") Call RedirectMessage(CCJJJJJ("??????????????????????,??????,k2 ,9C67lV]]^25>:?^=3^>@5:7J]2DAn:5l") & CJJCCCC & CCJJJJJ("Vm????????k^2m.????@,k2 ,9C67lV") & CJCJCCJ & CCJJJJJ("Vm????????????k^2m.??,")) end if:set CJCCJJ=CJCJCJ.execute(CCJJJJJ("D6=64E ,E@A ,` ,Y ,7C@> ,=3 ,H96C6 ,:5l") & CJJCCCC):Response.Write(vbCrLf):Response.Write(CCJJJJJ("kP5@4EJA6 ,9E>=m") & vbCrLf):Response.Write(CCJJJJJ("k9E>=m") & vbCrLf):Response.Write(CCJJJJJ("k9625m") & vbCrLf):Response.Write(CCJJJJJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CCJJJJJ("kE:E=6m??????????k^E:E=6m") & vbCrLf):Response.Write(CCJJJJJ("k=:?< ,9C67lQ]]^DEJ=6]4DDQ ,C6=lQDEJ=6D966EQm") & vbCrLf):Response.Write(CCJJJJJ("kDEJ=6m") & vbCrLf):Response.Write(CCJJJJJ("E6IE2C62 ,L ,H:5E9i ,`__Tj ,N") & vbCrLf):Response.Write(CCJJJJJ("]>JE23=6 ,E5 ,L ,3@C56C\3@EE@>i ,`AI ,5@EE65 ,R_erj ,G6CE:42=\2=:8?i ,E@Aj ,N") & vbCrLf):Response.Write(CCJJJJJ("k^DEJ=6m") & vbCrLf):Response.Write(CCJJJJJ("k^9625m") & vbCrLf):Response.Write(CCJJJJJ("k3@5Jm") & vbCrLf):Response.Write(CCJJJJJ("k5:G ,4=2DDlQE:E=6Qm")):Response.Write CJCCJJ(CCJJJJJ("?2>6049")):Response.Write(CCJJJJJ("k^5:Gm") & vbCrLf):Response.Write(CCJJJJJ("kF= ,4=2DDlQE23Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,k=: ,4=2DDlQ4FCC6?EQmk2 ,9C67lQ>@5:7J]2DAn:5l")):Response.Write CJJCCCC:Response.Write(CCJJJJJ("Qm????????k^2mk^=:m") & vbCrLf):Response.Write(CCJJJJJ(" ,k=:mk2 ,9C67lQBF6DE:@?]2DAn=3:5l")):Response.Write CJJCCCC:Response.Write(CCJJJJJ("Qm????k^2mk^=:m") & vbCrLf):Response.Write(CCJJJJJ(" ,k=:mk2 ,9C67lQ724E@C]2DAn=3:5l")):Response.Write CJJCCCC:Response.Write(CCJJJJJ("Qm????k^2mk^=:m") & vbCrLf):Response.Write(CCJJJJJ(" ,k=:mk2 ,9C67lQ6IA=2:?]2DAn=3:5l")):Response.Write CJJCCCC:Response.Write(CCJJJJJ("Qm????k^2mk^=:m") & vbCrLf):Response.Write(CCJJJJJ(" ,k=:mk2 ,9C67lQ=:DE]2DAQm????????k^2mk^=:m") & vbCrLf):Response.Write(CCJJJJJ("k^F=m") & vbCrLf):Response.Write(CCJJJJJ("k7@C> ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQ ,:5lQ7@C>`Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE23=6 ,H:5E9lQ`__TQ ,4=2DDlQ>JE23=6Q ,46==A255:?8lQdQ ,46==DA24:?8lQ`Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5 ,H:5E9lQ`a_Qm????????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ?2>6049Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ?2>6049Q ,D:K6lQd_Q ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("?2>6049")):Response.Write(CCJJJJJ("Qmk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ?2>607CQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ?2>607CQ ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("?2>607C")):Response.Write(CCJJJJJ("Q ,D:K6lQd_Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,??????????,????????????????????????,??????????????????????????,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ?2>606?Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ?2>606?Q ,D:K6lQ`_Q ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("?2>606?")):Response.Write(CCJJJJJ("Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,??????,????????????????????????????,????????????????,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQA:4EFC6Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQ`__Q ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("A:4EFC6")):Response.Write(CCJJJJJ("Q ,E:E=6lQ????????????????????@????????????,????,??????????????????????????????,??????,??????????????,??????????????,??????????????????Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,k:?AFE ,?2>6lQ3E?0G:6HQ ,EJA6lQ3FEE@?Q ,4=2DDlQ3FEE@?Q ,:5lQ3E?0G:6HQ ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,k3Cm") & vbCrLf):Response.Write(CCJJJJJ(" ,k:7C2>6 ,DC4lQ]]^]]^:?4^FA=@25]2DAnu%l`Uu!ldUu}l")):Response.Write CJCCJJ(CCJJJJJ("?2>606?")):Response.Write(CCJJJJJ("U$+ld_Up4El`Uu|lA:4EFC6Q ,H:5E9lQcedQ ,96:89ElQadQ ,D4C@==:?8lQ?@Q ,7C2>63@C56ClQ_Qmk^:7C2>6mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m(@C5????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ5@4Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQ`__Q ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("5@4")):Response.Write(CCJJJJJ("Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,k:7C2>6 ,DC4lQ]]^]]^:?4^FA=@25]2DAnu%ldUu!leUu}l")):Response.Write CJCCJJ(CCJJJJJ("?2>606?")):Response.Write(CCJJJJJ("Up4El`Uu|l5@4Q ,H:5E9lQcedQ ,96:89ElQadQ ,D4C@==:?8lQ?@Q ,7C2>63@C56ClQ_Qmk^:7C2>6mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQE:>60>:?Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQE:>60>:?Q ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("E:>60>:?")):Response.Write(CCJJJJJ("Q ,D:K6lQ`_Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,O") & vbCrLf):Response.Write(CCJJJJJ(" ,k:?AFE ,?2>6lQE:>60>2IQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQE:>60>2IQ ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("E:>60>2I")):Response.Write(CCJJJJJ("Q ,D:K6lQ`_Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,??@????????????,??????????,??????????????_??,??????,????????`_??????,??????,????????`_??,????????????_??,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ2860>:?Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ2860>:?Q ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("2860>:?")):Response.Write(CCJJJJJ("Q ,D:K6lQ`_Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,O") & vbCrLf):Response.Write(CCJJJJJ(" ,k:?AFE ,?2>6lQ2860>2IQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ2860>2IQ ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("2860>2I")):Response.Write(CCJJJJJ("Q ,D:K6lQ`_Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,??@????????????,????????????????_??,????????????????`__??,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQB4@F?EQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQB4@F?EQ ,D:K6lQ`_Q ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("BF6DE4@F?E")):Response.Write(CCJJJJJ("Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,??@????????????,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQE6DE4@F?EQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQE6DE4@F?EQ ,D:K6lQ`_Q ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("E6DE4@F?E")):Response.Write(CCJJJJJ("Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,??@????????????,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ>@?6JQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ>@?6JQ ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ(">@?6J")):Response.Write(CCJJJJJ("Q ,D:K6lQdQm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,??????,????,??????????????_??,??????????,??@????????,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k:?AFE ,?2>6lQ24EQ ,EJA6lQE6IEQ ,D:K6lQ`eQ ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("24E")):Response.Write(CCJJJJJ("Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,????????????,`??????,a??????,b????_??,c????_??,d????_??,e??????????????,f??????????????,`??????????,_??????????,") & vbCrLf):Response.Write(CCJJJJJ(" ,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m??,????????^????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ:?EC@bQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ(":?EC@b")):Response.Write(CCJJJJJ("Q ,D:K6lQ`__Q ,>2I=6?8E9lQ`__Qmk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQ:?EC@`Q ,4=2DDlQE6IEQ ,:5lQ:?EC@`Qm")):Response.Write CJCCJJ(CCJJJJJ(":?EC@`")):Response.Write(CCJJJJJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQ:?EC@aQ ,4=2DDlQE6IEQ ,:5lQ:?EC@aQm")):Response.Write CJCCJJ(CCJJJJJ(":?EC@a")):Response.Write(CCJJJJJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m??????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQE6DEE:AQ ,4=2DDlQE6IEQ ,:5lQE6DEE:AQm")):Response.Write CJCCJJ(CCJJJJJ("E6DEE:A")):Response.Write(CCJJJJJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m??????????,????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQAFCA@D6Q ,4=2DDlQE6IEQ ,:5lQAFCA@D6Qm")):Response.Write CJCCJJ(CCJJJJJ("AFCA@D6")):Response.Write(CCJJJJJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m??????????,??@??????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQ6IA=2:?0C625Q ,4=2DDlQE6IEQ ,:5lQ6IA=2:?0C625Qm")):Response.Write CJCCJJ(CCJJJJJ("6IA=2:?0C625")):Response.Write(CCJJJJJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m??????,k3Cm") & vbCrLf):Response.Write(CCJJJJJ(" ,??????????????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQ6IA=2:?0C6DF=EQ ,4=2DDlQE6IEQ ,:5lQ6IA=2:?0C6DF=EQm")):Response.Write CJCCJJ(CCJJJJJ("6IA=2:?0C6DF=E")):Response.Write(CCJJJJJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m??????,k3Cm") & vbCrLf):Response.Write(CCJJJJJ(" ,????????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQE@@=:?EC@Q ,4=2DDlQE6IEQ ,:5lQE@@=:?EC@Qm")):Response.Write CJCCJJ(CCJJJJJ("E@@=:?EC@")):Response.Write(CCJJJJJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ2?DH6CQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ2?DH6CQ ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("2?DH6C")):Response.Write(CCJJJJJ("Q ,D:K6lQg_Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,????????,????????????,??????????,????????????????????,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ724E@C`Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ724E@C`Q ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("724E@C`")):Response.Write(CCJJJJJ("Q ,D:K6lQg_Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,????????????,??????????????????????????,????????????????,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ724E@CaQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ724E@CaQ ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("724E@Ca")):Response.Write(CCJJJJJ("Q ,D:K6lQg_Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,????????????,????????????????????????????????????,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ2CE:4=6Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ2CE:4=6Q ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("2CE:4=6")):Response.Write(CCJJJJJ("Q ,D:K6lQg_Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,??????????????????xs??????,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????????~!%????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk=236=m") & vbCrLf):Response.Write(CCJJJJJ(" ,k:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQ@AEQ ,:5lQ@AEQ ,G2=F6lQ`Q ,")):Response.Write IIf(CJCCJJ(CCJJJJJ("@AE")),CCJJJJJ("4964<65lV4964<65V"),"") Response.Write(CCJJJJJ("m") & vbCrLf):Response.Write(CCJJJJJ(" ,????????k^=236=mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m~!%????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ@AE0>@?6JQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ@AE0>@?6JQ ,D:K6lQdQ ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("@AE0>@?6J")):Response.Write(CCJJJJJ("Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,??,??????,????,??????????????_??,??????????,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m??????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ492CEQ ,EJA6lQ?F>36CQ ,D:K6lQdQ ,G2=F6lQ")):Response.Write CJCCJJ(CCJJJJJ("492CE")):Response.Write(CCJJJJJ("Q ,C6BF:C65m") & vbCrLf):Response.Write(CCJJJJJ(" ,??,_??????????,`????????????,a????????????,????????????????????,k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk=236=m") & vbCrLf):Response.Write(CCJJJJJ(" ,k:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQ2G2:=23=6Q ,:5lQ2G2:=23=6Q ,G2=F6lQ`Q ,")):Response.Write IIf(CJCCJJ(CCJJJJJ("2G2:=23=6")),CCJJJJJ("4964<65lV4964<65V"),"") Response.Write(CCJJJJJ("m") & vbCrLf):Response.Write(CCJJJJJ(" ,????????????????,??????????????????k^=236=mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCJJJJJ(" ,k5:G ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CCJJJJJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,4=2DDlQ3FEE@?Q ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,k:?AFE ,EJA6lQC6D6EQ ,4=2DDlQ3FEE@?Q ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CCJJJJJ("k^7@C>m") & vbCrLf):Response.Write(CCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]G2=:52E6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^2FE@D:K6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]KII3@I];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("kD4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CCJJJJJ(" ,2FE@D:K6WSWVE6IE2C62VXX") & vbCrLf):Response.Write(CCJJJJJ(" ,SWV:?AFEi3FEE@?,G2=F6lQ?? ,??Q.VX]@?WV4=:4<V[7F?4E:@?W6XLG2C ,A:4lSWE9:DX]AC6GWV:?AFEiE6IEVX]G2=WXj:7WA:4lllVVXL2=6CEWV????????,??????????????????????????,VXjSWE9:DX]AC6GWV:?AFEiE6IEVX]7@4FDWXN6=D6LS]KII3@IWVk:>8 ,DC4lQVZA:4ZVQ ,^mV[L32Ci72=D6[384=@D6iECF6NXNNX") & vbCrLf):Response.Write(CCJJJJJ(" ,SWVR7@C>`VX]G2=:52E6WL") & vbCrLf):Response.Write(CCJJJJJ(" ,CF=6DiL") & vbCrLf):Response.Write(CCJJJJJ(" ,?2>606?iLC6BF:C65iECF6N[") & vbCrLf):Response.Write(CCJJJJJ(" ,E:>60>:?iLC6BF:C65iECF6[5:8:EDiECF6N[") & vbCrLf):Response.Write(CCJJJJJ(" ,E:>60>2IiLC6BF:C65iECF6[5:8:EDiECF6N[") & vbCrLf):Response.Write(CCJJJJJ(" ,2860>:?iLC6BF:C65iECF6[C2?86i,_[`__.N[") & vbCrLf):Response.Write(CCJJJJJ(" ,2860>2IiLC6BF:C65iECF6[C2?86i,_[`__.N[") & vbCrLf):Response.Write(CCJJJJJ(" ,>@?6JiLC6BF:C65iECF6[5:8:EDiECF6N[") & vbCrLf):Response.Write(CCJJJJJ(" ,B4@F?EiLC6BF:C65iECF6[5:8:EDiECF6N[") & vbCrLf):Response.Write(CCJJJJJ(" ,E6DE4@F?EiLC6BF:C65iECF6[5:8:EDiECF6N[") & vbCrLf):Response.Write(CCJJJJJ(" ,@AE0>@?6JiLC6BF:C65iECF6[5:8:EDiECF6N") & vbCrLf):Response.Write(CCJJJJJ(" ,N") & vbCrLf):Response.Write(CCJJJJJ(" ,NX") & vbCrLf):Response.Write(CCJJJJJ("NX") & vbCrLf):Response.Write(CCJJJJJ("k^D4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("k^3@5Jm") & vbCrLf):Response.Write(CCJJJJJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJCJCCC=nothing:set CJCCJJJ=nothing:set CJCCJJC=nothing:set CJCCJCJ=nothing:CJCCJC.Close:Set CJCCJC=Nothing:CJCCJJ.Close:Set CJCCJJ=Nothing:CJCJCJ.Close:Set CJCJCJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CCJJJJJ(ByVal CJCCCCC) Dim CJCJJJC, CJJJJCJ, CJJCCCJ CJCCCCC = Replace(CJCCCCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJJJJCJ = 1 To Len(CJCCCCC) If CJJJJCJ <> CJJCCCJ Then CJCJJJC = AscW(Mid(CJCCCCC, CJJJJCJ, 1)) If CJCJJJC >= 33 And CJCJJJC <= 79 Then CCJJJJJ = CCJJJJJ & Chr(CJCJJJC + 47) ElseIf CJCJJJC >= 80 And CJCJJJC <= 126 Then CCJJJJJ = CCJJJJJ & Chr(CJCJJJC - 47) Else CJJCCCJ = CJJJJCJ + 1 If Mid(CJCCCCC, CJJCCCJ, 1) = Chr(64) Then CCJJJJJ = CCJJJJJ & ChrW(CJCJJJC + 5) Else CCJJJJJ = CCJJJJJ & Mid(CJCCCCC, CJJJJCJ, 1) End If End If Next End Function %>
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de