Edit D:\xinhaisoft\crisis_new\school\admin\interview_view.asp
??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CJJJJC, CJJJCJ,CJJJCC, CJJCJJ, CJJCJC:Set CJJJJC = server.CreateObject(CJCCJCJ("ps~sq]r@??64E:@?")):CJJJJC.open Application(CJCCJCJ("r@??64E:@?$EC:?8")):Set CJJJCJ=CJJJJC:::Function IIf(CJCCJCC, CJCCCJJ, CJCCCJC):if isnull(CJCCJCC) or isempty(CJCCJCC) then IIf = CJCCCJC elseif CJCCJCC Then IIf = CJCCCJJ Else IIf = CJCCCJC end if:End Function:Const CJJCCCJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CJCCCCJ,CJCCCCC):dim CJJCCJ:CJJCCJ=CJCCCCJ & "=" & CJCCCCC & CJCCJCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJCCJCJ("$6E\r@@<:6"),CJJCCJ):End Sub:::::::Function CJCJJJJ(CJJCCJC):if isnull(CJJCCJC) or trim(CJJCCJC)="" or not isnumeric(CJJCCJC) then CJCJJJJ=false else Dim CJJCCC:Set CJJCCC = New RegExp:CJJCCC.Pattern = CJCCJCJ("/-5ZS"):CJJCCC.IgnoreCase = True:CJCJJJJ = CJJCCC.test(CJJCCJC):set CJJCCC=nothing end if:End Function:::::Sub ConnClose():On Error Resume Next:set CJCJJJC=nothing:set CJCJJCJ=nothing:set CJCJJCC=nothing:set CJCJCJJ=nothing:CJJJCCJ.close : set CJJJCCJ=nothing:CJJCJJ.Close : Set CJJCJJ=Nothing:CJJJCC.Close : Set CJJJCC=Nothing:CJCJCJC.Close : Set CJCJCJC = Nothing:CJJJJC.Close : Set CJJJJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCJJJJJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJCCJCJ("!$*0|6DD286"),server.URLEncode(CCJJJJJ)):Response.Redirect CJCCJCJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::Function CJCJCCJ(ByVal CJCJCCC,style):if not isdate(CJCJCCC) then CJCJCCJ=CJCJCCC:exit function end if:dim CJCJJJ,CJCJJC,CJCJCJ,CJCJCC:CJCJCCC=cdate(CJCJCCC):CJCJJJ=Year(CJCJCCC):CJCJJC=Month(CJCJCCC):CJCJCJ=Day(CJCJCCC):select case style:case 0:CJCJCCJ=CJCJJJ & CJCCJCJ("\") & right(0 & CJCJJC,2) & CJCCJCJ("\") & right(0 & CJCJCJ,2):case 1:CJCJCCJ=CJCJJJ & right(0 & CJCJJC,2) & right(0 & CJCJCJ,2):case 2:CJCJCCJ=right(CJCJJJ,2) & CJCCJCJ("\") & right(0 & CJCJJC,2) & CJCCJCJ("\") & right(0 & CJCJCJ,2):case 3:CJCJCCJ=CJCJJJ & CJCCJCJ("\") & right(0 & CJCJJC,2):case 4:CJCJCCJ=right(0 & CJCJJC,2) & CJCCJCJ("\") & right(0 & CJCJCJ,2):case 5:CJCJCCJ=right(0 & CJCJCJ,2):case 6:CJCJCCJ=CJCJJJ & CJCCJCJ("??") & right(0 & CJCJJC,2) & CJCCJCJ("??") & right(0 & CJCJCJ,2) & CJCCJCJ("??"):case else CJCJCCJ=CJCJCCC:end select:End Function::::::function CJCCJJJ(CCJJJJC,CJJCJCJ):dim CJCCJJ,CJCCJC:if isArray(CCJJJJC) then CJCCJJ=CCJJJJC else CJCCJJ=split(CCJJJJC & "",CJCCJCJ("M")) for CJCCJC=0 to ubound(CJCCJJ)-1 step 2:if CJCCJJ(CJCCJC)=cstr(CJJCJCJ) then CJCCJJJ=server.htmlencode(CJCCJJ(CJCCJC+1)):exit for end if:next:end function::::::::::::::::Dim CJCCCJ,CJCCCC,CCJJJJ,CCJJJC,CCJJCJ,CCJJCC,CCJCJJ,CCJCJC,CCJCCJ:Dim CCJCCC,CCCJJJ,CCCJJC,CCCJCJ,CCCJCC,CCCCJJ:Dim CCCCJC,CCCCCJ,CCCCCC:Dim CJJJJJJ:CJJJJJJ=Trim(Request.Cookies(CJCCJCJ("!$*|t|qt#"))):if CJJJJJJ="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CJCCCJ>0 then CJJCJC=CJCCJCJ("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") & CJCCCC & CJCCJCJ("V ,2?5 ,:5l") & CJCCCJ set CJJJCC=CJJJJC.execute(CJJCJC):If CJJJCC.EOF Then Call ClearMemberCookie Else CCJJJJ=CJJJCC(2) & "":CCJJJC=CJJJCC(3):CCJJCJ=CJJJCC(5):CCJJCC=CJJJCC(6):CCJCJJ=CJJJCC(9):CCJCJC=CJJJCC(15):CCJCCC=CJJJCC(0):CCCCCJ=CJJJCC(1):CCCCJC=CJJJCC(11) & "":CCCJJJ=CJJJCC(10) & "":CCJCCJ=CJJJCC(12):CCCJJC=CJJJCC(14):CCCJCJ=CJJJCC(13):CCCJCC=CJJJCC(7) & "":CCCCJJ=CJJJCC(4):CCCCCC=CJJJCC(8):if isnull(CCJCJC) then CCJCJC=0 if isnull(CCJCJJ) or CCJCJJ=0 then CCJCJJ=CCJJJC if isnull(CCCCJJ) then CCCCJJ=0 if isnull(CCJJCJ) then CCJJCJ=0 if instr(CJCCJCJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CJCCCC)>0 then Call RedirectMessage(CJCCJCJ("????????,????????????????????????????????,")) Call SetMemberCookie(CJCCCJ,CJCCCC) End IF end if:::Sub CheckLogined():if CJCCCJ=0 then Call ClearMemberCookie:Call ConnClose:dim CJJJJJC:CJJJJJC=trim(request.QueryString(CJCCJCJ("D49@@="))):if isnumeric(CJJJJJC) then response.Redirect CJCCJCJ("^>^G2?E^R^D49@@=^") & CJJJJJC & CJCCJCJ("^DEF56?E^=@8:?nC65:C64El") & url else Call RedirectMessage(CJCCJCJ("??????????????,????????????,")) end if end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CJCCJCJ("!$*|t|qt#"))="":CJCCCJ=0:CCJJCC=0:CJCCCC=Empty:CCJJCJ=0:CCJCJC=0:CCJCJJ=0:CCJJJC=0:CCJCCC=False:CCCCCJ=False:CCCCCC=Empty:End Sub:Sub CheckMemberCookie():dim CJJCCJ,CJJJJCJ,CJCCJC,CJJJJCC,CJJJCJJ:CJJCCJ=split(CJJJJJJ,CJCCJCJ("]")):if ubound(CJJCCJ)<>2 then Call ClearMemberCookie elseif not isnumeric(CJJCCJ(0)) or len(CJJCCJ(1))<>32 or len(CJJCCJ(2))<>32 then Call ClearMemberCookie else CJJJJCJ=CJJCCJ(1):for CJCCJC=1 to len(CJJJJCJ):CJJJJCC=mid(CJJJJCJ,CJCCJC,1):if isnumeric(CJJJJCC) then CJJJCJJ=CJJJCJJ & CJJJJCC if len(CJJJCJJ)=7 then exit for next:CJJJJCJ=CJJCCJ(2):if CJJJCJJ<>mid(CJJJJCJ,6,7) then Call ClearMemberCookie else CJJJJCC=mid(CJJJJCJ,18,10)/2:if CJJJJCC<DateDiff(CJCCJCJ("D"), CJCCJCJ("`hf_\`\` ,gi__i__"), Now)-28800 then Call ClearMemberCookie else CJCCCJ=Clng(CJJCCJ(0)):CJCCCC=CJJCCJ(1) end if end if end if:End Sub:Sub SetMemberCookie(CJJCJCJ,CCJJJCJ):dim CJCCJC,CJJJJCC,CJJJCJJ:for CJCCJC=1 to len(CCJJJCJ):CJJJJCC=mid(CCJJJCJ,CJCCJC,1):if isnumeric(CJJJJCC) then CJJJCJJ=CJJJCJJ & CJJJJCC if len(CJJJCJJ)=7 then exit for next:CJJJCJJ=CJJCJCJ & CJCCJCJ("]") & CCJJJCJ & CJCCJCJ("]") & Fix(10000*(Rnd+1)) & CJJJCJJ & Fix(10000*(Rnd+1)) & DateDiff(CJCCJCJ("D"), CJCCJCJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJCCJCJ("!$*|t|qt#"))=CJJJCJJ:End Sub::dim CJJJJJC:CJJCJC=Request.ServerVariables(CJCCJCJ("!p%w0x}u~")):if instr(CJJCJC,CJCCJCJ("^D49@@=^25>:?^"))>0 then Call CheckLogined:if not CCJCCC and not CCCCCJ then Call RedirectMessage(CJCCJCJ("????????,????????????????????????,")) CJJJJJC=CCJCJJ elseif instr(CJJCJC,CJCCJCJ("^>^D49@@=^DEF56?E^"))>0 or instr(CJJCJC,CJCCJCJ("^DEF56?E^"))>0 then Call CheckLogined:CJJJJJC=CCJCJJ elseif instr(CJJCJC,CJCCJCJ("^D49@@="))>0 then CJJJJJC=Request.QueryString(CJCCJCJ("D49@@=")):if not CJCJJJJ(CJJJJJC) then CJJJJJC=Request.QueryString(CJCCJCJ("F")) if not CJCJJJJ(CJJJJJC) then CJJJJJC=Request.QueryString(CJCCJCJ("D4")) if not CJCJJJJ(CJJJJJC) then Call RedirectMessage(CJCCJCJ("????????W$49@@=X??@??????????,")) CJJJJJC=csng(CJJJJJC) end if:if CJJJJJC=0 then Call RedirectMessage(CJCCJCJ("????????W$49@@=X????W_X??,")) Dim CJJJCJC:Call SetConfig:Sub SetConfig():dim CJCCJJ,CJJJCCJ:CJJCJC=CJCCJCJ("D6=64E ,E@A ,` ,;:2@H6:[EJA6[4FDE@>8C@FA[D:5632C0@E96C[E6DEC6DF=EG:6H[D>D0C646:G6C[766[C6E6DE52J[6IA:C652E6[E:E=6[K:IF?04=@D6052E6[JFJF60D>D0EA=[A:4EFC6[D>D[75D[D6>6DE6C0DE2CE052E6[K:IF?0E:>6D09:89=:89E[D2?5E23=6[4C:D:D[JJ52E6[6IA6CE[72>:=J[4C:D:D=3[4C:D:D@=5[vC@FAvF:52?46[q:@u665324<[<6JDEC[=@8@[K:46[:D?6H[JFJF60E6DE0=3[K:IF?0E:>6D0=:>:E[D>D0D:8?[DEF56?E0BF6DE:@?04@F?E[K:IF?E:>6[:?EC@[4@AJC:89E[4@?E24E[9@>6A286E@AA:4EFC6[>@5:?7@[9@>6=@8:?[K:IF?0?6657665324<[4@>A=6E60:?7@[E6DE:?EC@[8F6DE3@@<[9:560=30@FE@7286[JFJF602CC2?86[JFJF60367@C60E:>6[JFJF60E6DE052JD[JFJF60H66<0=:>:E[JFJF604964<65[K:IF?0?6657665324<0?6IE[4964<?6HDEF56?E[BB ,7C@> ,D49@@= ,H:E9 ,W?@=@4<X ,H96C6 ,:5l") & CJJJJJC:set CJJJCCJ=CJJJJC.execute(CJJCJC):if CJJJCCJ.eof then Call RedirectMessage(CJCCJCJ("??W") & CJCCCJ & CJCCJCJ("X??????????W") & CJJJJJC & CJCCJCJ("X????????,")) ReDim CJCCJJ(61):CJCCJJ(0)=CJJJCCJ(CJCCJCJ(";:2@H6:")) & "":CJCCJJ(1)=CJJJCCJ(CJCCJCJ("EJA6")):CJCCJJ(2)=CJJJCCJ(CJCCJCJ("D>D")):CJCCJJ(3)=CJJJCCJ(CJCCJCJ("4FDE@>8C@FA")) & "":CJCCJJ(4)=CJJJCCJ(CJCCJCJ("D:5632C0@E96C")) & "":CJCCJJ(5)=IIf(isnull(CJJJCCJ(CJCCJCJ("E6DEC6DF=EG:6H"))),0,CJJJCCJ(CJCCJCJ("E6DEC6DF=EG:6H"))):CJCCJJ(6)=CJJJCCJ(CJCCJCJ("K:IF?E:>6")):CJCCJJ(7)=CJJJCCJ(CJCCJCJ("766")):CJCCJJ(8)=CJJJCCJ(CJCCJCJ("C6E6DE52J")):CJCCJJ(9)=CJJJCCJ(CJCCJCJ("6IA:C652E6")):CJCCJJ(10)=CJJJCCJ(CJCCJCJ("E:E=6")):CJCCJJ(11)=CJJJCCJ(CJCCJCJ(":?EC@")) & "":CJCCJJ(12)=CJJJCCJ(CJCCJCJ("A:4EFC6")) & "":CJCCJJ(13)=CJJJCCJ(CJCCJCJ("72>:=J")):CJCCJJ(14)=CJJJCCJ(CJCCJCJ("4@AJC:89E")) & "":CJCCJJ(15)=IIf(isnull(CJJJCCJ(CJCCJCJ("D6>6DE6C0DE2CE052E6"))),CJCCJCJ("`h__\`\`"),CJJJCCJ(CJCCJCJ("D6>6DE6C0DE2CE052E6"))):CJCCJJ(16)=IIf(isnull(CJJJCCJ(CJCCJCJ("K:IF?0E:>6D09:89=:89E"))),0,CJJJCCJ(CJCCJCJ("K:IF?0E:>6D09:89=:89E"))):CJCCJJ(17)=CJJJCCJ(CJCCJCJ("4@?E24E")) & "":CJCCJJ(18)=CJJJCCJ(CJCCJCJ("D2?5E23=6")):CJCCJJ(19)=CJJJCCJ(CJCCJCJ("4C:D:D")):CJCCJJ(20)=CJJJCCJ(CJCCJCJ("JJ52E6")):CJCCJJ(21)=CJJJCCJ(CJCCJCJ("BB")):CJCCJJ(22)=CJJJCCJ(CJCCJCJ("JFJF60D>D0EA=")) & "":CJCCJJ(23)=CJJJCCJ(CJCCJCJ("JFJF60E6DE0=3")) & "":CJCCJJ(25)=CJJJCCJ(CJCCJCJ("6IA6CE")):CJCCJJ(26)=CJJJCCJ(CJCCJCJ(">@5:?7@")):CJCCJJ(27)=CJJJCCJ(CJCCJCJ("9@>6A286E@AA:4EFC6")) & "":CJCCJJ(28)=CJJJCCJ(CJCCJCJ("4C:D:D=3")):CJCCJJ(29)=IIf(CJJJCCJ(CJCCJCJ("4C:D:D@=5")),False,True):CJCCJJ(30)=CJJJCCJ(CJCCJCJ("8C@FA8F:52?46")):CJCCJJ(31)=CJJJCCJ(CJCCJCJ("3:@7665324<")):CJCCJJ(32)=CJJJCCJ(CJCCJCJ("<6JDEC")):CJCCJJ(33)=CJJJCCJ(CJCCJCJ("=@8@")) & "":CJCCJJ(34)=CJJJCCJ(CJCCJCJ("K:46")):CJCCJJ(35)=IIf(CJJJCCJ(CJCCJCJ(":D?6H")),True,False):CJCCJJ(36)=121:CJCCJJ(37)=111:CJCCJJ(38)=160:CJCCJJ(39)=CJJJCCJ(CJCCJCJ("8F6DE3@@<")):CJCCJJ(40)=CJJJCCJ(CJCCJCJ("75D")):CJCCJJ(42)=CJJJCCJ(CJCCJCJ("9@>6=@8:?")):CJCCJJ(43)=CJJJCCJ(CJCCJCJ("K:IF?0?6657665324<")):CJCCJJ(44)=CJJJCCJ(CJCCJCJ("K:IF?0E:>6D0=:>:E")):CJCCJJ(45)=CJJJCCJ(CJCCJCJ("4@>A=6E60:?7@")):CJCCJJ(46)=CJJJCCJ(CJCCJCJ("E6DE:?EC@")) & "":CJCCJJ(47)=IIf(isnull(CJJJCCJ(CJCCJCJ("JFJF60367@C60E:>6"))),0,CJJJCCJ(CJCCJCJ("JFJF60367@C60E:>6"))):CJCCJJ(49)=CJJJCCJ(CJCCJCJ("D>D0C646:G6C")):CJCCJJ(50)=CJJJCCJ(CJCCJCJ("D>D0D:8?")) & "":CJCCJJ(52)=CJJJCCJ(CJCCJCJ("JFJF602CC2?86")):CJCCJJ(53)=IIf(isnull(CJJJCCJ(CJCCJCJ("DEF56?E0BF6DE:@?04@F?E"))),0,CJJJCCJ(CJCCJCJ("DEF56?E0BF6DE:@?04@F?E"))):CJCCJJ(54)=CJJJCCJ(CJCCJCJ("9:560=30@FE@7286")):CJCCJJ(55)=CJJJCCJ(CJCCJCJ("JFJF60E6DE052JD")):CJCCJJ(56)=CJJJCCJ(CJCCJCJ("JFJF60H66<0=:>:E")):CJCCJJ(57)=CJJJCCJ(CJCCJCJ("JFJF604964<65")):CJCCJJ(58)=CJJJCCJ(CJCCJCJ("K:IF?0?6657665324<0?6IE")):CJCCJJ(59)=CJJJCCJ(CJCCJCJ("4964<?6HDEF56?E")):CJCCJJ(60)=CJJJCCJ(CJCCJCJ("K:IF?04=@D6052E6")):CJJJCCJ.close : set CJJJCCJ=nothing:if isNull(CJCCJJ(8)) or CJCCJJ(8)="" then CJCCJJ(8)=0 if isdate(CJCCJJ(9)) then CJCCJJ(9)=cdate(CJCCJJ(9)):if CJCCJJ(9)<Date then Call RedirectMessage(CJCCJCJ("????????,????????????????W") & CJCCJJ(9) & CJCCJCJ("X??????,")) end if:if not CJCJJJJ(CJCCJJ(20)) then CJCCJJ(20)=7 select case CJCCJJ(1):case 1,2,16:CJCCJJ(36)=159:case 4,5,6,10,11:CJCCJJ(36)=190:CJCCJJ(37)=178:CJCCJJ(38)=191:case 7,13:CJCCJJ(36)=164:CJCCJJ(37)=178:CJCCJJ(38)=179:end select:CJJJCJC=CJCCJJ:End Sub:Function CJCJCJJ(CCJJJCC):dim CJCCJJ(7,1),CJCCJC,CJJJCCC,CJJCJJJ:CJJJCCC=Array(CJCCJCJ("$49@@="),CJCCJCJ("$EF56?E"),CJCCJCJ("s6AE"),CJCCJCJ("vC256"),CJCCJCJ("r=2DD>2E6"),CJCCJCJ("}F>36C"),CJCCJCJ("%62496C"),CJCCJCJ("!2C6?E")):select case CJJJCJC(1):case 1,2 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????")):case 3,16 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????")):case 4 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("??????@"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????")):case 5 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????")):case 6 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("??????@"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("??????"),CJCCJCJ("????")):case 7 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("??????"),CJCCJCJ("????")):case 8 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("??????@"),CJCCJCJ("????"),CJCCJCJ("????????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("??????"),CJCCJCJ("????")):case 9 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("??????"),CJCCJCJ("????")):case 10 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("??????"),CJCCJCJ("????")):case 11 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("??????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("??????"),CJCCJCJ("????")):case 12 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("??????"),CJCCJCJ("????")):case 13 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????")):case 14 : CJJCJJJ=Array(CJCCJCJ("??????"),CJCCJCJ("??@??"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("??????"),CJCCJCJ("????")):case 15 : CJJCJJJ=Array(CJCCJCJ("????"),CJCCJCJ("????????"),CJCCJCJ("????"),CJCCJCJ("????????"),CJCCJCJ("????"),CJCCJCJ("????"),CJCCJCJ("??????"),CJCCJCJ("????")):case else : CJJCJJJ=CJJJCCC end select:for CJCCJC=0 to Ubound(CJCCJJ):CJCCJJ(CJCCJC,0)=CJJJCCC(CJCCJC):CJCCJJ(CJCCJC,1)=CJJCJJJ(CJCCJC):next:for CJCCJC=0 to Ubound(CJCCJJ):if CJCCJJ(CJCCJC,0)=CCJJJCC then CJCJCJJ=CJCCJJ(CJCCJC,1):exit for end if:next:End Function::if CJJJCJC(7)<3 then Call RedirectMessage(CJCCJCJ("????????,??????????????????????,")) dim CJJCJJC:CJJCJJC=Request.QueryString(CJCCJCJ(":5=:DE")):if CJJCJJC="" then Call RedirectMessage(CJCCJCJ("????????,??????????????,")) Response.Write(vbCrLf):Response.Write(CJCCJCJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJCCJCJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJCCJCJ("k9625m") & vbCrLf):Response.Write(CJCCJCJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCCJCJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJCCJCJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJCCJCJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJCCJCJ("kE:E=6m??????????k^E:E=6m") & vbCrLf):Response.Write(CJCCJCJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CJCCJCJ("kDEJ=6m") & vbCrLf):Response.Write(CJCCJCJ("E23=6 ,L ,3@C56C\4@==2AD6i ,4@==2AD6j ,3@C56Ci ,aAI ,D@=:5 ,R___j ,N") & vbCrLf):Response.Write(CJCCJCJ("E23=6 ,E5 ,L ,3@C56Ci ,`AI ,D@=:5 ,R___j ,7@?E\D:K6i ,`cAIj ,N") & vbCrLf):Response.Write(CJCCJCJ("9` ,L ,7@?E\D:K6i ,`gAIj ,7@?E\H6:89Ei ,3@=5j ,E6IE\2=:8?i ,46?E6Cj ,>2C8:?\3@EE@>i ,a_AIj ,N") & vbCrLf):Response.Write(CJCCJCJ("k^DEJ=6m") & vbCrLf):Response.Write(CJCCJCJ("kDEJ=6 ,>65:2lQAC:?EQm") & vbCrLf):Response.Write(CJCCJCJ("RAC:?E ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CJCCJCJ("k^DEJ=6m") & vbCrLf):Response.Write(CJCCJCJ("k^9625m") & vbCrLf):Response.Write(CJCCJCJ("k3@5Jm") & vbCrLf):Response.Write(CJCCJCJ("k5:G ,2=:8?lQ46?E6CQ ,:5lQAC:?EQm") & vbCrLf):Response.Write(CJCCJCJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQ;2G2D4C:AEiD6=7]AC:?EWXQm?? ,??k^2m") & vbCrLf):Response.Write(CJCCJCJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,G2=F6lQ????(@C5Q ,:5lQ3E?\H@C5Qm") & vbCrLf):Response.Write(CJCCJCJ("k^5:Gm") & vbCrLf):Response.Write(CJCCJCJ("k2CE:4=6m") & vbCrLf):Response.Write(CJCCJCJ(" ,k9`m")):Response.Write CJJJCJC(10)::Response.Write CJCJCJJ(CJCCJCJ("$EF56?E")):Response.Write(CJCCJCJ("??????????????????k^9`m") & vbCrLf):Response.Write(CJCCJCJ(" ,")):dim CJCCJC,CJJCJCJ,CJJJJCC,CJJCJCC:CJJCJJC=split(CJJCJJC,CJCCJCJ("[")):for CJCCJC=0 to ubound(CJJCJJC):CJJCJCJ=CJJCJJC(CJCCJC):if CJCJJJJ(CJJCJCJ) then set CJJCJJ=CJJJJC.execute(CJCCJCJ("D6=64E ,E@A ,` ,Y ,7C@> ,G0:?E6CG:6H ,H96C6 ,:5l") & CJJCJCJ):if not CJJCJJ.eof then set CJJJCC=CJJJJC.execute(CJCCJCJ("D6=64E ,E@A ,` ,Y ,7C@> ,G0>6>36C ,H96C6 ,:5l") & CJJCJJ(CJCCJCJ(">6>36C"))):Response.Write(vbCrLf):Response.Write(CJCCJCJ(" ,kE23=6 ,H:5E9lQf__Q ,2=:8?lQ46?E6CQ ,46==A255:?8lQcQm") & vbCrLf):Response.Write(CJCCJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5m??????,")):Response.Write CJJJCC(CJCCJCJ("C62=?2>6")):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5m??????,")):Response.Write CJJJCC(CJCCJCJ("D6I?2>6")):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5m??????,")):Response.Write CJJJCC(CJCCJCJ("286")):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5m")):Response.Write CJCJCJJ(CJCCJCJ("}F>36C")):Response.Write(CJCCJCJ("??,")):Response.Write CJJJCC(CJCCJCJ("?F>36C")):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5 ,4@=DA2?lQaQm??????@??????,")):Response.Write CJJJCC(CJCCJCJ("255C6DD")):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5m??????????,")):Response.Write CJJJCC(CJCCJCJ("A9@?6")):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5m??????,")):Response.Write CJJJCC(CJCCJCJ(">@3:=6")):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCJ(" ,")):CJJJJCC=1:CJJCJCC=CJJJCC(CJCCJCJ("2?DH6C")):set CJJJCC=CJJJJC.execute(CJCCJCJ("D6=64E ,:5[BF6DE:@? ,7C@> ,>6>36C0BF6DE:@? ,H96C6 ,D49@@=l") & IIf(CJJJCJC(53)=0,0,CJJJJJC) & CJCCJCJ(" ,@C56C ,3J ,D@CE")):while not CJJJCC.eof:Response.Write(vbCrLf):Response.Write(CJCCJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5 ,4@=DA2?lQaQ ,4=2DDlQE6IE\=67EQm")):Response.Write CJJJJCC:Response.Write(CJCCJCJ("??,")):Response.Write CJJJCC(1):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5 ,4@=DA2?lQaQm")):Response.Write CJCCJJJ(CJJCJCC,CJJJCC(0)):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCJ(" ,")):CJJJCC.movenext:CJJJJCC=CJJJJCC+1:wend:Response.Write(vbCrLf):Response.Write(CJCCJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5 ,4@=DA2?lQcQ ,4=2DDlQE6IE\=67EQm") & vbCrLf):Response.Write(CJCCJCJ(" ,????????????????????????@????????????????,k3Cm") & vbCrLf):Response.Write(CJCCJCJ(" ,")):Response.Write replace(CJJCJJ(CJCCJCJ("BF6DE:@?")) & "",vbcrlf,CJCCJCJ("k3Cm")):Response.Write(vbCrLf):Response.Write(CJCCJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5 ,4@=DA2?lQcQ ,4=2DDlQE6IE\=67EQm") & vbCrLf):Response.Write(CJCCJCJ(" ,??????@????????????????,k3Cm") & vbCrLf):Response.Write(CJCCJCJ(" ,")):Response.Write replace(CJJCJJ(CJCCJCJ("2?DH6C")) & "",vbcrlf,CJCCJCJ("k3Cm")):Response.Write(vbCrLf):Response.Write(CJCCJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5 ,4@=DA2?lQaQ ,C@HDA2?lQaQ ,G2=:8?lQE@AQm??????,")):Response.Write CJJCJJ(CJCCJCJ("EJA6")):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5 ,4@=DA2?lQaQ ,G2=:8?lQE@AQm??????,")):Response.Write CJJCJJ(CJCCJCJ("25G:46")):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJCJ(" ,kE5 ,4@=DA2?lQaQ ,G2=:8?lQE@AQm????????,")):Response.Write CJJCJJ(CJCCJCJ("4@?DF=E2?E?2>6")):Response.Write(CJCCJCJ(" ,??????,")):Response.Write CJCJCCJ(CJJCJJ(CJCCJCJ("52E6E:>6")),0):Response.Write(CJCCJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCCJCJ(" ,k3Cm") & vbCrLf):Response.Write(CJCCJCJ(" ,")) end if end if:next:Response.Write(vbCrLf):Response.Write(CJCCJCJ("k^2CE:=6m") & vbCrLf):Response.Write(CJCCJCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]9E>=a5@4I];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCJ("kD4C:AEm") & vbCrLf):Response.Write(CJCCJCJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCJCJ(" ,SWVR3E?\H@C5VX]@?WV4=:4<V[7F?4E:@?WXLSWV2CE:4=6VX]9E>=a5@4IWXNX") & vbCrLf):Response.Write(CJCCJCJ("NX") & vbCrLf):Response.Write(CJCCJCJ("k^D4C:AEm") & vbCrLf):Response.Write(CJCCJCJ("k^3@5Jm") & vbCrLf):Response.Write(CJCCJCJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJCJJJC=nothing:set CJCJJCJ=nothing:set CJCJJCC=nothing:set CJCJCJJ=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 CJCCJCJ(ByVal CJCCJJC) Dim CJJCCJJ, CJCCJC, CJJCCJC CJCCJJC = Replace(CJCCJJC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJCCJC = 1 To Len(CJCCJJC) If CJCCJC <> CJJCCJC Then CJJCCJJ = AscW(Mid(CJCCJJC, CJCCJC, 1)) If CJJCCJJ >= 33 And CJJCCJJ <= 79 Then CJCCJCJ = CJCCJCJ & Chr(CJJCCJJ + 47) ElseIf CJJCCJJ >= 80 And CJJCCJJ <= 126 Then CJCCJCJ = CJCCJCJ & Chr(CJJCCJJ - 47) Else CJJCCJC = CJCCJC + 1 If Mid(CJCCJJC, CJJCCJC, 1) = Chr(64) Then CJCCJCJ = CJCCJCJ & ChrW(CJJCCJJ + 5) Else CJCCJCJ = CJCCJCJ & Mid(CJCCJJC, CJCCJC, 1) End If End If Next End Function %>
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de