Edit D:\xinhaisoft\crisis_new\school\admin\yuyue.asp

??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CJJJCCJ, CJJJCCC,CJJCJJJ, CJJCJJC, CJJCJCJ:Set CJJJCCJ = server.CreateObject(CJJJCJCC("ps~sq]r@??64E:@?")):CJJJCCJ.open Application(CJJJCJCC("r@??64E:@?$EC:?8")):Set CJJJCCC=CJJJCCJ::Dim CJJCJCC,CJJCCJJ,CJJCCJC,CJJCCCJ,CJJCCCC,CJCJJJJ,CJCJJJC,CJCJJCJ,CJCJJCC:Dim CJCJCJJ,CJCJCJC,CJCJCCJ,CJCJCCC,CJCCJJJ,CJCCJJC:Dim CJCCJCJ,CJCCJCC,CJCCCJJ:Dim CJCCCJC:CJCCCJC=Trim(Request.Cookies(CJJJCJCC("!$*|t|qt#"))):if CJCCCJC="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CJJCJCC>0 then
CJJCJCJ=CJJJCJCC("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") & CJJCCJJ & CJJJCJCC("V ,2?5 ,:5l") & CJJCJCC
set CJJCJJJ=CJJJCCJ.execute(CJJCJCJ):If CJJCJJJ.EOF Then
Call ClearMemberCookie
Else
CJJCCJC=CJJCJJJ(2) & "":CJJCCCJ=CJJCJJJ(3):CJJCCCC=CJJCJJJ(5):CJCJJJJ=CJJCJJJ(6):CJCJJJC=CJJCJJJ(9):CJCJJCJ=CJJCJJJ(15):CJCJCJJ=CJJCJJJ(0):CJCCJCC=CJJCJJJ(1):CJCCJCJ=CJJCJJJ(11) & "":CJCJCJC=CJJCJJJ(10) & "":CJCJJCC=CJJCJJJ(12):CJCJCCJ=CJJCJJJ(14):CJCJCCC=CJJCJJJ(13):CJCCJJJ=CJJCJJJ(7) & "":CJCCJJC=CJJCJJJ(4):CJCCCJJ=CJJCJJJ(8):if isnull(CJCJJCJ) then CJCJJCJ=0
if isnull(CJCJJJC) or CJCJJJC=0 then CJCJJJC=CJJCCCJ
if isnull(CJCCJJC) then CJCCJJC=0
if isnull(CJJCCCC) then CJJCCCC=0
if instr(CJJJCJCC("6`_254bhch32dh2336de6_df7a_7ggb6"),CJJCCJJ)>0 then Call RedirectMessage(CJJJCJCC("????????,????????????????????????????????,"))
Call SetMemberCookie(CJJCJCC,CJJCCJJ)
End IF
end if::Function CCCCCJJ(CJJJCCJJ):dim CJCCCCJ,CJCCCCC:CJCCCCC=split(CJJJCCJJ,CJJJCJCC("[")):CCCCCJJ=False:for CJCCCCJ=0 to ubound(CJCCCCC):If Mid(CJJCCJC,CJCCCCC(CJCCCCJ),1)="1" then
CCCCCJJ=True:exit function
end if:next:End Function:Sub CheckLogined():if CJJCJCC=0 then
Call ClearMemberCookie:Call ConnClose:dim CCJJJJJ:CCJJJJJ=trim(request.QueryString(CJJJCJCC("D49@@="))):if isnumeric(CCJJJJJ) then
response.Redirect CJJJCJCC("^>^G2?E^R^D49@@=^") & CCJJJJJ & CJJJCJCC("^DEF56?E^=@8:?nC65:C64El") & url
else
Call RedirectMessage(CJJJCJCC("??????????????,????????????,"))
end if
end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CJJJCJCC("!$*|t|qt#"))="":CJJCJCC=0:CJCJJJJ=0:CJJCCJJ=Empty:CJJCCCC=0:CJCJJCJ=0:CJCJJJC=0:CJJCCCJ=0:CJCJCJJ=False:CJCCJCC=False:CJCCCJJ=Empty:End Sub:Sub CheckMemberCookie():dim CCJJJJC,CCJJJCJ,CJCCCCJ,CCJJJCC,CCJJCJJ:CCJJJJC=split(CJCCCJC,CJJJCJCC("]")):if ubound(CCJJJJC)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CCJJJJC(0)) or len(CCJJJJC(1))<>32 or len(CCJJJJC(2))<>32 then
Call ClearMemberCookie
else
CCJJJCJ=CCJJJJC(1):for CJCCCCJ=1 to len(CCJJJCJ):CCJJJCC=mid(CCJJJCJ,CJCCCCJ,1):if isnumeric(CCJJJCC) then CCJJCJJ=CCJJCJJ & CCJJJCC
if len(CCJJCJJ)=7 then exit for
next:CCJJJCJ=CCJJJJC(2):if CCJJCJJ<>mid(CCJJJCJ,6,7) then
Call ClearMemberCookie
else
CCJJJCC=mid(CCJJJCJ,18,10)/2:if CCJJJCC<DateDiff(CJJJCJCC("D"), CJJJCJCC("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CJJCJCC=Clng(CCJJJJC(0)):CJJCCJJ=CCJJJJC(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CJJJCCJC,CJJJCCCJ):dim CJCCCCJ,CCJJJCC,CCJJCJJ:for CJCCCCJ=1 to len(CJJJCCCJ):CCJJJCC=mid(CJJJCCCJ,CJCCCCJ,1):if isnumeric(CCJJJCC) then CCJJCJJ=CCJJCJJ & CCJJJCC
if len(CCJJCJJ)=7 then exit for
next:CCJJCJJ=CJJJCCJC & CJJJCJCC("]") & CJJJCCCJ & CJJJCJCC("]") & Fix(10000*(Rnd+1)) & CCJJCJJ & Fix(10000*(Rnd+1)) & DateDiff(CJJJCJCC("D"), CJJJCJCC("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJJJCJCC("!$*|t|qt#"))=CCJJCJJ:End Sub:::Function IIf(CJJJCCCC, CJJCJJJJ, CJJCJJJC):if isnull(CJJJCCCC) or isempty(CJJJCCCC) then
IIf = CJJCJJJC
elseif CJJJCCCC Then
IIf = CJJCJJJJ
Else
IIf = CJJCJJJC
end if:End Function:Const CCCCJCC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":Function CCCCCCJ(str):if isnull(str) or str="" then
CCCCCCJ=False:exit function
end if:Dim CCJJCJC:Set CCJJCJC = New RegExp:CCJJCJC.Pattern = CJJJCJCC("/`Wb,_\h.Mc,dfh.Md,_`abdefgh.Me,aef.Mf,_`abdefg.Mg,_\h.Mh,`dgh.X-5LgNS"):CCJJCJC.IgnoreCase = True:CCCCCCJ = CCJJCJC.test(str):set CCJJCJC=nothing:End Function::::Sub SetHttpOnlyCookie(CJJCJJCC,CJJCJCJJ):dim CCJJJJC:CCJJJJC=CJJCJJCC & CJJJCJCC("l") & CJJCJCJJ & CJJJCJCC("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJJJCJCC("$6E\r@@<:6"),CCJJJJC):End Sub:::::::Function CCCCCCC(CCCCJCJ):if isnull(CCCCJCJ) or trim(CCCCJCJ)="" or not isnumeric(CCCCJCJ) then
CCCCCCC=false
else
Dim CCJJCJC:Set CCJJCJC = New RegExp:CCJJCJC.Pattern = CJJJCJCC("/-5ZS"):CCJJCJC.IgnoreCase = True:CCCCCCC = CCJJCJC.test(CCCCJCJ):set CCJJCJC=nothing
end if:End Function:::::Sub ConnClose():On Error Resume Next:set CJJJJJJJ=nothing:set CJJJJJJC=nothing:set CJJJJJCJ=nothing:set CJJJJJCC=nothing:CCJJCCC.close : set CCJJCCC=nothing:CJJCJJC.Close : Set CJJCJJC=Nothing:CJJCJJJ.Close : Set CJJCJJJ=Nothing:CJJJJCJJ.Close : Set CJJJJCJJ = Nothing:CJJJCCJ.Close : Set CJJJCCJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJJCJCJC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJJJCJCC("!$*0|6DD286"),server.URLEncode(CJJCJCJC)):Response.Redirect CJJJCJCC("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::function CJJJJCJC(CCJJJJJ):dim CCJJCCJ(),CJCCCCJ,CCJJCCC,CCJCJJJ:redim CCJJCCJ(1,0):CCJJCCJ(0,0)=0:CCJJCCJ(1,0)=CJJJCJCC(",??."):CCJCJJJ=CJJJCJCC("D6=64E ,:5[C62=?2>6 ,7C@> ,G0>6>36C ,H:E9 ,W?@=@4<X ,H96C6 ,>6>36C0EJA60E@Al") & CCJJJJJ & CJJJCJCC(" ,2?5 ,DE2E6ld ,2?5 ,:D4@?DF=E2?El`"):if cstr(CCJJJJJ)<>"1" then CCJCJJJ=CCJCJJJ & CJJJCJCC(" ,2?5 ,,8C@FA.kd")
CCJCJJJ=CCJCJJJ & CJJJCJCC(" ,@C56C ,3J ,:5"):set CCJJCCC=CJJJCCJ.execute(CCJCJJJ):CJCCCCJ=0:while not CCJJCCC.eof:redim preserve CCJJCCJ(1,CJCCCCJ):CCJJCCJ(0,CJCCCCJ)=CCJJCCC(0):CCJJCCJ(1,CJCCCCJ)=CCJJCCC(1):CJCCCCJ=CJCCCCJ+1:CCJJCCC.movenext:wend:CCJJCCC.close : set CCJJCCC=nothing:CJJJJCJC=CCJJCCJ:end function::Function CJJJJCCJ(ByVal CJJJJCCC,style):if not isdate(CJJJJCCC) then
CJJJJCCJ=CJJJJCCC:exit function
end if:dim CCJCJJC,CCJJCCJ,CCJCJCJ,CCJCJCC:CJJJJCCC=cdate(CJJJJCCC):CCJCJJC=Year(CJJJJCCC):CCJJCCJ=Month(CJJJJCCC):CCJCJCJ=Day(CJJJJCCC):select case style:case 0:CJJJJCCJ=CCJCJJC & CJJJCJCC("\") & right(0 & CCJJCCJ,2) & CJJJCJCC("\") & right(0 & CCJCJCJ,2):case 1:CJJJJCCJ=CCJCJJC & right(0 & CCJJCCJ,2) & right(0 & CCJCJCJ,2):case 2:CJJJJCCJ=right(CCJCJJC,2) & CJJJCJCC("\") & right(0 & CCJJCCJ,2) & CJJJCJCC("\") & right(0 & CCJCJCJ,2):case 3:CJJJJCCJ=CCJCJJC & CJJJCJCC("\") & right(0 & CCJJCCJ,2):case 4:CJJJJCCJ=right(0 & CCJJCCJ,2) & CJJJCJCC("\") & right(0 & CCJCJCJ,2):case 5:CJJJJCCJ=right(0 & CCJCJCJ,2):case 6:CJJJJCCJ=CCJCJJC & CJJJCJCC("??") & right(0 & CCJJCCJ,2) & CJJJCJCC("??") & right(0 & CCJCJCJ,2) & CJJJCJCC("??"):case else
CJJJJCCJ=CJJJJCCC:end select:End Function::::::::::::::::::::::dim CCJJJJJ:CJJCJCJ=Request.ServerVariables(CJJJCJCC("!p%w0x}u~")):if instr(CJJCJCJ,CJJJCJCC("^D49@@=^25>:?^"))>0 then
Call CheckLogined:if not CJCJCJJ and not CJCCJCC then Call RedirectMessage(CJJJCJCC("????????,????????????????????????,"))
CCJJJJJ=CJCJJJC
elseif instr(CJJCJCJ,CJJJCJCC("^>^D49@@=^DEF56?E^"))>0 or instr(CJJCJCJ,CJJJCJCC("^DEF56?E^"))>0 then
Call CheckLogined:CCJJJJJ=CJCJJJC
elseif instr(CJJCJCJ,CJJJCJCC("^D49@@="))>0 then
CCJJJJJ=Request.QueryString(CJJJCJCC("D49@@=")):if not CCCCCCC(CCJJJJJ) then CCJJJJJ=Request.QueryString(CJJJCJCC("F"))
if not CCCCCCC(CCJJJJJ) then CCJJJJJ=Request.QueryString(CJJJCJCC("D4"))
if not CCCCCCC(CCJJJJJ) then Call RedirectMessage(CJJJCJCC("????????W$49@@=X??@??????????,"))
CCJJJJJ=csng(CCJJJJJ)
end if:if CCJJJJJ=0 then Call RedirectMessage(CJJJCJCC("????????W$49@@=X????W_X??,"))
Dim CCJCCJJ:Call SetConfig:Sub SetConfig():dim CJCCCCC,CCJJCCC:CJJCJCJ=CJJJCJCC("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") & CCJJJJJ:set CCJJCCC=CJJJCCJ.execute(CJJCJCJ):if CCJJCCC.eof then Call RedirectMessage(CJJJCJCC("??W") & CJJCJCC & CJJJCJCC("X??????????W") & CCJJJJJ & CJJJCJCC("X????????,"))
ReDim CJCCCCC(61):CJCCCCC(0)=CCJJCCC(CJJJCJCC(";:2@H6:")) & "":CJCCCCC(1)=CCJJCCC(CJJJCJCC("EJA6")):CJCCCCC(2)=CCJJCCC(CJJJCJCC("D>D")):CJCCCCC(3)=CCJJCCC(CJJJCJCC("4FDE@>8C@FA")) & "":CJCCCCC(4)=CCJJCCC(CJJJCJCC("D:5632C0@E96C")) & "":CJCCCCC(5)=IIf(isnull(CCJJCCC(CJJJCJCC("E6DEC6DF=EG:6H"))),0,CCJJCCC(CJJJCJCC("E6DEC6DF=EG:6H"))):CJCCCCC(6)=CCJJCCC(CJJJCJCC("K:IF?E:>6")):CJCCCCC(7)=CCJJCCC(CJJJCJCC("766")):CJCCCCC(8)=CCJJCCC(CJJJCJCC("C6E6DE52J")):CJCCCCC(9)=CCJJCCC(CJJJCJCC("6IA:C652E6")):CJCCCCC(10)=CCJJCCC(CJJJCJCC("E:E=6")):CJCCCCC(11)=CCJJCCC(CJJJCJCC(":?EC@")) & "":CJCCCCC(12)=CCJJCCC(CJJJCJCC("A:4EFC6")) & "":CJCCCCC(13)=CCJJCCC(CJJJCJCC("72>:=J")):CJCCCCC(14)=CCJJCCC(CJJJCJCC("4@AJC:89E")) & "":CJCCCCC(15)=IIf(isnull(CCJJCCC(CJJJCJCC("D6>6DE6C0DE2CE052E6"))),CJJJCJCC("`h__\`\`"),CCJJCCC(CJJJCJCC("D6>6DE6C0DE2CE052E6"))):CJCCCCC(16)=IIf(isnull(CCJJCCC(CJJJCJCC("K:IF?0E:>6D09:89=:89E"))),0,CCJJCCC(CJJJCJCC("K:IF?0E:>6D09:89=:89E"))):CJCCCCC(17)=CCJJCCC(CJJJCJCC("4@?E24E")) & "":CJCCCCC(18)=CCJJCCC(CJJJCJCC("D2?5E23=6")):CJCCCCC(19)=CCJJCCC(CJJJCJCC("4C:D:D")):CJCCCCC(20)=CCJJCCC(CJJJCJCC("JJ52E6")):CJCCCCC(21)=CCJJCCC(CJJJCJCC("BB")):CJCCCCC(22)=CCJJCCC(CJJJCJCC("JFJF60D>D0EA=")) & "":CJCCCCC(23)=CCJJCCC(CJJJCJCC("JFJF60E6DE0=3")) & "":CJCCCCC(25)=CCJJCCC(CJJJCJCC("6IA6CE")):CJCCCCC(26)=CCJJCCC(CJJJCJCC(">@5:?7@")):CJCCCCC(27)=CCJJCCC(CJJJCJCC("9@>6A286E@AA:4EFC6")) & "":CJCCCCC(28)=CCJJCCC(CJJJCJCC("4C:D:D=3")):CJCCCCC(29)=IIf(CCJJCCC(CJJJCJCC("4C:D:D@=5")),False,True):CJCCCCC(30)=CCJJCCC(CJJJCJCC("8C@FA8F:52?46")):CJCCCCC(31)=CCJJCCC(CJJJCJCC("3:@7665324<")):CJCCCCC(32)=CCJJCCC(CJJJCJCC("<6JDEC")):CJCCCCC(33)=CCJJCCC(CJJJCJCC("=@8@")) & "":CJCCCCC(34)=CCJJCCC(CJJJCJCC("K:46")):CJCCCCC(35)=IIf(CCJJCCC(CJJJCJCC(":D?6H")),True,False):CJCCCCC(36)=121:CJCCCCC(37)=111:CJCCCCC(38)=160:CJCCCCC(39)=CCJJCCC(CJJJCJCC("8F6DE3@@<")):CJCCCCC(40)=CCJJCCC(CJJJCJCC("75D")):CJCCCCC(42)=CCJJCCC(CJJJCJCC("9@>6=@8:?")):CJCCCCC(43)=CCJJCCC(CJJJCJCC("K:IF?0?6657665324<")):CJCCCCC(44)=CCJJCCC(CJJJCJCC("K:IF?0E:>6D0=:>:E")):CJCCCCC(45)=CCJJCCC(CJJJCJCC("4@>A=6E60:?7@")):CJCCCCC(46)=CCJJCCC(CJJJCJCC("E6DE:?EC@")) & "":CJCCCCC(47)=IIf(isnull(CCJJCCC(CJJJCJCC("JFJF60367@C60E:>6"))),0,CCJJCCC(CJJJCJCC("JFJF60367@C60E:>6"))):CJCCCCC(49)=CCJJCCC(CJJJCJCC("D>D0C646:G6C")):CJCCCCC(50)=CCJJCCC(CJJJCJCC("D>D0D:8?")) & "":CJCCCCC(52)=CCJJCCC(CJJJCJCC("JFJF602CC2?86")):CJCCCCC(53)=IIf(isnull(CCJJCCC(CJJJCJCC("DEF56?E0BF6DE:@?04@F?E"))),0,CCJJCCC(CJJJCJCC("DEF56?E0BF6DE:@?04@F?E"))):CJCCCCC(54)=CCJJCCC(CJJJCJCC("9:560=30@FE@7286")):CJCCCCC(55)=CCJJCCC(CJJJCJCC("JFJF60E6DE052JD")):CJCCCCC(56)=CCJJCCC(CJJJCJCC("JFJF60H66<0=:>:E")):CJCCCCC(57)=CCJJCCC(CJJJCJCC("JFJF604964<65")):CJCCCCC(58)=CCJJCCC(CJJJCJCC("K:IF?0?6657665324<0?6IE")):CJCCCCC(59)=CCJJCCC(CJJJCJCC("4964<?6HDEF56?E")):CJCCCCC(60)=CCJJCCC(CJJJCJCC("K:IF?04=@D6052E6")):CCJJCCC.close : set CCJJCCC=nothing:if isNull(CJCCCCC(8)) or CJCCCCC(8)="" then CJCCCCC(8)=0
if isdate(CJCCCCC(9)) then
CJCCCCC(9)=cdate(CJCCCCC(9)):if CJCCCCC(9)<Date then Call RedirectMessage(CJJJCJCC("????????,????????????????W") & CJCCCCC(9) & CJJJCJCC("X??????,"))
end if:if not CCCCCCC(CJCCCCC(20)) then CJCCCCC(20)=7
select case CJCCCCC(1):case 1,2,16:CJCCCCC(36)=159:case 4,5,6,10,11:CJCCCCC(36)=190:CJCCCCC(37)=178:CJCCCCC(38)=191:case 7,13:CJCCCCC(36)=164:CJCCCCC(37)=178:CJCCCCC(38)=179:end select:CCJCCJJ=CJCCCCC:End Sub:Function CJJJJJCC(CJJCJCCJ):dim CJCCCCC(7,1),CJCCCCJ,CCJCCJC,CCJCCCJ:CCJCCJC=Array(CJJJCJCC("$49@@="),CJJJCJCC("$EF56?E"),CJJJCJCC("s6AE"),CJJJCJCC("vC256"),CJJJCJCC("r=2DD>2E6"),CJJJCJCC("}F>36C"),CJJJCJCC("%62496C"),CJJJCJCC("!2C6?E")):select case CCJCCJJ(1):case 1,2 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????")):case 3,16 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????")):case 4 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("??????@"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????")):case 5 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????")):case 6 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("??????@"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("??????"),CJJJCJCC("????")):case 7 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("??????"),CJJJCJCC("????")):case 8 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("??????@"),CJJJCJCC("????"),CJJJCJCC("????????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("??????"),CJJJCJCC("????")):case 9 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("??????"),CJJJCJCC("????")):case 10 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("??????"),CJJJCJCC("????")):case 11 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("??????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("??????"),CJJJCJCC("????")):case 12 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("??????"),CJJJCJCC("????")):case 13 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????")):case 14 : CCJCCCJ=Array(CJJJCJCC("??????"),CJJJCJCC("??@??"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("??????"),CJJJCJCC("????")):case 15 : CCJCCCJ=Array(CJJJCJCC("????"),CJJJCJCC("????????"),CJJJCJCC("????"),CJJJCJCC("????????"),CJJJCJCC("????"),CJJJCJCC("????"),CJJJCJCC("??????"),CJJJCJCC("????")):case else : CCJCCCJ=CCJCCJC
end select:for CJCCCCJ=0 to Ubound(CJCCCCC):CJCCCCC(CJCCCCJ,0)=CCJCCJC(CJCCCCJ):CJCCCCC(CJCCCCJ,1)=CCJCCCJ(CJCCCCJ):next:for CJCCCCJ=0 to Ubound(CJCCCCC):if CJCCCCC(CJCCCCJ,0)=CJJCJCCJ then
CJJJJJCC=CJCCCCC(CJCCCCJ,1):exit for
end if:next:End Function::dim CCJCCCC,CCCJJJJ:CCJCCCC=Request.QueryString(CJJJCJCC("DE2CE")):CCCJJJJ=Request.QueryString(CJJJCJCC("6?5")):if CCJCCCC<>"" and CCCJJJJ<>"" then
dim CCCJJJC,CCCJJCJ,CJCCCCJ,CCJJJCC,CCCJJCC(),CCCJCJJ,CCCJCJC,CCJJCCJ,CCCJCCJ,CCCJCCC,CCCCJJJ:CJJCJCJ=CJJJCJCC("D6=64E ,:5[4@?DF=E2?E[C62=?2>6[H66<52J[E:>6`DEC[E:>6aDEC[E6>A[E9652E6[C@@>[C6>2C< ,7C@> ,G0KI0E:>6 ,H96C6 ,4@?DF=E2?E ,:? ,W")
if CCCCCJJ(87) then
CCJJCCJ=CJJJJCJC(CCJJJJJ):for CJCCCCJ=0 to ubound(CCJJCCJ,2):if CJCCCCJ>0 then CJJCJCJ=CJJCJCJ & CJJJCJCC("[")
CJJCJCJ=CJJCJCJ & CCJJCCJ(0,CJCCCCJ):next
else
CJJCJCJ=CJJCJCJ & CJJCJCC
end if:CJJCJCJ=CJJCJCJ & CJJJCJCC("X"):set CJJCJJJ=CJJJCCJ.execute(CJJCJCJ):if CJJCJJJ.eof then
Call ConnClose:response.Write CJJJCJCC(",."):response.End
end if:CJCCCCJ=0:while not CJJCJJJ.eof:redim preserve CCCJJCC(CJCCCCJ):CCCJCJJ="":for CCJJJCC=0 to 9:CCCJCJJ=CCCJCJJ & CJJJCJCC("M") & CJJCJJJ(CCJJJCC):next:CCCJJCC(CJCCCCJ)=split(mid(CCCJCJJ,2),CJJJCJCC("M")):CJJCJJJ.movenext:CJCCCCJ=CJCCCCJ+1:wend:CCJCCCC=cdate(CCJCCCC):CCCJJJJ=cdate(CCCJJJJ):CCCJCCJ=DateDiff(CJJJCJCC("5"),CCJCCCC,CCCJJJJ):for CJCCCCJ=0 to CCCJCCJ:CCCJCJC=CCJCCCC+CJCCCCJ:CCCJCJC=CJJJJCCJ(CCCJCJC,0):for CCJJJCC=0 to ubound(CCCJJCC):if CJJJCJJC(CCCJCJC,CCCJJCC(CCJJJCC)) then
set CJJCJJJ=CJJJCCJ.execute(CJJJCJCC("D6=64E ,E@A ,` ,Y ,7C@> ,KI03FDJ ,H96C6 ,JJ52E6lV") & CCCJCJC & CJJJCJCC("V ,2?5 ,KI0E:>60:5l") & CCCJJCC(CCJJJCC)(0))
if not CJJCJJJ.eof then
CCCJJJC=CCCJJJC & CJJJCJJJ(CCCJCJC,CCCJJCC(CCJJJCC),0,0,"",CJJJCJCC("Rg_gcg7"))
else
CJJCJCJ=CJJJCJCC("D6=64E ,E@A ,` ,:5[DE2EFD[C62=?2>6[?F>36C[>@3:=6[>6>36C ,7C@> ,G0KI ,H96C6 ,4@?DF=E2?El") & CCCJJCC(CCJJJCC)(1) & CJJJCJCC(" ,2?5 ,JJ52E6l4@?G6CEW52E6[V") & CCCJCJC & CJJJCJCC("VX ,2?5 ,JJE:>6lV") & CCCJJCC(CCJJJCC)(4) & CJJJCJCC("\") & CCCJJCC(CCJJJCC)(5) & CJJJCJCC("V ,@C56C ,3J ,:5 ,56D4")
set CJJCJJJ=CJJJCCJ.execute(CJJCJCJ):if CJJCJJJ.eof then
CCCJJJC=CCCJJJC & CJJJCJJJ(CCCJCJC,CCCJJCC(CCJJJCC),0,0,"",CJJJCJCC("R`h36e3"))
else
if CCCCCCJ(CJJCJJJ(4)) then CCCJCCC=CJJCJJJ(4) else CCCJCCC=""
CCCCJJJ=replace(CJJCJJJ(2),vbcr,""):if CJJCJJJ(1)=0 then
CCCJJJC=CCCJJJC & CJJJCJJJ(CCCJCJC,CCCJJCC(CCJJJCC),CJJCJJJ(0),CJJCJJJ(5),CJJJCJCC("??,??????,") & CCCCJJJ & CJJJCJCC("??,") & CJJJJJCC(CJJJCJCC("}F>36C")) & CJJJCJCC("??,") & CJJCJJJ(3) & CJJJCJCC("??,??????,") & CCCJCCC & CJJJCJCC("??,"),CJJJCJCC("Ra5g47_"))
elseif CJJCJJJ(1)=1 then
CCCJJJC=CCCJJJC & CJJJCJJJ(CCCJCJC,CCCJJCC(CCJJJCC),0,0,"",CJJJCJCC("R`h36e3"))
elseif CJJCJJJ(1)=2 then
CCCJJJC=CCCJJJC & CJJJCJJJ(CCCJCJC,CCCJJCC(CCJJJCC),CJJCJJJ(0),CJJCJJJ(5),CJJJCJCC("??,??????,") & CCCCJJJ & CJJJCJCC("??,") & CJJJJJCC(CJJJCJCC("}F>36C")) & CJJJCJCC("??,") & CJJCJJJ(3) & CJJJCJCC("??,??????,") & CCCJCCC & CJJJCJCC("??,"),CJJJCJCC("R77hh__"))
elseif CJJCJJJ(1)=3 then
CCCJJJC=CCCJJJC & CJJJCJJJ(CCCJCJC,CCCJJCC(CCJJJCC),CJJCJJJ(0),CJJCJJJ(5),CJJJCJCC("??,??????,") & CCCCJJJ & CJJJCJCC("??,") & CJJJJJCC(CJJJCJCC("}F>36C")) & CJJJCJCC("??,") & CJJCJJJ(3) & CJJJCJCC("??,??????,") & CCCJCCC & CJJJCJCC("??,"),CJJJCJCC("R65b7`c"))
else
CCCJJJC=CCCJJJC & CJJJCJJJ(CCCJCJC,CCCJJCC(CCJJJCC),CJJCJJJ(0),CJJCJJJ(5),CJJJCJCC("??,??????,") & CCCCJJJ & CJJJCJCC("??,") & CJJJJJCC(CJJJCJCC("}F>36C")) & CJJJCJCC("??,") & CJJCJJJ(3) & CJJJCJCC("??,"),CJJJCJCC("Rfrathq"))
end if
end if
end if
end if:next:next:Call ConnClose:response.Charset=CJJJCJCC("FE7\g"):response.Write CJJJCJCC(",") & Mid(CCCJJJC,2) & CJJJCJCC("."):response.End
end if:function CJJJCJJJ(CCCJCJC,CCCJJCC,CJJCJCCC,CJJCCJJJ,CJJCCJJC,CJJCCJCJ):CJJJCJJJ=CJJJCJCC("[LV:5Vi") & CCCJJCC(0) & CJJJCJCC("[VD@CEViV") & CCCJJCC(4) & CJJJCJCC("\") & right("000" & CCCJJCC(1),8) & CJJJCJCC("V[VDE2CEViV") & CCCJCJC & CJJJCJCC("V[V4@=@CViV") & CJJCCJCJ & CJJJCJCC("V[V4@?DF=E2?EVi") & CCCJJCC(1) & CJJJCJCC("[V4@?DF=E2?E?2>6ViV") & CCCJJCC(2) & CJJJCJCC("V[VE96E:>6ViV") & CCCJJCC(4) & CJJJCJCC("\") & CCCJJCC(5) & CJJJCJCC("V[VKI:5Vi") & CJJCJCCC & CJJJCJCC("[V>6>36CVi") & CJJCCJJJ & CJJJCJCC("[VC@@>ViV") & CCCJJCC(8) & CJJJCJCC("V")
if CJJCCJJC="" then
CJJJCJJJ=CJJJCJJJ & CJJJCJCC("[VE:E=6ViV") & CCCJJCC(4) & CJJJCJCC("\") & CCCJJCC(5) & CJJJCJCC(" ,") & CCCJJCC(2) & CJJJCJCC(" ,") & CCCJJCC(9) & CJJJCJCC("VN")
else
CJJJCJJJ=CJJJCJJJ & CJJJCJCC("[VE:E=6ViV") & CCCJJCC(4) & CJJJCJCC("\") & CCCJJCC(5) & CJJJCJCC(" ,") & CCCJJCC(2) & CJJJCJCC(" ,") & CCCJJCC(9) & CJJJCJCC(" ,") & replace(CJJCCJJC,chr(9),"") & CJJJCJCC("VN")
end if:CJJJCJJJ=replace(CJJJCJJJ,CJJJCJCC("V"),CJJJCJCC("Q"))
end function:function CJJJCJJC(CCCJCJC,CCCJJCC):CJJJCJJC=false:if CCCJJCC(6)=CJJJCJCC("%CF6") then
if CCCJCJC=CJJJJCCJ(CCCJJCC(7),0) then CJJJCJJC=true
else
if weekday(CCCJCJC)-1=cint(CCCJJCC(3)) then CJJJCJJC=true
end if:end function:Response.Write(vbCrLf):Response.Write(CJJJCJCC("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJJJCJCC("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJJJCJCC("k9625m") & vbCrLf):Response.Write(CJJJCJCC("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJJJCJCC("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJJJCJCC("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJJJCJCC("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJJJCJCC("kE:E=6m")):Response.Write  CCJCCJJ(10):Response.Write(CJJJCJCC(" ,\ ,????????????k^E:E=6m") & vbCrLf):Response.Write(CJJJCJCC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CJJJCJCC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^7F==42=6?52C^7F==42=6?52C]>:?]4DDQm") & vbCrLf):Response.Write(CJJJCJCC("kDEJ=6m") & vbCrLf):Response.Write(CJJJCJCC("3@5J ,L ,>2C8:?i_AIj ,N") & vbCrLf):Response.Write(CJJJCJCC("R42=6?52C ,L ,>2C8:?i`_AIj ,N") & vbCrLf):Response.Write(CJJJCJCC("RE:E=6 ,L ,324<8C@F?5\4@=@CiR_th_saj ,3@C56C\3@EE@>i`AI ,D@=:5 ,R_qeupaj ,4@=@CiR777j ,7@?E\D:K6i`gAIj ,96:89Eic_AIj ,=:?6\96:89Eic_AIj ,E6IE\2=:8?i46?E6Cj ,>2C8:?\3@EE@>i`_AIj ,E6IE\D925@Hi\`AI ,\`AI ,aAI ,R___j ,7@?E\H6:89Ei3@=5j ,3@I\D925@Hi_ ,`AI ,dAI ,Reeej ,5:DA=2Ji?@?6j ,N") & vbCrLf):Response.Write(CJJJCJCC("]74\46?E6C ,9a ,L ,96:89Eiah]bhAIj ,=:?6\96:89Eiah]bhAIj ,N") & vbCrLf):Response.Write(CJJJCJCC("]74\6G6?E ,L ,4FCD@Ci ,A@:?E6Cj ,7@?E\D:K6i ,`aAIj ,A255:?8i ,aAI ,dAIj ,>2C8:?i ,aAI ,`_AIj ,N") & vbCrLf):Response.Write(CJJJCJCC("]255\6G6?E ,L4FCD@CiA@:?E6CjN") & vbCrLf):Response.Write(CJJJCJCC("R>D8 ,L ,E6IE\2=:8?i46?E6Cj ,>2C8:?i_ ,`_AI ,N") & vbCrLf):Response.Write(CJJJCJCC("R>D8 ,=: ,L ,5:DA=2Ji:?=:?6\3=@4<j ,>2C8:?\C:89Ei`_AIj ,N") & vbCrLf):Response.Write(CJJJCJCC("k^DEJ=6m") & vbCrLf):Response.Write(CJJJCJCC("k^9625m") & vbCrLf):Response.Write(CJJJCJCC("k3@5Jm") & vbCrLf):Response.Write(CJJJCJCC("k5:G ,:5lQE:E=6Qm")):Response.Write  CCJCCJJ(10):Response.Write(CJJJCJCC(" ,\ ,????????????k^5:Gm") & vbCrLf):Response.Write(CJJJCJCC("k5:G ,:5lV42=6?52CVmk^5:Gm") & vbCrLf):Response.Write(CJJJCJCC("kF= ,:5lQ>D8Qm") & vbCrLf):Response.Write(CJJJCJCC(" ,k=: ,DEJ=6lQ4@=@CiR`h36e3jQ ,E:E=6lQ????????????????????,????????????????????????????????,????????,Qm??, ,??????????,????????k^=:m") & vbCrLf):Response.Write(CJJJCJCC(" ,k=: ,DEJ=6lQ4@=@CiRa5g47_jQ ,E:E=6lQ??????????????????????????,??????,??????????Qm??, ,??????????,????????k^=:m") & vbCrLf):Response.Write(CJJJCJCC(" ,k=: ,DEJ=6lQ4@=@CiR77hh__jQ ,E:E=6lQ??????????????????????,????@??????????????Qm??, ,??????????,")):Response.Write  CJJJJJCC(CJJJCJCC("%62496C")):Response.Write(CJJJCJCC("????k^=:m") & vbCrLf):Response.Write(CJJJCJCC(" ,k=: ,DEJ=6lQ4@=@CiR65b7`cjQ ,E:E=6lQ??????????????,??????????????????????????????????????Qm??, ,??????????,????????k^=:m") & vbCrLf):Response.Write(CJJJCJCC(" ,k=: ,DEJ=6lQ4@=@CiRg_gcg7jQ ,E:E=6lQ??????????????????,??????????????????Qm??, ,??????????,????????k^=:m") & vbCrLf):Response.Write(CJJJCJCC(" ,k=: ,DEJ=6lQ4@=@CiRfrathqjQ ,E:E=6lQ??????????????????????????,????????????@????Qm??, ,????????k^=:m") & vbCrLf):Response.Write(CJJJCJCC("k^F=m") & vbCrLf):Response.Write(CJJJCJCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJCC("kD4C:AE ,DC4lQ^$4C:AED^>@>6?E];D^>@>6?E]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJCC("kD4C:AE ,DC4lQ^$4C:AED^7F==42=6?52C^7F==42=6?52C]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJCC("kD4C:AE ,DC4lQ^$4C:AED^7F==42=6?52C^=@42=6^K9\4?]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJCC("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJCC("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C]96=A6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E:E=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJCC("kD4C:AEm") & vbCrLf):Response.Write(CJJJCJCC("^Y ,8=@32= ,H:?0@A6?[ ,4FCC6?EH:?=2J6C[ ,>@>6?E ,Y^") & vbCrLf):Response.Write(CJJJCJCC("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,E@52Jl>@>6?EWX") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,96:89Elc_") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,G:6HlV32D:4(66<V") & vbCrLf):Response.Write(CJJJCJCC(" ,:7WE@AlllD6=7XL") & vbCrLf):Response.Write(CJJJCJCC(" ,SWVRE:E=6VX]D9@HWX") & vbCrLf):Response.Write(CJJJCJCC(" ,96:89Elh_") & vbCrLf):Response.Write(CJJJCJCC(" ,G:6HlV>@?E9V") & vbCrLf):Response.Write(CJJJCJCC(" ,N") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,????????") & vbCrLf):Response.Write(CJJJCJCC(" ,SWVR42=6?52CVX]7F==r2=6?52CWL") & vbCrLf):Response.Write(CJJJCJCC(" ,4FDE@>qFEE@?DiL") & vbCrLf):Response.Write(CJJJCJCC(" ,KIE:>6iL") & vbCrLf):Response.Write(CJJJCJCC(" ,E6IEiV????V[") & vbCrLf):Response.Write(CJJJCJCC(" ,4=:4<i7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?0@A6?WVK:IF?0E:>6]2DAV[V????????????V[Vgd_[cd_V[7F?4E:@?WXLSWVR42=6?52CVX]7F==r2=6?52CWVC676E49tG6?EDVXNX") & vbCrLf):Response.Write(CJJJCJCC(" ,N") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,6IA@CEiL") & vbCrLf):Response.Write(CJJJCJCC(" ,E6IEiV????V[") & vbCrLf):Response.Write(CJJJCJCC(" ,4=:4<i6IA@CE%:>6") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,6IA@CE%@52JiL") & vbCrLf):Response.Write(CJJJCJCC(" ,E6IEiV????????V[") & vbCrLf):Response.Write(CJJJCJCC(" ,4=:4<i7F?4E:@?WXLH:?5@H]=@42E:@?lVJFJF6024E]2DAn24El6IA@CEU52E6lVZE@52J]4=@?6WX]7@C>2EWV****\|\sVXN") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,6IA@CE%@>@CC@HiL") & vbCrLf):Response.Write(CJJJCJCC(" ,E6IEiV????V[") & vbCrLf):Response.Write(CJJJCJCC(" ,4=:4<i7F?4E:@?WXLH:?5@H]=@42E:@?lVJFJF6024E]2DAn24El6IA@CEU52E6lVZE@52J]4=@?6WX]255W`[V52JVX]7@C>2EWV****\|\sVXN") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,6IA@CE%96s2Jp7E6C%@>@CC@HiL") & vbCrLf):Response.Write(CJJJCJCC(" ,E6IEiV????V[") & vbCrLf):Response.Write(CJJJCJCC(" ,4=:4<i7F?4E:@?WXLH:?5@H]=@42E:@?lVJFJF6024E]2DAn24El6IA@CEU52E6lVZE@52J]4=@?6WX]255Wa[V52JVX]7@C>2EWV****\|\sVXN") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,DE2EiL") & vbCrLf):Response.Write(CJJJCJCC(" ,E6IEiV????V[") & vbCrLf):Response.Write(CJJJCJCC(" ,4=:4<iDE2E%:>6") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,?6HH:?iL") & vbCrLf):Response.Write(CJJJCJCC(" ,E6IEiV??????V[") & vbCrLf):Response.Write(CJJJCJCC(" ,4=:4<i7F?4E:@?WXLH:?5@H]@A6?WVJFJF6]2DAVXN") & vbCrLf):Response.Write(CJJJCJCC(" ,N") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,96256CiL") & vbCrLf):Response.Write(CJJJCJCC(" ,=67EiV>@?E9[32D:4(66<[32D:4s2J ,AC6G[?6IE ,E@52JV[") & vbCrLf):Response.Write(CJJJCJCC(" ,46?E6CiVE:E=6V[") & vbCrLf):Response.Write(CJJJCJCC(" ,C:89EiV2DD:8?{:DE ,KIE:>6 ,6IA@CE ,6IA@CE%@52J[6IA@CE%@>@CC@H[6IA@CE%96s2Jp7E6C%@>@CC@H ,DE2E ,?6HH:?V") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,5672F=E':6Hi ,G:6H[") & vbCrLf):Response.Write(CJJJCJCC(" ,96:89EiSWH:?5@HX]96:89EWX\96:89E[") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?5@H#6D:K6i7F?4E:@?WXLSWVR42=6?52CVX]7F==r2=6?52CWV@AE:@?V[ ,V96:89EV[ ,SWH:?5@HX]96:89EWX\96:89EXN[") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?5@H#6D:K6s6=2Jia__[") & vbCrLf):Response.Write(CJJJCJCC(" ,6G6?EDiL") & vbCrLf):Response.Write(CJJJCJCC(" ,FC=iVJFJF6]2DAV[") & vbCrLf):Response.Write(CJJJCJCC(" ,42496iECF6") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,6G6?E~C56CiVD@CEV[") & vbCrLf):Response.Write(CJJJCJCC(" ,=@25:?8i7F?4E:@?W:D{@25:?8[G:6HXL") & vbCrLf):Response.Write(CJJJCJCC(" ,:7W:D{@25:?8XL=2J6C]=@25WXN") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6L=2J6C]4=@D6p==WXN") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,6G6?E#6?56Ci ,7F?4E:@?W6G6?E[ ,6=6>6?EX ,L") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,????????????") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,4@=@Cl6G6?E]4@=@C") & vbCrLf):Response.Write(CJJJCJCC(" ,:7W4@=@ClllVR`h36e3VXL4@=@ClV8C66?VN") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6 ,:7W4@=@ClllVRg_gcg7VXL4@=@ClVH9:E6VN") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6 ,:7W4@=@ClllVR65b7`cVXL4@=@ClVC65VN") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6 ,:7W4@=@ClllVR77hh__VXL4@=@ClVJ6==@HVN") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6 ,:7W4@=@ClllVRa5g47_VXL4@=@ClV3=F6VN") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6 ,:7W4@=@ClllVRfrathqVXL4@=@ClV3=24<VN") & vbCrLf):Response.Write(CJJJCJCC(" ,6=6>6?E]2EECWVE:E=6V[6G6?E]E:E=6]DF3DEC:?8W`aXX];%:E=6WLDEJ=6i4@=@CNX") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,6G6?Ep7E6Cp==#6?56Ci7F?4E:@?WG:6HXL") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,????Z??") & vbCrLf):Response.Write(CJJJCJCC(" ,:7WG:6H]?2>6 ,lll ,V>@?E9VXL") & vbCrLf):Response.Write(CJJJCJCC(" ,SWVE5]74\52J\E@AVX]6249W7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,:7WSWE9:DX]49:=5C6?WV2VX]=6?8E9lll_XL") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,52E6lSWE9:DX]52E2WV52E6VX") & vbCrLf):Response.Write(CJJJCJCC(" ,:7W>@>6?EW52E6X]5:77WE@52J[V52JDVXml_XLSWE9:DX]AC6A6?5WVk2 ,4=2DDlQ255\6G6?EQ ,52E2\52E6lQVZ52E6ZVQ ,E:E=6lQ??????????????????QmZk^2mVXN") & vbCrLf):Response.Write(CJJJCJCC(" ,N") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC(" ,N") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,??c????????????") & vbCrLf):Response.Write(CJJJCJCC(" ,SWV5:G]74\4@?E6?E\D<6=6E@?VX]7:?5WVECi?E9\49:=5Wc?Z`XVX]6249W7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,SWE9:DX]7:?5WV2]74\6G6?EVX]4DDWV>2C8:?\E@AV[`_X") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,6G6?Er=:4<i7F?4E:@?W42=tG6?E[ ,;DtG6?E[ ,G:6H ,X ,L") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,4@=@Cl42=tG6?E]4@=@C") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,??????,????????????????????") & vbCrLf):Response.Write(CJJJCJCC(" ,:7W4@=@ClllVR`h36e3VXL") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?0@A6?WVJFJF6024E]2DAn24El255U4@?DF=E2?ElVZ42=tG6?E]4@?DF=E2?EZVUJJ52E6lVZ86EDEC:?83J52E6W42=tG6?E]DE2CEXZVUJJE:>6lVZ42=tG6?E]E96E:>6ZVUE:>6:5lVZ42=tG6?E]:5ZVUC@@>lVZ42=tG6?E]C@@>[V????????V[Vfd_[cd_V[7F?4E:@?WXLSWVR42=6?52CVX]7F==r2=6?52CWVC676E49tG6?EDVXNX") & vbCrLf):Response.Write(CJJJCJCC(" ,N") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,??????,??????????,??????????????") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6 ,:7W4@=@ClllVRg_gcg7VXL") & vbCrLf):Response.Write(CJJJCJCC(" ,=2J6C]4@?7:C>WV????????????????????????????,??????????????????????????????,??????????????????,V[7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,S]86EWVJFJF6024E]2DAn24El42?46=3FDJUJJ52E6lVZ86EDEC:?83J52E6W42=tG6?E]DE2CEXZVUE:>6:5lVZ42=tG6?E]:5[7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,=2J6C]4=@D6p==WX") & vbCrLf):Response.Write(CJJJCJCC(" ,SWVR42=6?52CVX]7F==r2=6?52CWVC676E49tG6?EDVX") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC(" ,N") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,??????,??????????????,????????") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6 ,:7W4@=@ClllVR65b7`cVXL") & vbCrLf):Response.Write(CJJJCJCC(" ,=2J6C]4@?7:C>WV??????????????@??????????,??????,??????????,??????????????????????,??????,??????,????????????????????,????????????????,V[L") & vbCrLf):Response.Write(CJJJCJCC(" ,3E?i,V????????V[V????V[V????V.[") & vbCrLf):Response.Write(CJJJCJCC(" ,J6Di7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,=2J6C]4=@D6p==WX") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?5@H]=@42E:@?lVK:IF?024E]2DAn24El>@5U:5lVZ42=tG6?E]KI:5ZVUDEF56?E:5lVZ42=tG6?E]>6>36C") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,3E?ai7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,=2J6C]4=@D6p==WX") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?0@A6?WVJFJF6024E]2DAn24ElG:6HU:5lVZ42=tG6?E]KI:5ZVUE:>6:5lVZ42=tG6?E]:5ZVUJJ52E6lVZ86EDEC:?83J52E6W42=tG6?E]DE2CEX[V????????V[Vfd_[cd_V[7F?4E:@?WXLSWVR42=6?52CVX]7F==r2=6?52CWVC676E49tG6?EDVXNX") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,3E?bi7F?4E:@?WXL=2J6C]4=@D6p==WXN") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC(" ,N") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6 ,:7W4@=@ClllVR77hh__VMM4@=@ClllVRa5g47_VXL") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,??????,??,????????,??????????") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,??????,????????????????") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?0@A6?WVJFJF6024E]2DAn24El562=U:5lVZ42=tG6?E]KI:5[V????????V[Vfd_[cd_V[7F?4E:@?WXLSWVR42=6?52CVX]7F==r2=6?52CWVC676E49tG6?EDVXNX") & vbCrLf):Response.Write(CJJJCJCC(" ,N") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6 ,:7W4@=@ClllVRfrathqVXL") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,????") & vbCrLf):Response.Write(CJJJCJCC(" ,=2J6C]4@?7:C>WV??????????????????????????,??????????????@??????,V[L") & vbCrLf):Response.Write(CJJJCJCC(" ,3E?i,V????V[V????V[V????V[V????V.[") & vbCrLf):Response.Write(CJJJCJCC(" ,J6Di7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,=2J6C]4=@D6p==WX") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?0@A6?WVK:IF?024E]2DAn24ElG:6HU:5lVZ42=tG6?E]KI:5ZVUDEF56?E:5lVZ42=tG6?E]>6>36CZVUH:?l`V[V????V[Vh__[cd_VX") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,3E?ai7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,=2J6C]4=@D6p==WX") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?5@H]=@42E:@?lVK:IF?024E]2DAn24El>@5U:5lVZ42=tG6?E]KI:5ZVUDEF56?E:5lVZ42=tG6?E]>6>36C") & vbCrLf):Response.Write(CJJJCJCC(" ,N[") & vbCrLf):Response.Write(CJJJCJCC(" ,3E?bi7F?4E:@?WXLH:?5@H]@A6?WVJFJF60=:46?D6]2DAn:5lVZ42=tG6?E]KI:5XN[") & vbCrLf):Response.Write(CJJJCJCC(" ,3E?ci7F?4E:@?WXL=2J6C]4=@D6p==WXN") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC(" ,N") & vbCrLf):Response.Write(CJJJCJCC(" ,N") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,????????????") & vbCrLf):Response.Write(CJJJCJCC(" ,SWVR42=6?52CVX]@?WV4=:4<V[V2]255\6G6?EV[7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,52E6lSWE9:DX]52E2WV52E6VX") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?0@A6?WVJFJF6024E]2DAn24El2556G6?EU52E6lVZ52E6[V????????????????,VZ52E6ZV??,V[Ve__[`__V[7F?4E:@?WXLSWVR42=6?52CVX]7F==r2=6?52CWVC676E49tG6?EDVXNX") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,????d??????????,??") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?5@H]D6Ex?E6CG2=W7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,SWVR42=6?52CVX]7F==r2=6?52CWVC676E49tG6?EDVX") & vbCrLf):Response.Write(CJJJCJCC(" ,N[b_____X") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,????????????") & vbCrLf):Response.Write(CJJJCJCC(" ,SWV:?AFE]3E?\D6E52E6VX]@?WV4=:4<V[7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,GlSWE9:DX]G2=WX") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,E`lSWV:?AFE,?2>6lQE`Q.VX") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,EalSWV:?AFE,?2>6lQEaQ.VX") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,5lE@52J]4=@?6WX") & vbCrLf):Response.Write(CJJJCJCC(" ,:7WGlllV?? ,??VXL5l5]7@C>2EWV****\||\ssVXN") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6 ,:7WGlllV?? ,??VXL5l5]255W`[V52JVX]7@C>2EWV****\||\ssVXN") & vbCrLf):Response.Write(CJJJCJCC(" ,6=D6L5l5]255Wa[V52JVX]7@C>2EWV****\||\ssVXN") & vbCrLf):Response.Write(CJJJCJCC(" ,E`]G2=W5X") & vbCrLf):Response.Write(CJJJCJCC(" ,Ea]G2=W5X") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC(" ,^^ ,????????????") & vbCrLf):Response.Write(CJJJCJCC(" ,SWVR6IA@CEVX]49:=5C6?WV7@C>VX]@?WVDF3>:EV[7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,E`lSWV:?AFE,?2>6lQE`Q.VX]G2=WX") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,EalSWV:?AFE,?2>6lQEaQ.VX]G2=WX") & vbCrLf):Response.Write(CJJJCJCC(" ,H:?5@H]=@42E:@?lVJFJF6024E]2DAn24El6IA@CEU5`lVZE`ZVU5alVZEa") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC("NX") & vbCrLf):Response.Write(CJJJCJCC("^^ ,????????") & vbCrLf):Response.Write(CJJJCJCC("7F?4E:@? ,6IA@CE%:>6WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,4FCC6?EH:?=2J6C]@A6?WL") & vbCrLf):Response.Write(CJJJCJCC(" ,EJA6i`[") & vbCrLf):Response.Write(CJJJCJCC(" ,E:E=6iV????V[") & vbCrLf):Response.Write(CJJJCJCC(" ,2C62i ,,Vad_AIV[ ,V`__AIV.[") & vbCrLf):Response.Write(CJJJCJCC(" ,4@?E6?EiVk7@C> ,24E:@?lQJFJF6024E]2DAQ ,DEJ=6lQE6IE\2=:8?i46?E6CjA255:?8i`_AIjQmk:?AFE ,EJA6lQE6IEQ ,?2>6lQ52E6Q ,G2=F6lQVZ>@>6?EWX]7@C>2EWV****\|\sVXZVQ ,C6BF:C65m ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ?? ,??Qmk:?AFE ,EJA6lQ9:556?Q ,?2>6lQ24EQ ,G2=F6lQ6IA@CEQmk^7@C>mV") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC("N") & vbCrLf):Response.Write(CJJJCJCC("^^ ,????????") & vbCrLf):Response.Write(CJJJCJCC("7F?4E:@? ,DE2E%:>6WXL") & vbCrLf):Response.Write(CJJJCJCC(" ,4FCC6?EH:?=2J6C]@A6?WL") & vbCrLf):Response.Write(CJJJCJCC(" ,EJA6i`[") & vbCrLf):Response.Write(CJJJCJCC(" ,E:E=6iV????V[") & vbCrLf):Response.Write(CJJJCJCC(" ,2C62i ,,Vad_AIV[ ,V`__AIV.[") & vbCrLf):Response.Write(CJJJCJCC(" ,4@?E6?EiVk7@C> ,24E:@?lQJFJF6024E]2DAQ ,DEJ=6lQE6IE\2=:8?i46?E6CjA255:?8i`_AIjQmk:?AFE ,EJA6lQE6IEQ ,?2>6lQ52E6Q ,G2=F6lQVZ>@>6?EWX]7@C>2EWV****\|\sVXZVQ ,C6BF:C65m ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ?? ,??Qmk:?AFE ,EJA6lQ9:556?Q ,?2>6lQ24EQ ,G2=F6lQDE2EQmk^7@C>mV") & vbCrLf):Response.Write(CJJJCJCC(" ,NX") & vbCrLf):Response.Write(CJJJCJCC("N") & vbCrLf):Response.Write(CJJJCJCC("^^ ,??????????????????") & vbCrLf):Response.Write(CJJJCJCC("7F?4E:@? ,86EDEC:?83J52E6W52E6X ,L") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,>J52E6l?6H ,s2E6W52E6X") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,| ,l ,>J52E6]86E|@?E9WX ,Z ,`") & vbCrLf):Response.Write(CJJJCJCC(" ,G2C ,5 ,l ,>J52E6]86Es2E6WX") & vbCrLf):Response.Write(CJJJCJCC(" ,C6EFC? ,W>J52E6]86EuF==*62CWX ,Z ,V\V ,Z ,W| ,k ,`_ ,n ,V_V ,Z ,| ,i ,|X ,Z ,V\V ,Z ,W5 ,k ,`_ ,n ,V_V ,Z ,5 ,i ,5XX") & vbCrLf):Response.Write(CJJJCJCC("N") & vbCrLf):Response.Write(CJJJCJCC("k^D4C:AEm") & vbCrLf):Response.Write(CJJJCJCC("k^3@5Jm") & vbCrLf):Response.Write(CJJJCJCC("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJJJJJJ=nothing:set CJJJJJJC=nothing:set CJJJJJCJ=nothing:set CJJJJJCC=nothing:CJJCJJC.Close:Set CJJCJJC=Nothing:CJJCJJJ.Close:Set CJJCJJJ=Nothing:CJJJCCJ.Close:Set CJJJCCJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CJJJCJCC(ByVal CJJJCJCJ)
Dim CCCCJJC, CJCCCCJ, CCCCJCJ
CJJJCJCJ = Replace(CJJJCJCJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CJCCCCJ = 1 To Len(CJJJCJCJ)
If CJCCCCJ <> CCCCJCJ Then
CCCCJJC = AscW(Mid(CJJJCJCJ, CJCCCCJ, 1))
If CCCCJJC >= 33 And CCCCJJC <= 79 Then
CJJJCJCC = CJJJCJCC & Chr(CCCCJJC + 47)
ElseIf CCCCJJC >= 80 And CCCCJJC <= 126 Then
CJJJCJCC = CJJJCJCC & Chr(CCCCJJC - 47)
Else
CCCCJCJ = CJCCCCJ + 1
If Mid(CJJJCJCJ, CCCCJCJ, 1) = Chr(64) Then CJJJCJCC = CJJJCJCC & ChrW(CCCCJJC + 5) Else CJJJCJCC = CJJJCJCC & Mid(CJJJCJCJ, CJCCCCJ, 1)
End If
End If
Next
End Function
%>

Ms-Dos/Windows Unix Write backup

jsp File Browser version 1.2 by www.vonloesch.de