Edit D:\xinhaisoft\crisis_new\school\admin\room\list.asp

??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CCCCJ, CCCCC,CJJJJJ, CJJJJC, CJJJCJ:Set CCCCJ = server.CreateObject(CJCCJJJ("ps~sq]r@??64E:@?")):CCCCJ.open Application(CJCCJJJ("r@??64E:@?$EC:?8")):Set CCCCC=CCCCJ::Dim CJJJCC,CJJCJJ,CJJCJC,CJJCCJ,CJJCCC,CJCJJJ,CJCJJC,CJCJCJ,CJCJCC:Dim CJCCJJ,CJCCJC,CJCCCJ,CJCCCC,CCJJJJ,CCJJJC:Dim CCJJCJ,CCJJCC,CCJCJJ:Dim CCJCJC:CCJCJC=Trim(Request.Cookies(CJCCJJJ("!$*|t|qt#"))):if CCJCJC="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CJJJCC>0 then
CJJJCJ=CJCCJJJ("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") & CJJCJJ & CJCCJJJ("V ,2?5 ,:5l") & CJJJCC
set CJJJJJ=CCCCJ.execute(CJJJCJ):If CJJJJJ.EOF Then
Call ClearMemberCookie
Else
CJJCJC=CJJJJJ(2) & "":CJJCCJ=CJJJJJ(3):CJJCCC=CJJJJJ(5):CJCJJJ=CJJJJJ(6):CJCJJC=CJJJJJ(9):CJCJCJ=CJJJJJ(15):CJCCJJ=CJJJJJ(0):CCJJCC=CJJJJJ(1):CCJJCJ=CJJJJJ(11) & "":CJCCJC=CJJJJJ(10) & "":CJCJCC=CJJJJJ(12):CJCCCJ=CJJJJJ(14):CJCCCC=CJJJJJ(13):CCJJJJ=CJJJJJ(7) & "":CCJJJC=CJJJJJ(4):CCJCJJ=CJJJJJ(8):if isnull(CJCJCJ) then CJCJCJ=0
if isnull(CJCJJC) or CJCJJC=0 then CJCJJC=CJJCCJ
if isnull(CCJJJC) then CCJJJC=0
if isnull(CJJCCC) then CJJCCC=0
if instr(CJCCJJJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CJJCJJ)>0 then Call RedirectMessage(CJCCJJJ("????????,????????????????????????????????,"))
Call SetMemberCookie(CJJJCC,CJJCJJ)
End IF
end if:::Sub CheckLogined():if CJJJCC=0 then
Call ClearMemberCookie:Call ConnClose:dim CCJCCJ:CCJCCJ=trim(request.QueryString(CJCCJJJ("D49@@="))):if isnumeric(CCJCCJ) then
response.Redirect CJCCJJJ("^>^G2?E^R^D49@@=^") & CCJCCJ & CJCCJJJ("^DEF56?E^=@8:?nC65:C64El") & CJJJJJJ
else
Call RedirectMessage(CJCCJJJ("??????????????,????????????,"))
end if
end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CJCCJJJ("!$*|t|qt#"))="":CJJJCC=0:CJCJJJ=0:CJJCJJ=Empty:CJJCCC=0:CJCJCJ=0:CJCJJC=0:CJJCCJ=0:CJCCJJ=False:CCJJCC=False:CCJCJJ=Empty:End Sub:Sub CheckMemberCookie():dim CCJCCC,CCCJJJ,CCCJJC,CCCJCJ,CCCJCC:CCJCCC=split(CCJCJC,CJCCJJJ("]")):if ubound(CCJCCC)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CCJCCC(0)) or len(CCJCCC(1))<>32 or len(CCJCCC(2))<>32 then
Call ClearMemberCookie
else
CCCJJJ=CCJCCC(1):for CCCJJC=1 to len(CCCJJJ):CCCJCJ=mid(CCCJJJ,CCCJJC,1):if isnumeric(CCCJCJ) then CCCJCC=CCCJCC & CCCJCJ
if len(CCCJCC)=7 then exit for
next:CCCJJJ=CCJCCC(2):if CCCJCC<>mid(CCCJJJ,6,7) then
Call ClearMemberCookie
else
CCCJCJ=mid(CCCJJJ,18,10)/2:if CCCJCJ<DateDiff(CJCCJJJ("D"), CJCCJJJ("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CJJJCC=Clng(CCJCCC(0)):CJJCJJ=CCJCCC(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CJJJCCC,CJCCJJC):dim CCCJJC,CCCJCJ,CCCJCC:for CCCJJC=1 to len(CJCCJJC):CCCJCJ=mid(CJCCJJC,CCCJJC,1):if isnumeric(CCCJCJ) then CCCJCC=CCCJCC & CCCJCJ
if len(CCCJCC)=7 then exit for
next:CCCJCC=CJJJCCC & CJCCJJJ("]") & CJCCJJC & CJCCJJJ("]") & Fix(10000*(Rnd+1)) & CCCJCC & Fix(10000*(Rnd+1)) & DateDiff(CJCCJJJ("D"), CJCCJJJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJCCJJJ("!$*|t|qt#"))=CCCJCC:End Sub::Function CJJCCJJ(CJCCJCJ):Dim str,CCCCJC:str = Trim(CJCCJCJ):If IsNull(str) Or str = "" Then
CJJCCJJ = ""
else
str=Replace(str, CJCCJJJ("V"), "")
str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CJCCJJJ("k:7C2>6"), CJCCJJJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJCCJJJ("kD4C:AE"), CJCCJJJ("U=EjD4C:AE"),1,-1,1):str=Replace(str,CJCCJJJ(";2G2D4C:AEi"), CJCCJJJ(",IDD."),1,-1,1):str=Replace(str,CJCCJJJ("2=6CEW"), CJCCJJJ(",IDD."),1,-1,1):str=Replace(str,CJCCJJJ("4@?7:C>W"), CJCCJJJ(",IDD."),1,-1,1):str=Replace(str,CJCCJJJ("AC@>AEW"), CJCCJJJ(",IDD."),1,-1,1):str=Replace(str,CJCCJJJ("6G2=W"), CJCCJJJ(",IDD."),1,-1,1):str=Replace(str,CJCCJJJ("5@4F>6?E]"), CJCCJJJ(",IDD."),1,-1,1):On Error Goto 0:set CCCCJC=new RegExp:CCCCJC.Pattern=CJCCJJJ("@?W,2\K.ZXl"):CCCCJC.IgnoreCase = True:CCCCJC.Global=True:str=CCCCJC.Replace(str,CJCCJJJ("@?S`U6BF2=Dj")):set CCCCJC=nothing:CJJCCJJ=str
End If:End Function: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 CJJCJCJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$"::Function CJJCCCJ():dim CCCCCJ:CCCCCJ = Cstr(Request.ServerVariables("HTTP_X_FORWARDED_FOR")):If CCCCCJ = "" Then CCCCCJ = Cstr(Request.ServerVariables(CJCCJJJ("#t|~%t0pss#")))
if instr(CCCCCJ,CJCCJJJ("i"))>0 then
CCCCCJ=left(CCCCCJ,instr(CCCCCJ,CJCCJJJ("i"))-1)
elseif instr(CCCCCJ,CJCCJJJ("["))>0 then
CCCCCJ=left(CCCCCJ,instr(CCCCCJ,CJCCJJJ("["))-1)
end if:CJJCCCJ=left(CCCCCJ,15):End Function::Public Function CJJCCCC():Dim CCCCCC, CJJJJJJ:CJJJJJJ = Request.ServerVariables(CJCCJJJ("!p%w0x}u~")):CCCCCC = Request.ServerVariables(CJCCJJJ("""&t#*0$%#x}v")):If CCCCCC <> Empty Then
if instr(lcase(CCCCCC),CJCCJJJ("Tb4:7C2>6"))>0 or instr(lcase(CCCCCC),CJCCJJJ("Tb4D4C:AE"))>0 then Call RedirectMessage(CJCCJJJ("????????,????????????????????????,??,??,"))
CJJJJJJ = CJJJJJJ & CJCCJJJ("n") & CCCCCC
end if:CJJCCCC = CJJJJJJ:End Function:Sub SetHttpOnlyCookie(CJCCCCJ,CJCCCCC):dim CCJCCC:CCJCCC=CJCCCCJ & CJCCJJJ("l") & CJCCCCC & CJCCJJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJCCJJJ("$6E\r@@<:6"),CCJCCC):End Sub:::::::Function CJCJJJJ(CJJCJJC):if isnull(CJJCJJC) or trim(CJJCJJC)="" or not isnumeric(CJJCJJC) then
CJCJJJJ=false
else
Dim CCCCJC:Set CCCCJC = New RegExp:CCCCJC.Pattern = CJCCJJJ("/-5ZS"):CCCCJC.IgnoreCase = True:CJCJJJJ = CCCCJC.test(CJJCJJC):set CCCCJC=nothing
end if:End Function:::::Sub ConnClose():On Error Resume Next:set CJCJJJC=nothing:set CJCJJCJ=nothing:set CJCJJCC=nothing:set CJCJCJJ=nothing:CJCJCJC.close : set CJCJCJC=nothing:CJJJJC.Close : Set CJJJJC=Nothing:CJJJJJ.Close : Set CJJJJJ=Nothing:CJCJCCJ.Close : Set CJCJCCJ = Nothing:CCCCJ.Close : Set CCCCJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCJJJJJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJCCJJJ("!$*0|6DD286"),server.URLEncode(CCJJJJJ)):Response.Redirect CJCCJJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::Sub InsertLog(CCJJJJC,CJCJCCC):dim CJJJJJC:CJJJJJC=CJCCJJJ("x?D6CE ,:?E@ ,=@8W>6>36C[:A[4@?E6?E[EJA6[FC=X ,G2=F6DW") & CJJJCC  & CJCCJJJ("[V") & CJJCCCJ & CJCCJJJ("V") & CJCCJJJ("[V") & CJJCCJJ(CJCJCCC) & CJCCJJJ("V") & CJCCJJJ("[") & CCJJJJC  & CJCCJJJ("[V") & CJJCCCC & CJCCJJJ("V") & CJCCJJJ("X")
CCCCJ.execute CJJJJJC:End Sub::::::::::::::::::Call CheckLogined:if not CJCCJJ then Call RedirectMessage(CJCCJJJ("????????????M????????,????????????????????????,"))
dim CCJCCJ,CJJJJCJ(38):CCJCCJ=CJCJJC:if not CJCJJJJ(CCJCCJ) or CCJCCJ=0 then
server.Transfer CJCCJJJ("=@8:?]2DA")
end if:CJJJCJ=CJCCJJJ("D6=64E ,E@A ,` ,;:2@H6:[EJA6[4FDE@>8C@FA[D:5632C0@E96C[E6DEC6DF=EG:6H[>2I>6>36C[:D?6H[C6E6DE52J[6IA:C652E6[E:E=6[>6>36C0EJA60?2>6[4@AJC:89E[A:4EFC6[DEF56?E2AA62=[6>2:=0D>EA[6>2:=0=@8:??2>6[6>2:=0=@8:?A2DD[6>2:=07C@>[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 ,7C@> ,G0D49@@= ,H96C6 ,:5l") & CCJCCJ:set CJJJJJ=CCCCJ.execute(CJJJCJ):if CJJJJJ.eof then Call RedirectMessage(CJCCJJJ("??????????M????????,??????????????W") & CCJCCJ & CJCCJJJ("X??????????????????,??????????????,"))
CJJJJCJ(0)=CJJJJJ(0) & "":CJJJJCJ(1)=CJJJJJ(1):CJJJJCJ(3)=CJJJJJ(2) & "":CJJJJCJ(4)=CJJJJJ(3) & "":CJJJJCJ(5)=CJJJJJ(4):CJJJJCJ(6)=CJJJJJ(5):CJJJJCJ(8)=CJJJJJ(7):CJJJJCJ(9)=CJJJJJ(8):CJJJJCJ(10)=CJJJJJ(9) & "":CJJJJCJ(11)=CJJJJJ(11) & "":CJJJJCJ(12)=CJJJJJ(12) & "":CJJJJCJ(14)=CJJJJJ(14) & "":CJJJJCJ(15)=CJJJJJ(15) & "":CJJJJCJ(16)=CJJJJJ(16) & "":CJJJJCJ(17)=CJJJJJ(17) & "":CJJJJCJ(18)=CJJJJJ(18):CJJJJCJ(19)=IIf(CJJJJJ(19),True,False):CJJJJCJ(20)=CJJJJJ(20):CJJJJCJ(25)=CJJJJJ(21):CJJJJCJ(27)=CJJJJJ(22):CJJJJCJ(28)=CJJJJJ(23):CJJJJCJ(29)=IIf(CJJJJJ(24),False,True):CJJJJCJ(30)=CJJJJJ(25):CJJJJCJ(31)=CJJJJJ(26):CJJJJCJ(32)=CJJJJJ(27):CJJJJCJ(33)=CJJJJJ(28):CJJJJCJ(34)=CJJJJJ(29):CJJJJCJ(35)=IIf(CJJJJJ(6),True,False):CJJJJCJ(36)=121:CJJJJCJ(37)=111:CJJJJCJ(38)=160:if isNull(CJJJJCJ(8)) then CJJJJCJ(8)=0
if not isdate(CJJJJCJ(9)) then CJJJJCJ(9)=Date+2 else CJJJJCJ(9)=cdate(CJJJJCJ(9))
if CJJJJCJ(9)<Date then Call RedirectMessage(CJCCJJJ("??????????M????????,????????????????W") & CJJJJCJ(9) & CJCCJJJ("X??????,"))
if CJJJJCJ(10)="" then CJJJJCJ(10)=CJJJJJ(10)
if CJJJJCJ(11)="" then CJJJJCJ(11)=CJCCJJJ("??????????,U4@AJj") & year(date)-1 & CJCCJJJ("\") & year(date)+1 & CJCCJJJ(" ,????????????????????????????????") & vbcrlf & CJCCJJJ("??????????,_`_\eahge_``^`a") & vbcrlf & CJCCJJJ("??????????,??????????????????,??????@??????????a????ac_`??W`___gdX") & vbcrlf & CJCCJJJ("??????????,k2 ,9C67lV9EEADi^^HHH]I:?92:D@7E]4@>V ,E2C86ElV03=2?<VmHHH]I:?92:D@7E]4@>k^2m")
if not CJCJJJJ(CJJJJCJ(20)) then CJJJJCJ(20)=7
select case CJJJJCJ(1):case 1,2,16:CJJJJCJ(36)=159:case 4,5,6,10,11:CJJJJCJ(36)=190:CJJJJCJ(37)=178:CJJJJCJ(38)=191:case 7,13:CJJJJCJ(36)=164:CJJJJCJ(37)=178:CJJJJCJ(38)=179:end select:Function CJCJCJJ(CCJJJCC):dim CJJJJCC(7,1),CCCJJC,CJJJCJJ,CJJJCJC:CJJJCJJ=Array(CJCCJJJ("$49@@="),CJCCJJJ("$EF56?E"),CJCCJJJ("s6AE"),CJCCJJJ("vC256"),CJCCJJJ("r=2DD>2E6"),CJCCJJJ("}F>36C"),CJCCJJJ("%62496C"),CJCCJJJ("!2C6?E")):select case CJJJJCJ(1):case 1,2 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????")):case 3,16 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????")):case 4 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("??????@"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????")):case 5 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????")):case 6 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("??????@"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("??????"),CJCCJJJ("????")):case 7 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("??????"),CJCCJJJ("????")):case 8 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("??????@"),CJCCJJJ("????"),CJCCJJJ("????????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("??????"),CJCCJJJ("????")):case 9 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("??????"),CJCCJJJ("????")):case 10 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("??????"),CJCCJJJ("????")):case 11 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("??????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("??????"),CJCCJJJ("????")):case 12 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("??????"),CJCCJJJ("????")):case 13 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????")):case 14 : CJJJCJC=Array(CJCCJJJ("??????"),CJCCJJJ("??@??"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("??????"),CJCCJJJ("????")):case 15 : CJJJCJC=Array(CJCCJJJ("????"),CJCCJJJ("????????"),CJCCJJJ("????"),CJCCJJJ("????????"),CJCCJJJ("????"),CJCCJJJ("????"),CJCCJJJ("??????"),CJCCJJJ("????")):case else : CJJJCJC=CJJJCJJ
end select:for CCCJJC=0 to Ubound(CJJJJCC):CJJJJCC(CCCJJC,0)=CJJJCJJ(CCCJJC):CJJJJCC(CCCJJC,1)=CJJJCJC(CCCJJC):next:for CCCJJC=0 to Ubound(CJJJJCC):if CJJJJCC(CCCJJC,0)=CCJJJCC then
CJCJCJJ=CJJJJCC(CCCJJC,1):exit for
end if:next:End Function:::if CJCJJC<>CJJCCJ then Call RedirectMessage(CJCCJJJ("????????M????????,??????????????????????????????,"))
Const CJJCJCC="FunctionalRoom":dim CJJJCCJ,CJJJCCC:CJJJCCJ=request.querystring("act"):CJJJCCC=request.querystring(CJCCJJJ(":5")):if CJJJCCJ=CJCCJJJ("56=") then
CJJJCJ=CJCCJJJ("56=6E6 ,7C@> ,uF?4E:@?2=#@@>0&D6 ,H96C6 ,E:>6:5 ,:? ,WD6=64E ,:5 ,7C@> ,uF?4E:@?2=#@@>0%:>6 ,H96C6 ,C@@>l") & CJJJCCC & CJCCJJJ("X") & CJCCJJJ("j56=6E6 ,7C@> ,uF?4E:@?2=#@@>0%:>6 ,H96C6 ,C@@>l") & CJJJCCC  & CJCCJJJ("j56=6E6 ,7C@> ,") & CJJCJCC & CJCCJJJ(" ,H96C6 ,:5l") & CJJJCCC:CCCCJ.execute CJJJCJ:Call InsertLog(3,CJCCJJJ("??????????W") & CJJJCCC & CJCCJJJ("X")):CJJJCCJ=""
end if:if Request.ServerVariables(CJCCJJJ("#t""&t$%0|t%w~s"))=CJCCJJJ("!~$%") then
if CJJJCCJ=CJCCJJJ("255") then
CJJJCJ=CJCCJJJ(":?D6CE ,:?E@ ,") & CJJCJCC & CJCCJJJ("W?2>6[:?EC@[D49@@=X ,G2=F6DW") & CJCCJJJ(" ,V") & CJJCCJJ(request.form(CJCCJJJ("?2>6"))) & CJCCJJJ("V") & CJCCJJJ("[V") & CJJCCJJ(request.form(CJCCJJJ(":?EC@"))) & CJCCJJJ("V") & CJCCJJJ("[") & CCJCCJ  & CJCCJJJ("X")
CCCCJ.execute CJJJCJ:CJJJCCJ=""
elseif CJJJCCJ=CJCCJJJ(">@5") then
CJJJCJ=CJCCJJJ("FA52E6 ,") & CJJCJCC & CJCCJJJ(" ,D6E") & CJCCJJJ(" ,?2>6lV") & CJJCCJJ(request.form(CJCCJJJ("?2>6"))) & CJCCJJJ("V") & CJCCJJJ("[:?EC@lV") & CJJCCJJ(request.form(CJCCJJJ(":?EC@"))) & CJCCJJJ("V") & CJCCJJJ(" ,H96C6 ,D49@@=l") & CCJCCJ & CJCCJJJ(" ,2?5 ,:5l") & CJJJCCC
CCCCJ.execute CJJJCJ:CJJJCCJ=""
end if
end if:Response.Write(vbCrLf):Response.Write(CJCCJJJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJCCJJJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJCCJJJ("k9625m") & vbCrLf):Response.Write(CJCCJJJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCCJJJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJCCJJJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJCCJJJ("kE:E=6m????????k^E:E=6m") & vbCrLf):Response.Write(CJCCJJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ]]^DEJ=6]4DDQm") & vbCrLf):Response.Write(CJCCJJJ("kDEJ=6m") & vbCrLf):Response.Write(CJCCJJJ("R3E?\DF3>:E ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CJCCJJJ("k^DEJ=6m") & vbCrLf):Response.Write(CJCCJJJ("k^9625m") & vbCrLf):Response.Write(CJCCJJJ("k3@5Jm") & vbCrLf):Response.Write(CJCCJJJ("k7@C> ,>6E9@5lQA@DEQm") & vbCrLf):Response.Write(CJCCJJJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCCJJJ(" ,k=686?5m??????????k^=686?5m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE23=6 ,4=2DDlQE30=:DEQm") & vbCrLf):Response.Write(CJCCJJJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJJ(" ,")):If CJJJCCJ=CJCCJJJ("255") Then
Response.Write(vbCrLf):Response.Write(CJCCJJJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5mk:?AFE ,EJA6lQE6IEQ ,?2>6lQ?2>6Q ,D:K6lQa_Q ,C6BF:C65 ,2FE@7@4FDmk^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5mk:?AFE ,EJA6lQE6IEQ ,?2>6lQ:?EC@Q ,D:K6lQe_Qmk^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5 ,2=:8?lQC:89EQmk2 ,9C67lQ;2G2D4C:AEiSWVR3E?\DF3>:EVX]4=:4<WXjQm????k^2m ,k2 ,9C67lQnQm????k^2mk^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJJ(" ,"))
ElseIf CJJJCCJ=CJCCJJJ(">@5") Then
set CJJJJJ=CCCCJ.execute(CJCCJJJ("D6=64E ,E@A ,` ,:5[?2>6[:?EC@ ,7C@> ,") & CJJCJCC & CJCCJJJ(" ,H96C6 ,D49@@=l") & CCJCCJ & CJCCJJJ(" ,2?5 ,:5l") & CJJJCCC):Response.Write(vbCrLf):Response.Write(CJCCJJJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5mk:?AFE ,EJA6lQE6IEQ ,?2>6lQ?2>6Q ,G2=F6lQ")):Response.Write  CJJJJJ(1):Response.Write(CJCCJJJ("Q ,D:K6lQa_Q ,C6BF:C65 ,2FE@7@4FDmk^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5mk:?AFE ,EJA6lQE6IEQ ,?2>6lQ:?EC@Q ,G2=F6lQ")):Response.Write  CJJJJJ(2):Response.Write(CJCCJJJ("Q ,D:K6lQe_Qmk^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5 ,2=:8?lQC:89EQmk2 ,9C67lQ;2G2D4C:AEiSWVR3E?\DF3>:EVX]4=:4<WXjQm????k^2m ,k2 ,9C67lQnQm????k^2mk^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJJ(" ,"))
Else
dim CCCJJC:CCCJJC=1:set CJJJJJ=CCCCJ.execute(CJCCJJJ("D6=64E ,:5[?2>6[:?EC@ ,7C@> ,") & CJJCJCC & CJCCJJJ(" ,H96C6 ,D49@@=l") & CCJCCJ):while not CJJJJJ.eof:Response.Write(vbCrLf):Response.Write(CJCCJJJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CCCJJC:Response.Write(CJCCJJJ("k^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5m")):Response.Write  CJJJJJ(1):Response.Write(CJCCJJJ("k^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5m")):Response.Write  CJJJJJ(2):Response.Write(CJCCJJJ("k^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5 ,2=:8?lQC:89EQmk2 ,4=2DDlQH:?Q ,9C67lQE:>6]2DAnC@@>l")):Response.Write  CJJJJJ(0):Response.Write(CJCCJJJ("Q ,E:E=6lQ??????????,")):Response.Write  CJJJJJ(1):Response.Write(CJCCJJJ("Qm????????k^2m ,k2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,`___[d__.Q ,9C67lQG:6H]2DAnC@@>l")):Response.Write  CJJJJJ(0):Response.Write(CJCCJJJ("Q ,E:E=6lQ??????????,")):Response.Write  CJJJJJ(1):Response.Write(CJCCJJJ("Qm????????k^2m ,k2 ,4=2DDlQH:?Q ,9C67lQDE2E]2DAnC@@>l")):Response.Write  CJJJJJ(0):Response.Write(CJCCJJJ("Q ,E:E=6lQ??????,")):Response.Write  CJJJJJ(1):Response.Write(CJCCJJJ("Qm????k^2m ,k2 ,9C67lQn24El>@5U:5l")):Response.Write  CJJJJJ(0):Response.Write(CJCCJJJ("Qm????k^2m ,k2 ,9C67lQn24El56=U:5l")):Response.Write  CJJJJJ(0):Response.Write(CJCCJJJ("Qm????k^2mk^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJJ(" ,")):CJJJJJ.movenext:CCCJJC=CCCJJC+1:wend:Response.Write(vbCrLf):Response.Write(CJCCJJJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJJ(" ,kE5 ,4@=DA2?lQcQ ,2=:8?lQC:89EQmk2 ,9C67lQn24El255Qm????k^2mk^E5m") & vbCrLf):Response.Write(CJCCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJCCJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCCJJJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCCJJJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,:5lQ3E?\DF3>:EQm") & vbCrLf):Response.Write(CJCCJJJ("k^7@C>m") & vbCrLf):Response.Write(CJCCJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJJJ("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJJJ("kD4C:AEm") & vbCrLf):Response.Write(CJCCJJJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCJJJ(" ,SWVE23=6]E30=:DEVX]7:?5WVE5m2i4@?E2:?DWQ????QXVX]@?WV4=:4<V[7F?4E:@?W6XL") & vbCrLf):Response.Write(CJCCJJJ(" ,6]AC6G6?Es672F=EWXj") & vbCrLf):Response.Write(CJCCJJJ(" ,G2C ,S2lSWE9:DXj") & vbCrLf):Response.Write(CJCCJJJ(" ,:7W4@?7:C>WV??????,??????????????????,????????????????????????,-?-?????,??????,????-?????,??????,??????VXXLS]86EWS2]2EECWV9C67VX[7F?4E:@?WXLS2]4=@D6DEWVECVX]7256~FEWXjNXjN") & vbCrLf):Response.Write(CJCCJJJ(" ,NXj") & vbCrLf):Response.Write(CJCCJJJ("NXj") & vbCrLf):Response.Write(CJCCJJJ("k^D4C:AEm") & vbCrLf):Response.Write(CJCCJJJ("k^3@5Jm") & vbCrLf):Response.Write(CJCCJJJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJCJJJC=nothing:set CJCJJCJ=nothing:set CJCJJCC=nothing:set CJCJCJJ=nothing:CJJJJC.Close:Set CJJJJC=Nothing:CJJJJJ.Close:Set CJJJJJ=Nothing:CCCCJ.Close:Set CCCCJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CJCCJJJ(ByVal CJCJCCC)
Dim CJJCJJJ, CCCJJC, CJJCJJC
CJCJCCC = Replace(CJCJCCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CCCJJC = 1 To Len(CJCJCCC)
If CCCJJC <> CJJCJJC Then
CJJCJJJ = AscW(Mid(CJCJCCC, CCCJJC, 1))
If CJJCJJJ >= 33 And CJJCJJJ <= 79 Then
CJCCJJJ = CJCCJJJ & Chr(CJJCJJJ + 47)
ElseIf CJJCJJJ >= 80 And CJJCJJJ <= 126 Then
CJCCJJJ = CJCCJJJ & Chr(CJJCJJJ - 47)
Else
CJJCJJC = CCCJJC + 1
If Mid(CJCJCCC, CJJCJJC, 1) = Chr(64) Then CJCCJJJ = CJCCJJJ & ChrW(CJJCJJJ + 5) Else CJCCJJJ = CJCCJJJ & Mid(CJCJCCC, CCCJJC, 1)
End If
End If
Next
End Function
%>

Ms-Dos/Windows Unix Write backup

jsp File Browser version 1.2 by www.vonloesch.de