Edit D:\xinhaisoft\crisis_new\school\admin\interview_time.asp
??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCJCJJ, CCJCJC,CCJCCJ, CCJCCC, CCCJJJ:Set CCJCJJ = server.CreateObject(CCJCCCJ("ps~sq]r@??64E:@?")):CCJCJJ.open Application(CCJCCCJ("r@??64E:@?$EC:?8")):Set CCJCJC=CCJCJJ::Function CCJJJCC(CCJCCCC):Dim str,CCCJCJ:str = Trim(CCJCCCC):If IsNull(str) Or str = "" Then CCJJJCC = "" else str=Replace(str, CCJCCCJ("V"), "") str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CCJCCCJ("k:7C2>6"), CCJCCCJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CCJCCCJ("kD4C:AE"), CCJCCCJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CCCJCJ=new RegExp:CCCJCJ.Pattern=CCJCCCJ("@?W,2\K.ZXl"):CCCJCJ.IgnoreCase = True:CCCJCJ.Global=True:str=CCCJCJ.Replace(str,CCJCCCJ("@?S`U6BF2=Dj")):set CCCJCJ=nothing:CCJJJCC=str End If:End Function:Function IIf(CCCJJJJ, CCCJJJC, CCCJJCJ):if isnull(CCCJJJJ) or isempty(CCCJJJJ) then IIf = CCCJJCJ elseif CCCJJJJ Then IIf = CCCJJJC Else IIf = CCCJJCJ end if:End Function:Const CCJJJJC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CCCJJCC,CCCJCJJ):dim CCCJCC:CCCJCC=CCCJJCC & "=" & CCCJCJJ & CCJCCCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CCJCCCJ("$6E\r@@<:6"),CCCJCC):End Sub:::::::Function CCJJCJC(CCJJJJJ):if isnull(CCJJJJJ) or trim(CCJJJJJ)="" or not isnumeric(CCJJJJJ) then CCJJCJC=false else Dim CCCJCJ:Set CCCJCJ = New RegExp:CCCJCJ.Pattern = CCJCCCJ("/-5ZS"):CCCJCJ.IgnoreCase = True:CCJJCJC = CCCJCJ.test(CCJJJJJ):set CCCJCJ=nothing end if:End Function:Function CCJJCCJ(CCCJCJC):dim CCCCJJ,CCCCJC:CCCCJJ=CCJCCCJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CCCJCJC & CCJCCCJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CCCCJC=CCJCJJ.execute(CCCCJJ):CCJJCCJ = CCCCJC(0):if isnull(CCJJCCJ) then CCJJCCJ=1 CCCCJC.close : set CCCCJC=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CCJJCCC=nothing:set CCJCJJJ=nothing:set CCJCJJC=nothing:set CCJCJCJ=nothing:CCCCJC.close : set CCCCJC=nothing:CCJCCC.Close : Set CCJCCC=Nothing:CCJCCJ.Close : Set CCJCCJ=Nothing:CCJCJCC.Close : Set CCJCJCC = Nothing:CCJCJJ.Close : Set CCJCJJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCCJCCJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CCJCCCJ("!$*0|6DD286"),server.URLEncode(CCCJCCJ)):Response.Redirect CCJCCCJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::::::::::::::::::::Dim CCCCCJ,CCCCCC,CJJJJJJ,CJJJJJC,CJJJJCJ,CJJJJCC,CJJJCJJ,CJJJCJC,CJJJCCJ:Dim CJJJCCC,CJJCJJJ,CJJCJJC,CJJCJCJ,CJJCJCC,CJJCCJJ:Dim CJJCCJC,CJJCCCJ,CJJCCCC:Dim CJCJJJJ:CJCJJJJ=Trim(Request.Cookies(CCJCCCJ("!$*|t|qt#"))):if CJCJJJJ="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CCCCCJ>0 then CCCJJJ=CCJCCCJ("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") & CCCCCC & CCJCCCJ("V ,2?5 ,:5l") & CCCCCJ set CCJCCJ=CCJCJJ.execute(CCCJJJ):If CCJCCJ.EOF Then Call ClearMemberCookie Else CJJJJJJ=CCJCCJ(2) & "":CJJJJJC=CCJCCJ(3):CJJJJCJ=CCJCCJ(5):CJJJJCC=CCJCCJ(6):CJJJCJJ=CCJCCJ(9):CJJJCJC=CCJCCJ(15):CJJJCCC=CCJCCJ(0):CJJCCCJ=CCJCCJ(1):CJJCCJC=CCJCCJ(11) & "":CJJCJJJ=CCJCCJ(10) & "":CJJJCCJ=CCJCCJ(12):CJJCJJC=CCJCCJ(14):CJJCJCJ=CCJCCJ(13):CJJCJCC=CCJCCJ(7) & "":CJJCCJJ=CCJCCJ(4):CJJCCCC=CCJCCJ(8):if isnull(CJJJCJC) then CJJJCJC=0 if isnull(CJJJCJJ) or CJJJCJJ=0 then CJJJCJJ=CJJJJJC if isnull(CJJCCJJ) then CJJCCJJ=0 if isnull(CJJJJCJ) then CJJJJCJ=0 if instr(CCJCCCJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CCCCCC)>0 then Call RedirectMessage(CCJCCCJ("????????,????????????????????????????????,")) Call SetMemberCookie(CCCCCJ,CCCCCC) End IF end if:Sub CheckRight(CCCJCCC):dim CJCJJJC,CJCJJCJ:if CCCCCJ=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CCJCCCJ("??????????????,????????????,")) elseIf not CCJCCJJ(CCCJCCC) then Call RedirectMessage(CCJCCCJ("????W") & CCCJCCC & CCJCCCJ("X????????,????????????????????,")) end if:End Sub:Function CCJCCJJ(CCCJCCC):dim CJCJJJC,CJCJJCJ:CJCJJCJ=split(CCCJCCC,CCJCCCJ("[")):CCJCCJJ=False:for CJCJJJC=0 to ubound(CJCJJCJ):If Mid(CJJJJJJ,CJCJJCJ(CJCJJJC),1)="1" then CCJCCJJ=True:exit function end if:next:End Function:Sub CheckLogined():if CCCCCJ=0 then Call ClearMemberCookie:Call ConnClose:dim CJCJJCC:CJCJJCC=trim(request.QueryString(CCJCCCJ("D49@@="))):if isnumeric(CJCJJCC) then response.Redirect CCJCCCJ("^>^G2?E^R^D49@@=^") & CJCJJCC & CCJCCCJ("^DEF56?E^=@8:?nC65:C64El") & url else Call RedirectMessage(CCJCCCJ("??????????????,????????????,")) end if end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CCJCCCJ("!$*|t|qt#"))="":CCCCCJ=0:CJJJJCC=0:CCCCCC=Empty:CJJJJCJ=0:CJJJCJC=0:CJJJCJJ=0:CJJJJJC=0:CJJJCCC=False:CJJCCCJ=False:CJJCCCC=Empty:End Sub:Sub CheckMemberCookie():dim CCCJCC,CJCJCJJ,CJCJJJC,CJCJCJC,CJCJCCJ:CCCJCC=split(CJCJJJJ,CCJCCCJ("]")):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 CJCJCJJ=CCCJCC(1):for CJCJJJC=1 to len(CJCJCJJ):CJCJCJC=mid(CJCJCJJ,CJCJJJC,1):if isnumeric(CJCJCJC) then CJCJCCJ=CJCJCCJ & CJCJCJC if len(CJCJCCJ)=7 then exit for next:CJCJCJJ=CCCJCC(2):if CJCJCCJ<>mid(CJCJCJJ,6,7) then Call ClearMemberCookie else CJCJCJC=mid(CJCJCJJ,18,10)/2:if CJCJCJC<DateDiff(CCJCCCJ("D"), CCJCCCJ("`hf_\`\` ,gi__i__"), Now)-28800 then Call ClearMemberCookie else CCCCCJ=Clng(CCCJCC(0)):CCCCCC=CCCJCC(1) end if end if end if:End Sub:Sub SetMemberCookie(CJCCJCC,CCCCJJJ):dim CJCJJJC,CJCJCJC,CJCJCCJ:for CJCJJJC=1 to len(CCCCJJJ):CJCJCJC=mid(CCCCJJJ,CJCJJJC,1):if isnumeric(CJCJCJC) then CJCJCCJ=CJCJCCJ & CJCJCJC if len(CJCJCCJ)=7 then exit for next:CJCJCCJ=CJCCJCC & CCJCCCJ("]") & CCCCJJJ & CCJCCCJ("]") & Fix(10000*(Rnd+1)) & CJCJCCJ & Fix(10000*(Rnd+1)) & DateDiff(CCJCCCJ("D"), CCJCCCJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CCJCCCJ("!$*|t|qt#"))=CJCJCCJ:End Sub::dim CJCJJCC:CCCJJJ=Request.ServerVariables(CCJCCCJ("!p%w0x}u~")):if instr(CCCJJJ,CCJCCCJ("^D49@@=^25>:?^"))>0 then Call CheckLogined:if not CJJJCCC and not CJJCCCJ then Call RedirectMessage(CCJCCCJ("????????,????????????????????????,")) CJCJJCC=CJJJCJJ elseif instr(CCCJJJ,CCJCCCJ("^>^D49@@=^DEF56?E^"))>0 or instr(CCCJJJ,CCJCCCJ("^DEF56?E^"))>0 then Call CheckLogined:CJCJJCC=CJJJCJJ elseif instr(CCCJJJ,CCJCCCJ("^D49@@="))>0 then CJCJJCC=Request.QueryString(CCJCCCJ("D49@@=")):if not CCJJCJC(CJCJJCC) then CJCJJCC=Request.QueryString(CCJCCCJ("F")) if not CCJJCJC(CJCJJCC) then CJCJJCC=Request.QueryString(CCJCCCJ("D4")) if not CCJJCJC(CJCJJCC) then Call RedirectMessage(CCJCCCJ("????????W$49@@=X??@??????????,")) CJCJJCC=csng(CJCJJCC) end if:if CJCJJCC=0 then Call RedirectMessage(CCJCCCJ("????????W$49@@=X????W_X??,")) Dim CJCJCCC:Call SetConfig:Sub SetConfig():dim CJCJJCJ,CCCCJC:CCCJJJ=CCJCCCJ("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") & CJCJJCC:set CCCCJC=CCJCJJ.execute(CCCJJJ):if CCCCJC.eof then Call RedirectMessage(CCJCCCJ("??W") & CCCCCJ & CCJCCCJ("X??????????W") & CJCJJCC & CCJCCCJ("X????????,")) ReDim CJCJJCJ(61):CJCJJCJ(0)=CCCCJC(CCJCCCJ(";:2@H6:")) & "":CJCJJCJ(1)=CCCCJC(CCJCCCJ("EJA6")):CJCJJCJ(2)=CCCCJC(CCJCCCJ("D>D")):CJCJJCJ(3)=CCCCJC(CCJCCCJ("4FDE@>8C@FA")) & "":CJCJJCJ(4)=CCCCJC(CCJCCCJ("D:5632C0@E96C")) & "":CJCJJCJ(5)=IIf(isnull(CCCCJC(CCJCCCJ("E6DEC6DF=EG:6H"))),0,CCCCJC(CCJCCCJ("E6DEC6DF=EG:6H"))):CJCJJCJ(6)=CCCCJC(CCJCCCJ("K:IF?E:>6")):CJCJJCJ(7)=CCCCJC(CCJCCCJ("766")):CJCJJCJ(8)=CCCCJC(CCJCCCJ("C6E6DE52J")):CJCJJCJ(9)=CCCCJC(CCJCCCJ("6IA:C652E6")):CJCJJCJ(10)=CCCCJC(CCJCCCJ("E:E=6")):CJCJJCJ(11)=CCCCJC(CCJCCCJ(":?EC@")) & "":CJCJJCJ(12)=CCCCJC(CCJCCCJ("A:4EFC6")) & "":CJCJJCJ(13)=CCCCJC(CCJCCCJ("72>:=J")):CJCJJCJ(14)=CCCCJC(CCJCCCJ("4@AJC:89E")) & "":CJCJJCJ(15)=IIf(isnull(CCCCJC(CCJCCCJ("D6>6DE6C0DE2CE052E6"))),CCJCCCJ("`h__\`\`"),CCCCJC(CCJCCCJ("D6>6DE6C0DE2CE052E6"))):CJCJJCJ(16)=IIf(isnull(CCCCJC(CCJCCCJ("K:IF?0E:>6D09:89=:89E"))),0,CCCCJC(CCJCCCJ("K:IF?0E:>6D09:89=:89E"))):CJCJJCJ(17)=CCCCJC(CCJCCCJ("4@?E24E")) & "":CJCJJCJ(18)=CCCCJC(CCJCCCJ("D2?5E23=6")):CJCJJCJ(19)=CCCCJC(CCJCCCJ("4C:D:D")):CJCJJCJ(20)=CCCCJC(CCJCCCJ("JJ52E6")):CJCJJCJ(21)=CCCCJC(CCJCCCJ("BB")):CJCJJCJ(22)=CCCCJC(CCJCCCJ("JFJF60D>D0EA=")) & "":CJCJJCJ(23)=CCCCJC(CCJCCCJ("JFJF60E6DE0=3")) & "":CJCJJCJ(25)=CCCCJC(CCJCCCJ("6IA6CE")):CJCJJCJ(26)=CCCCJC(CCJCCCJ(">@5:?7@")):CJCJJCJ(27)=CCCCJC(CCJCCCJ("9@>6A286E@AA:4EFC6")) & "":CJCJJCJ(28)=CCCCJC(CCJCCCJ("4C:D:D=3")):CJCJJCJ(29)=IIf(CCCCJC(CCJCCCJ("4C:D:D@=5")),False,True):CJCJJCJ(30)=CCCCJC(CCJCCCJ("8C@FA8F:52?46")):CJCJJCJ(31)=CCCCJC(CCJCCCJ("3:@7665324<")):CJCJJCJ(32)=CCCCJC(CCJCCCJ("<6JDEC")):CJCJJCJ(33)=CCCCJC(CCJCCCJ("=@8@")) & "":CJCJJCJ(34)=CCCCJC(CCJCCCJ("K:46")):CJCJJCJ(35)=IIf(CCCCJC(CCJCCCJ(":D?6H")),True,False):CJCJJCJ(36)=121:CJCJJCJ(37)=111:CJCJJCJ(38)=160:CJCJJCJ(39)=CCCCJC(CCJCCCJ("8F6DE3@@<")):CJCJJCJ(40)=CCCCJC(CCJCCCJ("75D")):CJCJJCJ(42)=CCCCJC(CCJCCCJ("9@>6=@8:?")):CJCJJCJ(43)=CCCCJC(CCJCCCJ("K:IF?0?6657665324<")):CJCJJCJ(44)=CCCCJC(CCJCCCJ("K:IF?0E:>6D0=:>:E")):CJCJJCJ(45)=CCCCJC(CCJCCCJ("4@>A=6E60:?7@")):CJCJJCJ(46)=CCCCJC(CCJCCCJ("E6DE:?EC@")) & "":CJCJJCJ(47)=IIf(isnull(CCCCJC(CCJCCCJ("JFJF60367@C60E:>6"))),0,CCCCJC(CCJCCCJ("JFJF60367@C60E:>6"))):CJCJJCJ(49)=CCCCJC(CCJCCCJ("D>D0C646:G6C")):CJCJJCJ(50)=CCCCJC(CCJCCCJ("D>D0D:8?")) & "":CJCJJCJ(52)=CCCCJC(CCJCCCJ("JFJF602CC2?86")):CJCJJCJ(53)=IIf(isnull(CCCCJC(CCJCCCJ("DEF56?E0BF6DE:@?04@F?E"))),0,CCCCJC(CCJCCCJ("DEF56?E0BF6DE:@?04@F?E"))):CJCJJCJ(54)=CCCCJC(CCJCCCJ("9:560=30@FE@7286")):CJCJJCJ(55)=CCCCJC(CCJCCCJ("JFJF60E6DE052JD")):CJCJJCJ(56)=CCCCJC(CCJCCCJ("JFJF60H66<0=:>:E")):CJCJJCJ(57)=CCCCJC(CCJCCCJ("JFJF604964<65")):CJCJJCJ(58)=CCCCJC(CCJCCCJ("K:IF?0?6657665324<0?6IE")):CJCJJCJ(59)=CCCCJC(CCJCCCJ("4964<?6HDEF56?E")):CJCJJCJ(60)=CCCCJC(CCJCCCJ("K:IF?04=@D6052E6")):CCCCJC.close : set CCCCJC=nothing:if isNull(CJCJJCJ(8)) or CJCJJCJ(8)="" then CJCJJCJ(8)=0 if isdate(CJCJJCJ(9)) then CJCJJCJ(9)=cdate(CJCJJCJ(9)):if CJCJJCJ(9)<Date then Call RedirectMessage(CCJCCCJ("????????,????????????????W") & CJCJJCJ(9) & CCJCCCJ("X??????,")) end if:if not CCJJCJC(CJCJJCJ(20)) then CJCJJCJ(20)=7 select case CJCJJCJ(1):case 1,2,16:CJCJJCJ(36)=159:case 4,5,6,10,11:CJCJJCJ(36)=190:CJCJJCJ(37)=178:CJCJJCJ(38)=191:case 7,13:CJCJJCJ(36)=164:CJCJJCJ(37)=178:CJCJJCJ(38)=179:end select:CJCJCCC=CJCJJCJ:End Sub:Function CCJCJCJ(CCCCJJC):dim CJCJJCJ(7,1),CJCJJJC,CJCCJJJ,CJCCJJC:CJCCJJJ=Array(CCJCCCJ("$49@@="),CCJCCCJ("$EF56?E"),CCJCCCJ("s6AE"),CCJCCCJ("vC256"),CCJCCCJ("r=2DD>2E6"),CCJCCCJ("}F>36C"),CCJCCCJ("%62496C"),CCJCCCJ("!2C6?E")):select case CJCJCCC(1):case 1,2 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????")):case 3,16 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????")):case 4 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("??????@"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????")):case 5 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????")):case 6 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("??????@"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("??????"),CCJCCCJ("????")):case 7 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("??????"),CCJCCCJ("????")):case 8 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("??????@"),CCJCCCJ("????"),CCJCCCJ("????????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("??????"),CCJCCCJ("????")):case 9 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("??????"),CCJCCCJ("????")):case 10 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("??????"),CCJCCCJ("????")):case 11 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("??????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("??????"),CCJCCCJ("????")):case 12 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("??????"),CCJCCCJ("????")):case 13 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????")):case 14 : CJCCJJC=Array(CCJCCCJ("??????"),CCJCCCJ("??@??"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("??????"),CCJCCCJ("????")):case 15 : CJCCJJC=Array(CCJCCCJ("????"),CCJCCCJ("????????"),CCJCCCJ("????"),CCJCCCJ("????????"),CCJCCCJ("????"),CCJCCCJ("????"),CCJCCCJ("??????"),CCJCCCJ("????")):case else : CJCCJJC=CJCCJJJ end select:for CJCJJJC=0 to Ubound(CJCJJCJ):CJCJJCJ(CJCJJJC,0)=CJCCJJJ(CJCJJJC):CJCJJCJ(CJCJJJC,1)=CJCCJJC(CJCJJJC):next:for CJCJJJC=0 to Ubound(CJCJJCJ):if CJCJJCJ(CJCJJJC,0)=CCCCJJC then CCJCJCJ=CJCJJCJ(CJCJJJC,1):exit for end if:next:End Function::Call CheckRight(93):Const CCJJJCJ="interview_time":if CJCJCCC(7)<3 then Call RedirectMessage("???????????????????????") dim CJCCJCJ,CJCJJJC:CJCCJCJ=Array(CCJCCCJ("??????"),CCJCCCJ("??????,"),CCJCCCJ("??????"),CCJCCCJ("??????"),CCJCCCJ("??????"),CCJCCCJ("??????"),CCJCCCJ("??????")):dim CJCCJCC,CJCCCJJ,CJCCCJC:CJCCJCC=Request.QueryString(CCJCCCJ(":5")):CJCCCJJ=Request.QueryString(CCJCCCJ("24E")):CJCCCJC=Request.QueryString(CCJCCCJ("H66<")):if CJCCCJJ=CCJCCCJ("56=") and CCJJCJC(CJCCJCC) then CCCJJJ=CCJCCCJ("56=6E6 ,7C@> ,:?E6CG:6H0:?G:E6 ,H96C6 ,E:>6:5l") & CJCCJCC & CCJCCCJ("j56=6E6 ,7C@> ,") & CCJJJCJ & CCJCCCJ(" ,H96C6 ,:5l") & CJCCJCC:CCJCJJ.execute CCCJJJ end if:if Request.ServerVariables(CCJCCCJ("#t""&t$%0|t%w~s"))=CCJCCCJ("!~$%") then if CJCCCJJ=CCJCCCJ("255") then dim CJCCCCJ:CJCCCCJ=CCJJJCC(Request.Form(CCJCCCJ("E96E:>6"))):CJCCCCJ=split(CJCCCCJ,vbcrlf):for CJCJJJC=0 to ubound(CJCCCCJ):if CJCCCCJ(CJCJJJC)<>"" then CCCJJJ=CCJCCCJ(":?D6CE ,:?E@ ,") & CCJJJCJ & CCJCCCJ("W:5[H66<52J[E96E:>6[>2IDEF56?E[>6>36CEJA6X ,G2=F6DW") & CCJJCCJ(CCJJJCJ) & CCJCCCJ("[") & Request.Form(CCJCCCJ("H66<")) & CCJCCCJ("[V") & CJCCCCJ(CJCJJJC) & CCJCCCJ("V") & CCJCCCJ("[") & Cint(Request.Form(CCJCCCJ(">2IDEF56?E"))) & CCJCCCJ("[") & CJJJJJC & CCJCCCJ("X") CCJCJJ.execute CCCJJJ end if:next elseif CJCCCJJ=CCJCCCJ(">@5") and CCJJCJC(CJCCJCC) then CCCJJJ=CCJCCCJ("FA52E6 ,") & CCJJJCJ & CCJCCCJ(" ,D6E") & CCJCCCJ(" ,H66<52Jl") & Request.Form(CCJCCCJ("H66<")) & CCJCCCJ("[E96E:>6lV") & CCJJJCC(Request.Form(CCJCCCJ("E96E:>6"))) & CCJCCCJ("V") & CCJCCCJ("[>2IDEF56?El") & Cint(Request.Form(CCJCCCJ(">2IDEF56?E"))) & CCJCCCJ(" ,H96C6 ,:5l") & CJCCJCC CCJCJJ.execute CCCJJJ end if:CJCCCJJ="" end if:Response.Write(vbCrLf):Response.Write(CCJCCCJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CCJCCCJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CCJCCCJ("k9625m") & vbCrLf):Response.Write(CCJCCCJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CCJCCCJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CCJCCCJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CCJCCCJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CCJCCCJ("kE:E=6m??????????k^E:E=6m") & vbCrLf):Response.Write(CCJCCCJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CCJCCCJ("k^9625m") & vbCrLf):Response.Write(CCJCCCJ("k3@5Jm") & vbCrLf):Response.Write(CCJCCCJ("k7@C> ,:5lQ7@C>`Q ,?2>6lQ7@C>`Q ,>6E9@5lQ86EQ ,24E:@?lQQm") & vbCrLf):Response.Write(CCJCCCJ(" ,kE23=6 ,4=2DDlQE30E:E=6Qm") & vbCrLf):Response.Write(CCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCJ(" ,kE9mU>:55@Ej ,?????????? ,U>:55@Ejk^E9m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,4=2DDlQ=236=Qm????????,k^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kD6=64E ,?2>6lQH66<Qm") & vbCrLf):Response.Write(CCJCCCJ(" ,k@AE:@? ,G2=F6lQQm,????.k^@AE:@?m") & vbCrLf):Response.Write(CCJCCCJ(" ,")):for CJCJJJC=0 to 6:Response.Write CCJCCCJ("k@AE:@? ,G2=F6lV") & CJCJJJC & CCJCCCJ("V") & IIf(cstr(CJCJJJC)=CJCCCJC,CCJCCCJ(" ,D6=64E65"),"") & CCJCCCJ("m") & CJCCJCJ(CJCJJJC) & CCJCCCJ("k^@AE:@?m") next:Response.Write(vbCrLf):Response.Write(CCJCCCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCJCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,4=2DDlQ24EQm") & vbCrLf):Response.Write(CCJCCCJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CCJCCCJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQnQm?? ,??k^2m") & vbCrLf):Response.Write(CCJCCCJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,:5lQ3E?0255Q ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CCJCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCJCCCJ("k^7@C>m") & vbCrLf):Response.Write(CCJCCCJ("k7@C> ,:5lQ7@C>aQ ,?2>6lQ7@C>aQ ,>6E9@5lQA@DEQ ,24E:@?lQQm") & vbCrLf):Response.Write(CCJCCCJ(" ,kE23=6 ,4=2DDlQE30=:DEQm") & vbCrLf):Response.Write(CCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCJ(" ,kE9 ,E:E=6lQ??????????????QmRk^E9m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE9 ,E:E=6lQ????????????????@????????@??@????????????,??????,??????????????????????,??????????????????Qm??????WnXk^E9m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE9 ,E:E=6lQ??????????_Qm????")):Response.Write CCJCJCJ(CCJCCCJ("$EF56?E")):Response.Write(CCJCCCJ("??WnXk^E9m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCJ(" ,")):CCCJJJ=CCJCCCJ("D6=64E ,:5[H66<52J[E96E:>6[>2IDEF56?E ,7C@> ,") & CCJJJCJ & CCJCCCJ(" ,H96C6 ,>6>36CEJA6l") & CJJJJJC:if CCJJCJC(CJCCCJC) then CCCJJJ=CCCJJJ & CCJCCCJ(" ,2?5 ,H66<52Jl") & CJCCCJC CCCJJJ=CCCJJJ & CCJCCCJ(" ,@C56C ,3J ,H66<52J"):CJCJJJC=1:set CCJCCJ=CCJCJJ.execute(CCCJJJ):while not CCJCCJ.eof:if CJCCJCC=cstr(CCJCCJ(0)) and CJCCCJJ=CCJCCCJ(">@5") then Response.Write(vbCrLf):Response.Write(CCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write CJCJJJC:Response.Write(CCJCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CCJCCCJ(" ,kD6=64E ,?2>6lQH66<Qm") & vbCrLf):Response.Write(CCJCCCJ(" ,")):for CJCJJJC=0 to 6:Response.Write CCJCCCJ("k@AE:@? ,G2=F6lV") & CJCJJJC & CCJCCCJ("V") & IIf(CJCJJJC=CCJCCJ(1),CCJCCCJ(" ,D6=64E65"),"") & CCJCCCJ("m") & CJCCJCJ(CJCJJJC) & CCJCCCJ("k^@AE:@?m") next:Response.Write(vbCrLf):Response.Write(CCJCCCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCJCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5mk:?AFE ,?2>6lQE96E:>6Q ,EJA6lQE6IEQ ,:5lQE96E:>6Q ,G2=F6lQ")):Response.Write CCJCCJ(2):Response.Write(CCJCCCJ("Q ,D:K6lQd_Qmk^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQ46?E6CQmk:?AFE ,?2>6lQ>2IDEF56?EQ ,EJA6lQE6IEQ ,:5lQ>2IDEF56?EQ ,D:K6lQdQ ,G2=F6lQ")):Response.Write CCJCCJ(3):Response.Write(CCJCCCJ("Qmk^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQC:89EQmk2 ,9C67lQ;2G2D4C:AEi5@4F>6?E]7@C>a]DF3>:EWXjQm????k^2m ,k2 ,9C67lQnQm????k^2mk^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCJ(" ,")) Else Response.Write(vbCrLf):Response.Write(CCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write CJCJJJC:Response.Write(CCJCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write CJCCJCJ(CCJCCJ(1)):Response.Write(CCJCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5m")):Response.Write CCJCCJ(2):Response.Write(CCJCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write CCJCCJ(3):Response.Write(CCJCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQC:89EQmk2 ,9C67lQn24El>@5U:5l")):Response.Write CCJCCJ(0):Response.Write(CCJCCCJ("UH66<l")):Response.Write CJCCCJC:Response.Write(CCJCCCJ("Qm????k^2m ,k2 ,9C67lQn24El56=U:5l")):Response.Write CCJCCJ(0):Response.Write(CCJCCCJ("UH66<l")):Response.Write CJCCCJC:Response.Write(CCJCCCJ("Qm????k^2mk^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCJ(" ,")) end if:CCJCCJ.movenext:CJCJJJC=CJCJJJC+1:wend:if CJCCCJJ=CCJCCCJ("255") then Response.Write(vbCrLf):Response.Write(CCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write CJCJJJC:Response.Write(CCJCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CCJCCCJ(" ,kD6=64E ,?2>6lQH66<Qm") & vbCrLf):Response.Write(CCJCCCJ(" ,")):for CJCJJJC=0 to 6:Response.Write CCJCCCJ("k@AE:@? ,G2=F6lV") & CJCJJJC & CCJCCCJ("Vm") & CJCCJCJ(CJCJJJC) & CCJCCCJ("k^@AE:@?m") next:Response.Write(vbCrLf):Response.Write(CCJCCCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCJCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5mkE6IE2C62 ,?2>6lQE96E:>6Q ,4@=DlQd_Q ,C@HDlQ`Q ,:5lQE96E:>6Q ,E:E=6lQ????,??????????????????????????????,????????????????????????Qmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQ46?E6CQmk:?AFE ,?2>6lQ>2IDEF56?EQ ,EJA6lQE6IEQ ,:5lQ>2IDEF56?EQ ,G2=F6lQ_Q ,D:K6lQdQmk^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,2=:8?lQC:89EQmk2 ,9C67lQ;2G2D4C:AEi5@4F>6?E]7@C>a]DF3>:EWXjQm????k^2m ,k2 ,9C67lQnQm????k^2mk^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCJ(" ,")) Else Response.Write(vbCrLf):Response.Write(CCJCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCJ(" ,kE5 ,4@=DA2?lQdQ ,2=:8?lQC:89EQmk2 ,9C67lQn24El255UH66<l")):Response.Write CJCCCJC:Response.Write(CCJCCCJ("Qm????k^2mk^E5m") & vbCrLf):Response.Write(CCJCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCJ(" ,")) End If:Response.Write(vbCrLf):Response.Write(CCJCCCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCJCCCJ("k^7@C>m") & vbCrLf):Response.Write(CCJCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCJ("kD4C:AE ,DC4lQ^$4C:AED^2FE@D:K6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E23=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E:E=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCJ("kD4C:AEm") & vbCrLf):Response.Write(CCJCCCJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CCJCCCJ(" ,SWVE23=6]E30=:DEVX];%23=6WX") & vbCrLf):Response.Write(CCJCCCJ(" ,SWVR3E?0255VX]4=:4<W7F?4E:@?WX ,LH:?5@H]=@42E:@?lVn24El255VNX") & vbCrLf):Response.Write(CCJCCCJ(" ,SWV2i4@?E2:?DWQ????QXV[SWV]E30=:DEVXX]4=:4<W7F?4E:@?WX ,L:7WP4@?7:C>WV????????????????????????,????????????,????????????????,VXXLC6EFC? ,72=D6N ,NX") & vbCrLf):Response.Write(CCJCCCJ(" ,SWVE6IE2C62,E:E=6.VX];%:E=6WLDEJ=6iV3=F6VNX") & vbCrLf):Response.Write(CCJCCCJ(" ,SWVE9,E:E=6.VX];%:E=6WLDEJ=6iV3=24<VNX") & vbCrLf):Response.Write(CCJCCCJ(" ,2FE@D:K6WSWVE6IE2C62VXX") & vbCrLf):Response.Write(CCJCCCJ("NX") & vbCrLf):Response.Write(CCJCCCJ("k^D4C:AEm") & vbCrLf):Response.Write(CCJCCCJ("k^3@5Jm") & vbCrLf):Response.Write(CCJCCCJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CCJJCCC=nothing:set CCJCJJJ=nothing:set CCJCJJC=nothing:set CCJCJCJ=nothing:CCJCCC.Close:Set CCJCCC=Nothing:CCJCCJ.Close:Set CCJCCJ=Nothing:CCJCJJ.Close:Set CCJCJJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CCJCCCJ(ByVal CCJCCJC) Dim CJCCCCC, CJCJJJC, CCJJJJJ CCJCCJC = Replace(CCJCCJC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJCJJJC = 1 To Len(CCJCCJC) If CJCJJJC <> CCJJJJJ Then CJCCCCC = AscW(Mid(CCJCCJC, CJCJJJC, 1)) If CJCCCCC >= 33 And CJCCCCC <= 79 Then CCJCCCJ = CCJCCCJ & Chr(CJCCCCC + 47) ElseIf CJCCCCC >= 80 And CJCCCCC <= 126 Then CCJCCCJ = CCJCCCJ & Chr(CJCCCCC - 47) Else CCJJJJJ = CJCJJJC + 1 If Mid(CCJCCJC, CCJJJJJ, 1) = Chr(64) Then CCJCCCJ = CCJCCCJ & ChrW(CJCCCCC + 5) Else CCJCCCJ = CCJCCCJ & Mid(CCJCCJC, CJCJJJC, 1) End If End If Next End Function %>
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de