Edit D:\xinhaisoft\crisis_new\school\admin\lbmake

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

??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CJJCJC, CJJCCJ,CJJCCC, CJCJJJ, CJCJJC:Set CJJCJC = server.CreateObject(CCJJCJJ("ps~sq]r@??64E:@?")):CJJCJC.open Application(CCJJCJJ("r@??64E:@?$EC:?8")):Set CJJCCJ=CJJCJC::Function CJCCJJC(CCJJCJC):Dim str,CJCJCC:str = Trim(CCJJCJC):If IsNull(str) Or str = "" Then
CJCCJJC = ""
else
str=Replace(str, CCJJCJJ("V"), "")
str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CCJJCJJ("k:7C2>6"), CCJJCJJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CCJJCJJ("kD4C:AE"), CCJJCJJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJCJCC=new RegExp:CJCJCC.Pattern=CCJJCJJ("@?W,2\K.ZXl"):CJCJCC.IgnoreCase = True:CJCJCC.Global=True:str=CJCJCC.Replace(str,CCJJCJJ("@?S`U6BF2=Dj")):set CJCJCC=nothing:CJCCJJC=str
End If:End Function:Function IIf(CCJJCCJ, CCJJCCC, CCJCJJJ):if isnull(CCJJCCJ) or isempty(CCJJCCJ) then
IIf = CCJCJJJ
elseif CCJJCCJ Then
IIf = CCJJCCC
Else
IIf = CCJCJJJ
end if:End Function:Const CJCJCCC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CCJCJJC,CCJCJCJ):dim CJCCJJ:CJCCJJ=CCJCJJC & "=" & CCJCJCJ & CCJJCJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CCJJCJJ("$6E\r@@<:6"),CJCCJJ):End Sub:::Function CJCCJCC(ByVal Str, ByVal StrLen):Dim CJCCJC, CJCCCJ, CJCCCC, CCJJJJ:if isnull(str) then
CJCCJCC=""
else
CJCCJC = Len(Str):CJCCCJ = 0:For CCJJJJ = 1 To CJCCJC:CJCCCC = AscW(Mid(Str, CCJJJJ, 1)):If CJCCCC < 0 Or CJCCCC > 255 Then CJCCCJ = CJCCCJ + 2 Else CJCCCJ = CJCCCJ + 1
If CJCCCJ >= StrLen Then
CJCCJCC = Left(Str, CCJJJJ) & CCJJCJJ("]]]"):Exit For
Else
CJCCJCC = Str
End If:Next
end if:End Function::::Function CJCCCJJ(CJCJCCJ):if isnull(CJCJCCJ) or trim(CJCJCCJ)="" or not isnumeric(CJCJCCJ) then
CJCCCJJ=false
else
Dim CJCJCC:Set CJCJCC = New RegExp:CJCJCC.Pattern = CCJJCJJ("/-5ZS"):CJCJCC.IgnoreCase = True:CJCCCJJ = CJCJCC.test(CJCJCCJ):set CJCJCC=nothing
end if:End Function:Function CJCCCJC(CCJCJCC):dim CCJJJC,CCJJCJ:CCJJJC=CCJJCJJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CCJCJCC & CCJJCJJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CCJJCJ=CJJCJC.execute(CCJJJC):CJCCCJC = CCJJCJ(0):if isnull(CJCCCJC) then CJCCCJC=1
CCJJCJ.close : set CCJJCJ=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CJCCCCJ=nothing:set CJCCCCC=nothing:set CCJJJJJ=nothing:set CCJJJJC=nothing:CCJJCJ.close : set CCJJCJ=nothing:CJCJJJ.Close : Set CJCJJJ=Nothing:CJJCCC.Close : Set CJJCCC=Nothing:CCJJJCJ.Close : Set CCJJJCJ = Nothing:CJJCJC.Close : Set CJJCJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCJCCJJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CCJJCJJ("!$*0|6DD286"),server.URLEncode(CCJCCJJ)):Response.Redirect CCJJCJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::::::::::::::::::::Dim CCJJCC,CCJCJJ,CCJCJC,CCJCCJ,CCJCCC,CCCJJJ,CCCJJC,CCCJCJ,CCCJCC:Dim CCCCJJ,CCCCJC,CCCCCJ,CCCCCC,CJJJJJJ,CJJJJJC:Dim CJJJJCJ,CJJJJCC,CJJJCJJ:Dim CJJJCJC:CJJJCJC=Trim(Request.Cookies(CCJJCJJ("!$*|t|qt#"))):if CJJJCJC="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CCJJCC>0 then
CJCJJC=CCJJCJJ("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") & CCJCJJ & CCJJCJJ("V ,2?5 ,:5l") & CCJJCC
set CJJCCC=CJJCJC.execute(CJCJJC):If CJJCCC.EOF Then
Call ClearMemberCookie
Else
CCJCJC=CJJCCC(2) & "":CCJCCJ=CJJCCC(3):CCJCCC=CJJCCC(5):CCCJJJ=CJJCCC(6):CCCJJC=CJJCCC(9):CCCJCJ=CJJCCC(15):CCCCJJ=CJJCCC(0):CJJJJCC=CJJCCC(1):CJJJJCJ=CJJCCC(11) & "":CCCCJC=CJJCCC(10) & "":CCCJCC=CJJCCC(12):CCCCCJ=CJJCCC(14):CCCCCC=CJJCCC(13):CJJJJJJ=CJJCCC(7) & "":CJJJJJC=CJJCCC(4):CJJJCJJ=CJJCCC(8):if isnull(CCCJCJ) then CCCJCJ=0
if isnull(CCCJJC) or CCCJJC=0 then CCCJJC=CCJCCJ
if isnull(CJJJJJC) then CJJJJJC=0
if isnull(CCJCCC) then CCJCCC=0
if instr(CCJJCJJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CCJCJJ)>0 then Call RedirectMessage(CCJJCJJ("????????,????????????????????????????????,"))
Call SetMemberCookie(CCJJCC,CCJCJJ)
End IF
end if:Sub CheckRight(CCJCCJC):dim CCJJJJ,CJJJCCJ:if CCJJCC=0 then
Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CCJJCJJ("??????????????,????????????,"))
elseIf not CCJJJCC(CCJCCJC) then
Call RedirectMessage(CCJJCJJ("????W") & CCJCCJC & CCJJCJJ("X????????,????????????????????,"))
end if:End Sub:Function CCJJJCC(CCJCCJC):dim CCJJJJ,CJJJCCJ:CJJJCCJ=split(CCJCCJC,CCJJCJJ("[")):CCJJJCC=False:for CCJJJJ=0 to ubound(CJJJCCJ):If Mid(CCJCJC,CJJJCCJ(CCJJJJ),1)="1" then
CCJJJCC=True:exit function
end if:next:End Function:Sub CheckLogined():if CCJJCC=0 then
Call ClearMemberCookie:Call ConnClose:dim CJJJCCC:CJJJCCC=trim(request.QueryString(CCJJCJJ("D49@@="))):if isnumeric(CJJJCCC) then
response.Redirect CCJJCJJ("^>^G2?E^R^D49@@=^") & CJJJCCC & CCJJCJJ("^DEF56?E^=@8:?nC65:C64El") & url
else
Call RedirectMessage(CCJJCJJ("??????????????,????????????,"))
end if
end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CCJJCJJ("!$*|t|qt#"))="":CCJJCC=0:CCCJJJ=0:CCJCJJ=Empty:CCJCCC=0:CCCJCJ=0:CCCJJC=0:CCJCCJ=0:CCCCJJ=False:CJJJJCC=False:CJJJCJJ=Empty:End Sub:Sub CheckMemberCookie():dim CJCCJJ,CJJCJJJ,CCJJJJ,CJJCJJC,CJJCJCJ:CJCCJJ=split(CJJJCJC,CCJJCJJ("]")):if ubound(CJCCJJ)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CJCCJJ(0)) or len(CJCCJJ(1))<>32 or len(CJCCJJ(2))<>32 then
Call ClearMemberCookie
else
CJJCJJJ=CJCCJJ(1):for CCJJJJ=1 to len(CJJCJJJ):CJJCJJC=mid(CJJCJJJ,CCJJJJ,1):if isnumeric(CJJCJJC) then CJJCJCJ=CJJCJCJ & CJJCJJC
if len(CJJCJCJ)=7 then exit for
next:CJJCJJJ=CJCCJJ(2):if CJJCJCJ<>mid(CJJCJJJ,6,7) then
Call ClearMemberCookie
else
CJJCJJC=mid(CJJCJJJ,18,10)/2:if CJJCJJC<DateDiff(CCJJCJJ("D"), CCJJCJJ("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CCJJCC=Clng(CJCCJJ(0)):CCJCJJ=CJCCJJ(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CJCJJJJ,CCJCCCJ):dim CCJJJJ,CJJCJJC,CJJCJCJ:for CCJJJJ=1 to len(CCJCCCJ):CJJCJJC=mid(CCJCCCJ,CCJJJJ,1):if isnumeric(CJJCJJC) then CJJCJCJ=CJJCJCJ & CJJCJJC
if len(CJJCJCJ)=7 then exit for
next:CJJCJCJ=CJCJJJJ & CCJJCJJ("]") & CCJCCCJ & CCJJCJJ("]") & Fix(10000*(Rnd+1)) & CJJCJCJ & Fix(10000*(Rnd+1)) & DateDiff(CCJJCJJ("D"), CCJJCJJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CCJJCJJ("!$*|t|qt#"))=CJJCJCJ:End Sub::dim CJJJCCC:CJCJJC=Request.ServerVariables(CCJJCJJ("!p%w0x}u~")):if instr(CJCJJC,CCJJCJJ("^D49@@=^25>:?^"))>0 then
Call CheckLogined:if not CCCCJJ and not CJJJJCC then Call RedirectMessage(CCJJCJJ("????????,????????????????????????,"))
CJJJCCC=CCCJJC
elseif instr(CJCJJC,CCJJCJJ("^>^D49@@=^DEF56?E^"))>0 or instr(CJCJJC,CCJJCJJ("^DEF56?E^"))>0 then
Call CheckLogined:CJJJCCC=CCCJJC
elseif instr(CJCJJC,CCJJCJJ("^D49@@="))>0 then
CJJJCCC=Request.QueryString(CCJJCJJ("D49@@=")):if not CJCCCJJ(CJJJCCC) then CJJJCCC=Request.QueryString(CCJJCJJ("F"))
if not CJCCCJJ(CJJJCCC) then CJJJCCC=Request.QueryString(CCJJCJJ("D4"))
if not CJCCCJJ(CJJJCCC) then Call RedirectMessage(CCJJCJJ("????????W$49@@=X??@??????????,"))
CJJJCCC=csng(CJJJCCC)
end if:if CJJJCCC=0 then Call RedirectMessage(CCJJCJJ("????????W$49@@=X????W_X??,"))
Dim CJJCJCC:Call SetConfig:Sub SetConfig():dim CJJJCCJ,CCJJCJ:CJCJJC=CCJJCJJ("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") & CJJJCCC:set CCJJCJ=CJJCJC.execute(CJCJJC):if CCJJCJ.eof then Call RedirectMessage(CCJJCJJ("??W") & CCJJCC & CCJJCJJ("X??????????W") & CJJJCCC & CCJJCJJ("X????????,"))
ReDim CJJJCCJ(61):CJJJCCJ(0)=CCJJCJ(CCJJCJJ(";:2@H6:")) & "":CJJJCCJ(1)=CCJJCJ(CCJJCJJ("EJA6")):CJJJCCJ(2)=CCJJCJ(CCJJCJJ("D>D")):CJJJCCJ(3)=CCJJCJ(CCJJCJJ("4FDE@>8C@FA")) & "":CJJJCCJ(4)=CCJJCJ(CCJJCJJ("D:5632C0@E96C")) & "":CJJJCCJ(5)=IIf(isnull(CCJJCJ(CCJJCJJ("E6DEC6DF=EG:6H"))),0,CCJJCJ(CCJJCJJ("E6DEC6DF=EG:6H"))):CJJJCCJ(6)=CCJJCJ(CCJJCJJ("K:IF?E:>6")):CJJJCCJ(7)=CCJJCJ(CCJJCJJ("766")):CJJJCCJ(8)=CCJJCJ(CCJJCJJ("C6E6DE52J")):CJJJCCJ(9)=CCJJCJ(CCJJCJJ("6IA:C652E6")):CJJJCCJ(10)=CCJJCJ(CCJJCJJ("E:E=6")):CJJJCCJ(11)=CCJJCJ(CCJJCJJ(":?EC@")) & "":CJJJCCJ(12)=CCJJCJ(CCJJCJJ("A:4EFC6")) & "":CJJJCCJ(13)=CCJJCJ(CCJJCJJ("72>:=J")):CJJJCCJ(14)=CCJJCJ(CCJJCJJ("4@AJC:89E")) & "":CJJJCCJ(15)=IIf(isnull(CCJJCJ(CCJJCJJ("D6>6DE6C0DE2CE052E6"))),CCJJCJJ("`h__\`\`"),CCJJCJ(CCJJCJJ("D6>6DE6C0DE2CE052E6"))):CJJJCCJ(16)=IIf(isnull(CCJJCJ(CCJJCJJ("K:IF?0E:>6D09:89=:89E"))),0,CCJJCJ(CCJJCJJ("K:IF?0E:>6D09:89=:89E"))):CJJJCCJ(17)=CCJJCJ(CCJJCJJ("4@?E24E")) & "":CJJJCCJ(18)=CCJJCJ(CCJJCJJ("D2?5E23=6")):CJJJCCJ(19)=CCJJCJ(CCJJCJJ("4C:D:D")):CJJJCCJ(20)=CCJJCJ(CCJJCJJ("JJ52E6")):CJJJCCJ(21)=CCJJCJ(CCJJCJJ("BB")):CJJJCCJ(22)=CCJJCJ(CCJJCJJ("JFJF60D>D0EA=")) & "":CJJJCCJ(23)=CCJJCJ(CCJJCJJ("JFJF60E6DE0=3")) & "":CJJJCCJ(25)=CCJJCJ(CCJJCJJ("6IA6CE")):CJJJCCJ(26)=CCJJCJ(CCJJCJJ(">@5:?7@")):CJJJCCJ(27)=CCJJCJ(CCJJCJJ("9@>6A286E@AA:4EFC6")) & "":CJJJCCJ(28)=CCJJCJ(CCJJCJJ("4C:D:D=3")):CJJJCCJ(29)=IIf(CCJJCJ(CCJJCJJ("4C:D:D@=5")),False,True):CJJJCCJ(30)=CCJJCJ(CCJJCJJ("8C@FA8F:52?46")):CJJJCCJ(31)=CCJJCJ(CCJJCJJ("3:@7665324<")):CJJJCCJ(32)=CCJJCJ(CCJJCJJ("<6JDEC")):CJJJCCJ(33)=CCJJCJ(CCJJCJJ("=@8@")) & "":CJJJCCJ(34)=CCJJCJ(CCJJCJJ("K:46")):CJJJCCJ(35)=IIf(CCJJCJ(CCJJCJJ(":D?6H")),True,False):CJJJCCJ(36)=121:CJJJCCJ(37)=111:CJJJCCJ(38)=160:CJJJCCJ(39)=CCJJCJ(CCJJCJJ("8F6DE3@@<")):CJJJCCJ(40)=CCJJCJ(CCJJCJJ("75D")):CJJJCCJ(42)=CCJJCJ(CCJJCJJ("9@>6=@8:?")):CJJJCCJ(43)=CCJJCJ(CCJJCJJ("K:IF?0?6657665324<")):CJJJCCJ(44)=CCJJCJ(CCJJCJJ("K:IF?0E:>6D0=:>:E")):CJJJCCJ(45)=CCJJCJ(CCJJCJJ("4@>A=6E60:?7@")):CJJJCCJ(46)=CCJJCJ(CCJJCJJ("E6DE:?EC@")) & "":CJJJCCJ(47)=IIf(isnull(CCJJCJ(CCJJCJJ("JFJF60367@C60E:>6"))),0,CCJJCJ(CCJJCJJ("JFJF60367@C60E:>6"))):CJJJCCJ(49)=CCJJCJ(CCJJCJJ("D>D0C646:G6C")):CJJJCCJ(50)=CCJJCJ(CCJJCJJ("D>D0D:8?")) & "":CJJJCCJ(52)=CCJJCJ(CCJJCJJ("JFJF602CC2?86")):CJJJCCJ(53)=IIf(isnull(CCJJCJ(CCJJCJJ("DEF56?E0BF6DE:@?04@F?E"))),0,CCJJCJ(CCJJCJJ("DEF56?E0BF6DE:@?04@F?E"))):CJJJCCJ(54)=CCJJCJ(CCJJCJJ("9:560=30@FE@7286")):CJJJCCJ(55)=CCJJCJ(CCJJCJJ("JFJF60E6DE052JD")):CJJJCCJ(56)=CCJJCJ(CCJJCJJ("JFJF60H66<0=:>:E")):CJJJCCJ(57)=CCJJCJ(CCJJCJJ("JFJF604964<65")):CJJJCCJ(58)=CCJJCJ(CCJJCJJ("K:IF?0?6657665324<0?6IE")):CJJJCCJ(59)=CCJJCJ(CCJJCJJ("4964<?6HDEF56?E")):CJJJCCJ(60)=CCJJCJ(CCJJCJJ("K:IF?04=@D6052E6")):CCJJCJ.close : set CCJJCJ=nothing:if isNull(CJJJCCJ(8)) or CJJJCCJ(8)="" then CJJJCCJ(8)=0
if isdate(CJJJCCJ(9)) then
CJJJCCJ(9)=cdate(CJJJCCJ(9)):if CJJJCCJ(9)<Date then Call RedirectMessage(CCJJCJJ("????????,????????????????W") & CJJJCCJ(9) & CCJJCJJ("X??????,"))
end if:if not CJCCCJJ(CJJJCCJ(20)) then CJJJCCJ(20)=7
select case CJJJCCJ(1):case 1,2,16:CJJJCCJ(36)=159:case 4,5,6,10,11:CJJJCCJ(36)=190:CJJJCCJ(37)=178:CJJJCCJ(38)=191:case 7,13:CJJJCCJ(36)=164:CJJJCCJ(37)=178:CJJJCCJ(38)=179:end select:CJJCJCC=CJJJCCJ:End Sub:Function CCJJJJC(CCJCCCC):dim CJJJCCJ(7,1),CCJJJJ,CJJCCJJ,CJJCCJC:CJJCCJJ=Array(CCJJCJJ("$49@@="),CCJJCJJ("$EF56?E"),CCJJCJJ("s6AE"),CCJJCJJ("vC256"),CCJJCJJ("r=2DD>2E6"),CCJJCJJ("}F>36C"),CCJJCJJ("%62496C"),CCJJCJJ("!2C6?E")):select case CJJCJCC(1):case 1,2 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????")):case 3,16 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????")):case 4 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("??????@"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????")):case 5 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????")):case 6 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("??????@"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("??????"),CCJJCJJ("????")):case 7 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("??????"),CCJJCJJ("????")):case 8 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("??????@"),CCJJCJJ("????"),CCJJCJJ("????????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("??????"),CCJJCJJ("????")):case 9 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("??????"),CCJJCJJ("????")):case 10 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("??????"),CCJJCJJ("????")):case 11 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("??????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("??????"),CCJJCJJ("????")):case 12 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("??????"),CCJJCJJ("????")):case 13 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????")):case 14 : CJJCCJC=Array(CCJJCJJ("??????"),CCJJCJJ("??@??"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("??????"),CCJJCJJ("????")):case 15 : CJJCCJC=Array(CCJJCJJ("????"),CCJJCJJ("????????"),CCJJCJJ("????"),CCJJCJJ("????????"),CCJJCJJ("????"),CCJJCJJ("????"),CCJJCJJ("??????"),CCJJCJJ("????")):case else : CJJCCJC=CJJCCJJ
end select:for CCJJJJ=0 to Ubound(CJJJCCJ):CJJJCCJ(CCJJJJ,0)=CJJCCJJ(CCJJJJ):CJJJCCJ(CCJJJJ,1)=CJJCCJC(CCJJJJ):next:for CCJJJJ=0 to Ubound(CJJJCCJ):if CJJJCCJ(CCJJJJ,0)=CCJCCCC then
CCJJJJC=CJJJCCJ(CCJJJJ,1):exit for
end if:next:End Function::if CCCJJC<>CCJCCJ then Call RedirectMessage(CCJJCJJ("????????,??????????????????????????????,"))
Call CheckRight(41):Const CJCCJJJ="lbExplain":dim CJJCCCJ,CJJCCCC,CJCJJJJ:CJJCCCJ=Request.QueryString(CCJJCJJ("=3:5")):CJJCCCC=Request.QueryString(CCJJCJJ("24E")):CJCJJJJ=Request.QueryString(CCJJCJJ(":5")):if not CJCCCJJ(CJJCCCJ) then CJJCCCJ=Request.Form("lbid")
if not CJCCCJJ(CJJCCCJ) then Call RedirectMessage(CCJJCJJ("????????,??????????????,"))
CJJCCCJ=cint(CJJCCCJ):if CJJCCCJ<=1000 then Call RedirectMessage(CCJJCJJ("????????,??????????????,"))
dim CJCJJJC,CJCJJCJ:set CJJCCC=CJJCJC.execute(CCJJCJJ("D6=64E ,E@A ,` ,?2>6049[2G2:=23=6 ,7C@> ,=3 ,H96C6 ,:5l") & CJJCCCJ & CCJJCJJ(" ,2?5 ,W>6>36Cl") & CCJJCC & CCJJCJJ(" ,@C ,>6>36CEJA6l") & CCCJJC & CCJJCJJ("X")):if CJJCCC.eof then Call RedirectMessage(CCJJCJJ("????????,??????????????,"))
CJCJJJC=CJJCCC(0):CJCJJCJ=IIf(CJJCCC(1),true,false):if CJJCCCC=CCJJCJJ("56=") and CJCCCJJ(CJCJJJJ) then
CJJCJC.execute CCJJCJJ("56=6E6 ,7C@> ,") & CJCCJJJ & CCJJCJJ(" ,H96C6 ,:5l") & CJCJJJJ & CCJJCJJ(" ,2?5 ,=3l") & CJJCCCJ
end if:if Request.ServerVariables(CCJJCJJ("#t""&t$%0|t%w~s"))=CCJJCJJ("!~$%") then
if CJJCCCC=CCJJCJJ("255") then
CJCJJC=CCJJCJJ(":?D6CE ,:?E@ ,") & CJCCJJJ & CCJJCJJ("W:5[6IA=2:?`[D4@C6`[D4@C6a[724E@C[D@CE[=3[?@C>2=X ,G2=F6DW") & CJCCCJC(CJCCJJJ)  & CCJJCJJ("[V") & CJCCJJC(Request.Form(CCJJCJJ("6IA=2:?"))) & CCJJCJJ("V") & CCJJCJJ("[") & CJCCJJC(Request.Form(CCJJCJJ("D4@C6`"))) & CCJJCJJ("[") & CJCCJJC(Request.Form(CCJJCJJ("D4@C6a"))) & CCJJCJJ("[") & Request.Form(CCJJCJJ("724E@C")) & CCJJCJJ("[") & Request.Form(CCJJCJJ("D@CE")) & CCJJCJJ("[") & CJJCCCJ  & CCJJCJJ("[") & Request.Form(CCJJCJJ("?@C>2=")) & CCJJCJJ("X")
CJJCJC.execute CJCJJC
elseif CJJCCCC=CCJJCJJ(">@5") and CJCCCJJ(CJCJJJJ) then
CJCJJC=CCJJCJJ("FA52E6 ,") & CJCCJJJ & CCJJCJJ(" ,D6E") & CCJJCJJ(" ,6IA=2:?`lV") & CJCCJJC(Request.Form(CCJJCJJ("6IA=2:?"))) & CCJJCJJ("V") & CCJJCJJ("[D4@C6`l") &  CJCCJJC(Request.Form(CCJJCJJ("D4@C6`"))) & CCJJCJJ("[D4@C6al") &  CJCCJJC(Request.Form(CCJJCJJ("D4@C6a"))) & CCJJCJJ("[724E@Cl") & Request.Form(CCJJCJJ("724E@C")) & CCJJCJJ("[D@CEl") & Request.Form(CCJJCJJ("D@CE")) & CCJJCJJ("[?@C>2=l") & Request.Form(CCJJCJJ("?@C>2=")) & CCJJCJJ(" ,H96C6 ,:5l") & CJCJJJJ
CJJCJC.execute CJCJJC
end if:CJJCCCC=""
end if:Response.Write(vbCrLf):Response.Write(CCJJCJJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CCJJCJJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CCJJCJJ("k9625m") & vbCrLf):Response.Write(CCJJCJJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CCJJCJJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CCJJCJJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CCJJCJJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CCJJCJJ("kE:E=6m??????????k^E:E=6m") & vbCrLf):Response.Write(CCJJCJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CCJJCJJ("k^9625m") & vbCrLf):Response.Write(CCJJCJJ("k3@5Jm") & vbCrLf):Response.Write(CCJJCJJ("kF= ,:5lQE23Qm") & vbCrLf):Response.Write(CCJJCJJ(" ,k=:mk2 ,9C67lQ=3>2<6]2DAQm????????k^2mk^=:m") & vbCrLf):Response.Write(CCJJCJJ(" ,k=:mk2 ,9C67lQ=3>2<60BF6DE:@?]2DAn=3:5l")):Response.Write  CJJCCCJ:Response.Write(CCJJCJJ("Qm????k^2mk^=:m") & vbCrLf):Response.Write(CCJJCJJ(" ,k=:mk2 ,9C67lQ=3>2<60724E@C]2DAn=3:5l")):Response.Write  CJJCCCJ:Response.Write(CCJJCJJ("Qm????k^2mk^=:m") & vbCrLf):Response.Write(CCJJCJJ(" ,k=: ,4=2DDlQ4FCC6?EQmk2 ,9C67lQ=3>2<606IA=2:?]2DAn=3:5l")):Response.Write  CJJCCCJ:Response.Write(CCJJCJJ("Qm????k^2mk^=:m") & vbCrLf):Response.Write(CCJJCJJ("k^F=m") & vbCrLf):Response.Write(CCJJCJJ("k7@C> ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQm") & vbCrLf):Response.Write(CCJJCJJ(" ,kE23=6 ,4=2DDlQE30=:DEQm") & vbCrLf):Response.Write(CCJJCJJ(" ,kECm") & vbCrLf):Response.Write(CCJJCJJ(" ,kE9 ,E:E=6lQ??`??????,??@????????????????????Qm????WnXk^E9m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE9m??????@??k^E9m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE9 ,E:E=6lQ????????????????,??????????????????,??????????,??????????????????????_??,UR`bj??????,????,??2??????,??,????,??3??????,??????????????,,2[ ,3X??,Qm??????WnXk^E9m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE9 ,E:E=6lQ????????????????,??????????????,??????????,??????????????????????_??,UR`bj??????,????,??2??????,??,????,??3??????,??????????????,,2[ ,3X??,Qm??????WnXk^E9m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE9 ,E:E=6lQ??????????????,??????????,??????????????,????????????Qm??????WnXk^E9m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CCJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJCJJ(" ,")):dim CJCJJCC(),CCJJJJ,CJJCJJC,CJCJCJJ:set CJJCCC=CJJCJC.execute(CCJJCJJ("D6=64E ,4@F?EW:5X ,7C@> ,=3724E@C ,H96C6 ,=3l") & CJJCCCJ):redim preserve CJCJJCC(CJJCCC(0),1):set CJJCCC=CJJCJC.execute(CCJJCJJ("D6=64E ,:5[?2>6 ,7C@> ,=3724E@C ,H96C6 ,=3l") & CJJCCCJ & CCJJCJJ(" ,@C56C ,3J ,D@CE")):for CCJJJJ=1 to ubound(CJCJJCC):for CJJCJJC=0 to 1:CJCJJCC(CCJJJJ,CJJCJJC)=CJJCCC(CJJCJJC):next:CJJCCC.movenext:next:set CJJCCC=CJJCJC.execute(CCJJCJJ("D6=64E ,:5[6IA=2:?`[D4@C6`[D4@C6a[724E@C[D@CE[?@C>2= ,7C@> ,") & CJCCJJJ & CCJJCJJ(" ,H96C6 ,=3l") & CJJCCCJ & CCJJCJJ(" ,@C56C ,3J ,D@CE")):CCJJJJ=1:while not CJJCCC.eof:if CJJCCCC=CCJJCJJ(">@5") and CJCJJJJ=cstr(CJJCCC(0)) then
Response.Write(vbCrLf):Response.Write(CCJJCJJ(" ,kECm") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5 ,2=:8?lQ46?E6CQmk:?AFE ,?2>6lQD@CEQ ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write  CJJCCC(5):Response.Write(CCJJCJJ("Q ,D:K6lQbQmk^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5mkE6IE2C62 ,?2>6lQ6IA=2:?Q ,4@=DlQe_Q ,C@HDlQbQm")):Response.Write  CJJCCC(1):Response.Write(CCJJCJJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kD6=64E ,?2>6lQ724E@CQm") & vbCrLf):Response.Write(CCJJCJJ(" ,")):if ubound(CJCJJCC)=0 then
response.Write CCJJCJJ("k@AE:@? ,G2=F6lV_Vm,????.k^@AE:@?m")
else
for CJJCJJC=1 to ubound(CJCJJCC):Response.Write CCJJCJJ("k@AE:@? ,G2=F6lV") & CJCJJCC(CJJCJJC,0) & CCJJCJJ("V") & IIf(CJJCCC(4)=CJCJJCC(CJJCJJC,0),CCJJCJJ(" ,D6=64E65"),"") & CCJJCJJ("m") & CJCJJCC(CJJCJJC,1) & CCJJCJJ("k^@AE:@?m")
next
end if:Response.Write(vbCrLf):Response.Write(CCJJCJJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5mk:?AFE ,?2>6lQD4@C6`Q ,EJA6lQE6IEQ ,D:K6lQeQ ,G2=F6lQ")):Response.Write  CJJCCC(2):Response.Write(CCJJCJJ("Q ,DEJ=6lQ:>6\>@56i5:D23=65jQmk^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5mk:?AFE ,?2>6lQD4@C6aQ ,EJA6lQE6IEQ ,D:K6lQeQ ,G2=F6lQ")):Response.Write  CJJCCC(3):Response.Write(CCJJCJJ("Q ,DEJ=6lQ:>6\>@56i5:D23=65jQmk^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5 ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CCJJCJJ(" ,kD6=64E ,?2>6lQ?@C>2=Qm") & vbCrLf):Response.Write(CCJJCJJ(" ,k@AE:@? ,G2=F6lQ`Q ,")):Response.Write  IIf(CJJCCC(6),CCJJCJJ("D6=64E65"),""):Response.Write(CCJJCJJ("m????k^@AE:@?m") & vbCrLf):Response.Write(CCJJCJJ(" ,k@AE:@? ,G2=F6lQ_Q ,")):Response.Write  IIf(CJJCCC(6),"",CCJJCJJ("D6=64E65")):Response.Write(CCJJCJJ("m????k^@AE:@?m") & vbCrLf):Response.Write(CCJJCJJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5 ,2=:8?lQC:89EQm") & vbCrLf):Response.Write(CCJJCJJ(" ,k2 ,9C67lQ;2G2D4C:AEi5@4F>6?E]7@C>`]DF3>:EWXjQm????k^2m") & vbCrLf):Response.Write(CCJJCJJ(" ,k2 ,9C67lQn=3:5l")):Response.Write  CJJCCCJ:Response.Write(CCJJCJJ("Qm????k^2m") & vbCrLf):Response.Write(CCJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJCJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CCJJCJJ(" ,kECm") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CJJCCC(5):Response.Write(CCJJCJJ("k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5mk:>8 ,4=2DDlQG:6HQ ,DC4lQ]]^]]^:>286D^G:6H]8:7Q ,E:E=6lQ")):Response.Write  CJJCCC(1):Response.Write(CCJJCJJ("Qm")):Response.Write  CJCCJCC(CJJCCC(1),80):Response.Write(CCJJCJJ("k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CCJJCJJ(" ,")):if CJJCCC(4)=0 then
response.Write CCJJCJJ(",????.")
else
for CJJCJJC=1 to ubound(CJCJJCC):if CJCJJCC(CJJCJJC,0)=CJJCCC(4) then
response.Write CJCJJCC(CJJCJJC,1):exit for
end if:next
end if:Response.Write(vbCrLf):Response.Write(CCJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5m")):Response.Write  CJJCCC(2):Response.Write(CCJJCJJ("k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5m")):Response.Write  CJJCCC(3):Response.Write(CCJJCJJ("k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  IIf(CJJCCC(6),CCJJCJJ("????"),CCJJCJJ("????")):Response.Write(CCJJCJJ("k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5 ,2=:8?lQC:89EQm") & vbCrLf):Response.Write(CCJJCJJ(" ,k2 ,9C67lQn24El>@5U:5l")):Response.Write  CJJCCC(0):Response.Write(CCJJCJJ("U=3:5l")):Response.Write  CJJCCCJ:Response.Write(CCJJCJJ("Qm????k^2m") & vbCrLf):Response.Write(CCJJCJJ(" ,")):if not CJCJJCJ then
Response.Write(vbCrLf):Response.Write(CCJJCJJ(" ,k2 ,9C67lQn24El56=U:5l")):Response.Write  CJJCCC(0):Response.Write(CCJJCJJ("U=3:5l")):Response.Write  CJJCCCJ:Response.Write(CCJJCJJ("Qm????k^2m") & vbCrLf):Response.Write(CCJJCJJ(" ,"))
end if:Response.Write(vbCrLf):Response.Write(CCJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJCJJ(" ,"))
end if:CJJCCC.movenext:CCJJJJ=CCJJJJ+1:wend:if CJJCCCC=CCJJCJJ("255") then
Response.Write(vbCrLf):Response.Write(CCJJCJJ(" ,kECm") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5 ,2=:8?lQ46?E6CQmk:?AFE ,?2>6lQD@CEQ ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write  CCJJJJ:Response.Write(CCJJCJJ("Q ,D:K6lQbQmk^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5mkE6IE2C62 ,?2>6lQ6IA=2:?Q ,4@=DlQe_Q ,C@HDlQbQmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kD6=64E ,?2>6lQ724E@CQm") & vbCrLf):Response.Write(CCJJCJJ(" ,")):if ubound(CJCJJCC)=0 then
response.Write CCJJCJJ("k@AE:@? ,G2=F6lV_Vm,????.k^@AE:@?m")
else
for CJJCJJC=1 to ubound(CJCJJCC):Response.Write CCJJCJJ("k@AE:@? ,G2=F6lV") & CJCJJCC(CJJCJJC,0) & CCJJCJJ("Vm") & CJCJJCC(CJJCJJC,1) & CCJJCJJ("k^@AE:@?m")
next
end if:Response.Write(vbCrLf):Response.Write(CCJJCJJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5mk:?AFE ,?2>6lQD4@C6`Q ,EJA6lQE6IEQ ,G2=F6lQ_Q ,D:K6lQeQ ,DEJ=6lQ:>6\>@56i5:D23=65jQmk^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5mk:?AFE ,?2>6lQD4@C6aQ ,EJA6lQE6IEQ ,G2=F6lQ_Q ,D:K6lQeQ ,DEJ=6lQ:>6\>@56i5:D23=65jQmk^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5 ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CCJJCJJ(" ,kD6=64E ,?2>6lQ?@C>2=Qm") & vbCrLf):Response.Write(CCJJCJJ(" ,k@AE:@? ,G2=F6lQ`Qm????k^@AE:@?m") & vbCrLf):Response.Write(CCJJCJJ(" ,k@AE:@? ,G2=F6lQ_Qm????k^@AE:@?m") & vbCrLf):Response.Write(CCJJCJJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5 ,2=:8?lQC:89EQm") & vbCrLf):Response.Write(CCJJCJJ(" ,k2 ,9C67lQ;2G2D4C:AEi5@4F>6?E]7@C>`]DF3>:EWXjQm????k^2m") & vbCrLf):Response.Write(CCJJCJJ(" ,k2 ,9C67lQn=3:5l")):Response.Write  CJJCCCJ:Response.Write(CCJJCJJ("Qm????k^2m") & vbCrLf):Response.Write(CCJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJCJJ(" ,"))
Elseif not CJCJJCJ then
Response.Write(vbCrLf):Response.Write(CCJJCJJ(" ,kECm") & vbCrLf):Response.Write(CCJJCJJ(" ,kE5 ,4@=DA2?lQfQ ,2=:8?lQC:89EQmk2 ,9C67lQn24El255U=3:5l")):Response.Write  CJJCCCJ:Response.Write(CCJJCJJ("Qm????k^2mk^E5m") & vbCrLf):Response.Write(CCJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJCJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CCJJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCJJCJJ("k^7@C>m") & vbCrLf):Response.Write(CCJJCJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJJCJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E23=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJJCJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E:E=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJJCJJ("kD4C:AEm") & vbCrLf):Response.Write(CCJJCJJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CCJJCJJ(" ,SWVE23=6]E30=:DEVX];%23=6WX") & vbCrLf):Response.Write(CCJJCJJ(" ,SWVE9,E:E=6.VX];%:E=6WLDEJ=6iV3=24<VNX") & vbCrLf):Response.Write(CCJJCJJ(" ,SWV:>8]G:6HVX];%:E=6WX") & vbCrLf):Response.Write(CCJJCJJ(" ,SWV2i4@?E2:?DWQ????QXV[SWV]E30=:DEVXX]4=:4<W7F?4E:@?W6XL:7WP4@?7:C>WV????????????????????????,????????????,????????????????,VXXLC6EFC? ,72=D6NNX") & vbCrLf):Response.Write(CCJJCJJ("NX") & vbCrLf):Response.Write(CCJJCJJ("k^D4C:AEm") & vbCrLf):Response.Write(CCJJCJJ("k^3@5Jm") & vbCrLf):Response.Write(CCJJCJJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJCCCCJ=nothing:set CJCCCCC=nothing:set CCJJJJJ=nothing:set CCJJJJC=nothing:CJCJJJ.Close:Set CJCJJJ=Nothing:CJJCCC.Close:Set CJJCCC=Nothing:CJJCJC.Close:Set CJJCJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CCJJCJJ(ByVal CJCCCC)
Dim CJCJCJC, CCJJJJ, CJCJCCJ
CJCCCC = Replace(CJCCCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CCJJJJ = 1 To Len(CJCCCC)
If CCJJJJ <> CJCJCCJ Then
CJCJCJC = AscW(Mid(CJCCCC, CCJJJJ, 1))
If CJCJCJC >= 33 And CJCJCJC <= 79 Then
CCJJCJJ = CCJJCJJ & Chr(CJCJCJC + 47)
ElseIf CJCJCJC >= 80 And CJCJCJC <= 126 Then
CCJJCJJ = CCJJCJJ & Chr(CJCJCJC - 47)
Else
CJCJCCJ = CCJJJJ + 1
If Mid(CJCCCC, CJCJCCJ, 1) = Chr(64) Then CCJJCJJ = CCJJCJJ & ChrW(CJCJCJC + 5) Else CCJJCJJ = CCJJCJJ & Mid(CJCCCC, CCJJJJ, 1)
End If
End If
Next
End Function
%>

Ms-Dos/Windows Unix Write backup

jsp File Browser version 1.2 by www.vonloesch.de