Edit D:\xinhaisoft\crisis_new\m\school\student\my

Edit D:\xinhaisoft\crisis_new\m\school\student\my_edit.asp

??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CJJJJJ, CJJJJC,CJJJCJ, CJJJCC, CJJCJJ:Set CJJJJJ = server.CreateObject(CJCCCCJ("ps~sq]r@??64E:@?")):CJJJJJ.open Application(CJCCCCJ("r@??64E:@?$EC:?8")):Set CJJJJC=CJJJJJ::Dim CJJCJC,CJJCCJ,CJJCCC,CJCJJJ,CJCJJC,CJCJCJ,CJCJCC,CJCCJJ,CJCCJC:Dim CJCCCJ,CJCCCC,CCJJJJ,CCJJJC,CCJJCJ,CCJJCC:Dim CCJCJJ,CCJCJC,CCJCCJ:Dim CCJCCC:CCJCCC=Trim(Request.Cookies(CJCCCCJ("!$*|t|qt#"))):if CCJCCC="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CJJCJC>0 then
CJJCJJ=CJCCCCJ("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") & CJJCCJ & CJCCCCJ("V ,2?5 ,:5l") & CJJCJC
set CJJJCJ=CJJJJJ.execute(CJJCJJ):If CJJJCJ.EOF Then
Call ClearMemberCookie
Else
CJJCCC=CJJJCJ(2) & "":CJCJJJ=CJJJCJ(3):CJCJJC=CJJJCJ(5):CJCJCJ=CJJJCJ(6):CJCJCC=CJJJCJ(9):CJCCJJ=CJJJCJ(15):CJCCCJ=CJJJCJ(0):CCJCJC=CJJJCJ(1):CCJCJJ=CJJJCJ(11) & "":CJCCCC=CJJJCJ(10) & "":CJCCJC=CJJJCJ(12):CCJJJJ=CJJJCJ(14):CCJJJC=CJJJCJ(13):CCJJCJ=CJJJCJ(7) & "":CCJJCC=CJJJCJ(4):CCJCCJ=CJJJCJ(8):if isnull(CJCCJJ) then CJCCJJ=0
if isnull(CJCJCC) or CJCJCC=0 then CJCJCC=CJCJJJ
if isnull(CCJJCC) then CCJJCC=0
if isnull(CJCJJC) then CJCJJC=0
if instr(CJCCCCJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CJJCCJ)>0 then Call RedirectMessage(CJCCCCJ("????????,????????????????????????????????,"))
Call SetMemberCookie(CJJCJC,CJJCCJ)
End IF
end if:::Sub CheckLogined():if CJJCJC=0 then
Call ClearMemberCookie:Call ConnClose:dim CCCJJJ:CCCJJJ=trim(request.QueryString(CJCCCCJ("D49@@="))):if isnumeric(CCCJJJ) then
response.Redirect CJCCCCJ("^>^G2?E^R^D49@@=^") & CCCJJJ & CJCCCCJ("^DEF56?E^=@8:?nC65:C64El") & url
else
Call RedirectMessage(CJCCCCJ("??????????????,????????????,"))
end if
end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CJCCCCJ("!$*|t|qt#"))="":CJJCJC=0:CJCJCJ=0:CJJCCJ=Empty:CJCJJC=0:CJCCJJ=0:CJCJCC=0:CJCJJJ=0:CJCCCJ=False:CCJCJC=False:CCJCCJ=Empty:End Sub:Sub CheckMemberCookie():dim CCCJJC,CCCJCJ,CCCJCC,CCCCJJ,CCCCJC:CCCJJC=split(CCJCCC,CJCCCCJ("]")):if ubound(CCCJJC)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CCCJJC(0)) or len(CCCJJC(1))<>32 or len(CCCJJC(2))<>32 then
Call ClearMemberCookie
else
CCCJCJ=CCCJJC(1):for CCCJCC=1 to len(CCCJCJ):CCCCJJ=mid(CCCJCJ,CCCJCC,1):if isnumeric(CCCCJJ) then CCCCJC=CCCCJC & CCCCJJ
if len(CCCCJC)=7 then exit for
next:CCCJCJ=CCCJJC(2):if CCCCJC<>mid(CCCJCJ,6,7) then
Call ClearMemberCookie
else
CCCCJJ=mid(CCCJCJ,18,10)/2:if CCCCJJ<DateDiff(CJCCCCJ("D"), CJCCCCJ("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CJJCJC=Clng(CCCJJC(0)):CJJCCJ=CCCJJC(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CJCCCCC,CCJJJJJ):dim CCCJCC,CCCCJJ,CCCCJC:for CCCJCC=1 to len(CCJJJJJ):CCCCJJ=mid(CCJJJJJ,CCCJCC,1):if isnumeric(CCCCJJ) then CCCCJC=CCCCJC & CCCCJJ
if len(CCCCJC)=7 then exit for
next:CCCCJC=CJCCCCC & CJCCCCJ("]") & CCJJJJJ & CJCCCCJ("]") & Fix(10000*(Rnd+1)) & CCCCJC & Fix(10000*(Rnd+1)) & DateDiff(CJCCCCJ("D"), CJCCCCJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJCCCCJ("!$*|t|qt#"))=CCCCJC:End Sub::Function CJCJJJC(CCJJJJC):Dim str,CCCCCC:str = Trim(CCJJJJC):If IsNull(str) Or str = "" Then
CJCJJJC = ""
else
str=Replace(str, CJCCCCJ("V"), "")
str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CJCCCCJ("k:7C2>6"), CJCCCCJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJCCCCJ("kD4C:AE"), CJCCCCJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CCCCCC=new RegExp:CCCCCC.Pattern=CJCCCCJ("@?W,2\K.ZXl"):CCCCCC.IgnoreCase = True:CCCCCC.Global=True:str=CCCCCC.Replace(str,CJCCCCJ("@?S`U6BF2=Dj")):set CCCCCC=nothing:CJCJJJC=str
End If:End Function:Function IIf(CCJJJCJ, CCJJJCC, CCJJCJJ):if isnull(CCJJJCJ) or isempty(CCJJJCJ) then
IIf = CCJJCJJ
elseif CCJJJCJ Then
IIf = CCJJJCC
Else
IIf = CCJJCJJ
end if:End Function:Const CJCJJJJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CCJJCJC,CCJJCCJ):dim CCCJJC:CCCJJC=CCJJCJC & "=" & CCJJCCJ & CJCCCCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJCCCCJ("$6E\r@@<:6"),CCCJJC):End Sub:::::::Function CJCJJCC(CJJCCCC):if isnull(CJJCCCC) or trim(CJJCCCC)="" or not isnumeric(CJJCCCC) then
CJCJJCC=false
else
Dim CCCCCC:Set CCCCCC = New RegExp:CCCCCC.Pattern = CJCCCCJ("/-5ZS"):CCCCCC.IgnoreCase = True:CJCJJCC = CCCCCC.test(CJJCCCC):set CCCCCC=nothing
end if:End Function:::::Sub ConnClose():On Error Resume Next:set CJCJCJJ=nothing:set CJCJCJC=nothing:set CJCJCCJ=nothing:set CJCJCCC=nothing:CJJJCCJ.close : set CJJJCCJ=nothing:CJJJCC.Close : Set CJJJCC=Nothing:CJJJCJ.Close : Set CJJJCJ=Nothing:CJCCJJJ.Close : Set CJCCJJJ = Nothing:CJJJJJ.Close : Set CJJJJJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCJJCCC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJCCCCJ("!$*0|6DD286"),server.URLEncode(CCJJCCC)):Response.Redirect CJCCCCJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::Function CJCCJJC(ByVal CJCCJCJ,style):if not isdate(CJCCJCJ) then
CJCCJJC=CJCCJCJ:exit function
end if:dim CJJJJJJ,CJJJJJC,CJJJJCJ,CJJJJCC:CJCCJCJ=cdate(CJCCJCJ):CJJJJJJ=Year(CJCCJCJ):CJJJJJC=Month(CJCCJCJ):CJJJJCJ=Day(CJCCJCJ):select case style:case 0:CJCCJJC=CJJJJJJ & CJCCCCJ("\") & right(0 & CJJJJJC,2) & CJCCCCJ("\") & right(0 & CJJJJCJ,2):case 1:CJCCJJC=CJJJJJJ & right(0 & CJJJJJC,2) & right(0 & CJJJJCJ,2):case 2:CJCCJJC=right(CJJJJJJ,2) & CJCCCCJ("\") & right(0 & CJJJJJC,2) & CJCCCCJ("\") & right(0 & CJJJJCJ,2):case 3:CJCCJJC=CJJJJJJ & CJCCCCJ("\") & right(0 & CJJJJJC,2):case 4:CJCCJJC=right(0 & CJJJJJC,2) & CJCCCCJ("\") & right(0 & CJJJJCJ,2):case 5:CJCCJJC=right(0 & CJJJJCJ,2):case 6:CJCCJJC=CJJJJJJ & CJCCCCJ("??") & right(0 & CJJJJJC,2) & CJCCCCJ("??") & right(0 & CJJJJCJ,2) & CJCCCCJ("??"):case else
CJCCJJC=CJCCJCJ:end select:End Function::::::function CJCCJCC(CJJCJCC,CJCCCCC):dim CJJJCJJ,CCCJCC:if isArray(CJJCJCC) then CJJJCJJ=CJJCJCC else CJJJCJJ=split(CJJCJCC & "",CJCCCCJ("M"))
for CCCJCC=0 to ubound(CJJJCJJ)-1 step 2:if CJJJCJJ(CCCJCC)=cstr(CJCCCCC) then
CJCCJCC=server.htmlencode(CJJJCJJ(CCCJCC+1)):exit for
end if:next:end function::::::::::::::::dim CCCJJJ:CJJCJJ=Request.ServerVariables(CJCCCCJ("!p%w0x}u~")):if instr(CJJCJJ,CJCCCCJ("^D49@@=^25>:?^"))>0 then
Call CheckLogined:if not CJCCCJ and not CCJCJC then Call RedirectMessage(CJCCCCJ("????????,????????????????????????,"))
CCCJJJ=CJCJCC
elseif instr(CJJCJJ,CJCCCCJ("^>^D49@@=^DEF56?E^"))>0 or instr(CJJCJJ,CJCCCCJ("^DEF56?E^"))>0 then
Call CheckLogined:CCCJJJ=CJCJCC
elseif instr(CJJCJJ,CJCCCCJ("^D49@@="))>0 then
CCCJJJ=Request.QueryString(CJCCCCJ("D49@@=")):if not CJCJJCC(CCCJJJ) then CCCJJJ=Request.QueryString(CJCCCCJ("F"))
if not CJCJJCC(CCCJJJ) then CCCJJJ=Request.QueryString(CJCCCCJ("D4"))
if not CJCJJCC(CCCJJJ) then Call RedirectMessage(CJCCCCJ("????????W$49@@=X??@??????????,"))
CCCJJJ=csng(CCCJJJ)
end if:if CCCJJJ=0 then Call RedirectMessage(CJCCCCJ("????????W$49@@=X????W_X??,"))
Dim CJJJCJC:Call SetConfig:Sub SetConfig():dim CJJJCJJ,CJJJCCJ:CJJCJJ=CJCCCCJ("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") & CCCJJJ:set CJJJCCJ=CJJJJJ.execute(CJJCJJ):if CJJJCCJ.eof then Call RedirectMessage(CJCCCCJ("??W") & CJJCJC & CJCCCCJ("X??????????W") & CCCJJJ & CJCCCCJ("X????????,"))
ReDim CJJJCJJ(61):CJJJCJJ(0)=CJJJCCJ(CJCCCCJ(";:2@H6:")) & "":CJJJCJJ(1)=CJJJCCJ(CJCCCCJ("EJA6")):CJJJCJJ(2)=CJJJCCJ(CJCCCCJ("D>D")):CJJJCJJ(3)=CJJJCCJ(CJCCCCJ("4FDE@>8C@FA")) & "":CJJJCJJ(4)=CJJJCCJ(CJCCCCJ("D:5632C0@E96C")) & "":CJJJCJJ(5)=IIf(isnull(CJJJCCJ(CJCCCCJ("E6DEC6DF=EG:6H"))),0,CJJJCCJ(CJCCCCJ("E6DEC6DF=EG:6H"))):CJJJCJJ(6)=CJJJCCJ(CJCCCCJ("K:IF?E:>6")):CJJJCJJ(7)=CJJJCCJ(CJCCCCJ("766")):CJJJCJJ(8)=CJJJCCJ(CJCCCCJ("C6E6DE52J")):CJJJCJJ(9)=CJJJCCJ(CJCCCCJ("6IA:C652E6")):CJJJCJJ(10)=CJJJCCJ(CJCCCCJ("E:E=6")):CJJJCJJ(11)=CJJJCCJ(CJCCCCJ(":?EC@")) & "":CJJJCJJ(12)=CJJJCCJ(CJCCCCJ("A:4EFC6")) & "":CJJJCJJ(13)=CJJJCCJ(CJCCCCJ("72>:=J")):CJJJCJJ(14)=CJJJCCJ(CJCCCCJ("4@AJC:89E")) & "":CJJJCJJ(15)=IIf(isnull(CJJJCCJ(CJCCCCJ("D6>6DE6C0DE2CE052E6"))),CJCCCCJ("`h__\`\`"),CJJJCCJ(CJCCCCJ("D6>6DE6C0DE2CE052E6"))):CJJJCJJ(16)=IIf(isnull(CJJJCCJ(CJCCCCJ("K:IF?0E:>6D09:89=:89E"))),0,CJJJCCJ(CJCCCCJ("K:IF?0E:>6D09:89=:89E"))):CJJJCJJ(17)=CJJJCCJ(CJCCCCJ("4@?E24E")) & "":CJJJCJJ(18)=CJJJCCJ(CJCCCCJ("D2?5E23=6")):CJJJCJJ(19)=CJJJCCJ(CJCCCCJ("4C:D:D")):CJJJCJJ(20)=CJJJCCJ(CJCCCCJ("JJ52E6")):CJJJCJJ(21)=CJJJCCJ(CJCCCCJ("BB")):CJJJCJJ(22)=CJJJCCJ(CJCCCCJ("JFJF60D>D0EA=")) & "":CJJJCJJ(23)=CJJJCCJ(CJCCCCJ("JFJF60E6DE0=3")) & "":CJJJCJJ(25)=CJJJCCJ(CJCCCCJ("6IA6CE")):CJJJCJJ(26)=CJJJCCJ(CJCCCCJ(">@5:?7@")):CJJJCJJ(27)=CJJJCCJ(CJCCCCJ("9@>6A286E@AA:4EFC6")) & "":CJJJCJJ(28)=CJJJCCJ(CJCCCCJ("4C:D:D=3")):CJJJCJJ(29)=IIf(CJJJCCJ(CJCCCCJ("4C:D:D@=5")),False,True):CJJJCJJ(30)=CJJJCCJ(CJCCCCJ("8C@FA8F:52?46")):CJJJCJJ(31)=CJJJCCJ(CJCCCCJ("3:@7665324<")):CJJJCJJ(32)=CJJJCCJ(CJCCCCJ("<6JDEC")):CJJJCJJ(33)=CJJJCCJ(CJCCCCJ("=@8@")) & "":CJJJCJJ(34)=CJJJCCJ(CJCCCCJ("K:46")):CJJJCJJ(35)=IIf(CJJJCCJ(CJCCCCJ(":D?6H")),True,False):CJJJCJJ(36)=121:CJJJCJJ(37)=111:CJJJCJJ(38)=160:CJJJCJJ(39)=CJJJCCJ(CJCCCCJ("8F6DE3@@<")):CJJJCJJ(40)=CJJJCCJ(CJCCCCJ("75D")):CJJJCJJ(42)=CJJJCCJ(CJCCCCJ("9@>6=@8:?")):CJJJCJJ(43)=CJJJCCJ(CJCCCCJ("K:IF?0?6657665324<")):CJJJCJJ(44)=CJJJCCJ(CJCCCCJ("K:IF?0E:>6D0=:>:E")):CJJJCJJ(45)=CJJJCCJ(CJCCCCJ("4@>A=6E60:?7@")):CJJJCJJ(46)=CJJJCCJ(CJCCCCJ("E6DE:?EC@")) & "":CJJJCJJ(47)=IIf(isnull(CJJJCCJ(CJCCCCJ("JFJF60367@C60E:>6"))),0,CJJJCCJ(CJCCCCJ("JFJF60367@C60E:>6"))):CJJJCJJ(49)=CJJJCCJ(CJCCCCJ("D>D0C646:G6C")):CJJJCJJ(50)=CJJJCCJ(CJCCCCJ("D>D0D:8?")) & "":CJJJCJJ(52)=CJJJCCJ(CJCCCCJ("JFJF602CC2?86")):CJJJCJJ(53)=IIf(isnull(CJJJCCJ(CJCCCCJ("DEF56?E0BF6DE:@?04@F?E"))),0,CJJJCCJ(CJCCCCJ("DEF56?E0BF6DE:@?04@F?E"))):CJJJCJJ(54)=CJJJCCJ(CJCCCCJ("9:560=30@FE@7286")):CJJJCJJ(55)=CJJJCCJ(CJCCCCJ("JFJF60E6DE052JD")):CJJJCJJ(56)=CJJJCCJ(CJCCCCJ("JFJF60H66<0=:>:E")):CJJJCJJ(57)=CJJJCCJ(CJCCCCJ("JFJF604964<65")):CJJJCJJ(58)=CJJJCCJ(CJCCCCJ("K:IF?0?6657665324<0?6IE")):CJJJCJJ(59)=CJJJCCJ(CJCCCCJ("4964<?6HDEF56?E")):CJJJCJJ(60)=CJJJCCJ(CJCCCCJ("K:IF?04=@D6052E6")):CJJJCCJ.close : set CJJJCCJ=nothing:if isNull(CJJJCJJ(8)) or CJJJCJJ(8)="" then CJJJCJJ(8)=0
if isdate(CJJJCJJ(9)) then
CJJJCJJ(9)=cdate(CJJJCJJ(9)):if CJJJCJJ(9)<Date then Call RedirectMessage(CJCCCCJ("????????,????????????????W") & CJJJCJJ(9) & CJCCCCJ("X??????,"))
end if:if not CJCJJCC(CJJJCJJ(20)) then CJJJCJJ(20)=7
select case CJJJCJJ(1):case 1,2,16:CJJJCJJ(36)=159:case 4,5,6,10,11:CJJJCJJ(36)=190:CJJJCJJ(37)=178:CJJJCJJ(38)=191:case 7,13:CJJJCJJ(36)=164:CJJJCJJ(37)=178:CJJJCJJ(38)=179:end select:CJJJCJC=CJJJCJJ:End Sub:Function CJCJCCC(CCJCJJJ):dim CJJJCJJ(7,1),CCCJCC,CJJJCCC,CJJCJJJ:CJJJCCC=Array(CJCCCCJ("$49@@="),CJCCCCJ("$EF56?E"),CJCCCCJ("s6AE"),CJCCCCJ("vC256"),CJCCCCJ("r=2DD>2E6"),CJCCCCJ("}F>36C"),CJCCCCJ("%62496C"),CJCCCCJ("!2C6?E")):select case CJJJCJC(1):case 1,2 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????")):case 3,16 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????")):case 4 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("??????@"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????")):case 5 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????")):case 6 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("??????@"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("??????"),CJCCCCJ("????")):case 7 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("??????"),CJCCCCJ("????")):case 8 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("??????@"),CJCCCCJ("????"),CJCCCCJ("????????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("??????"),CJCCCCJ("????")):case 9 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("??????"),CJCCCCJ("????")):case 10 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("??????"),CJCCCCJ("????")):case 11 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("??????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("??????"),CJCCCCJ("????")):case 12 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("??????"),CJCCCCJ("????")):case 13 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????")):case 14 : CJJCJJJ=Array(CJCCCCJ("??????"),CJCCCCJ("??@??"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("??????"),CJCCCCJ("????")):case 15 : CJJCJJJ=Array(CJCCCCJ("????"),CJCCCCJ("????????"),CJCCCCJ("????"),CJCCCCJ("????????"),CJCCCCJ("????"),CJCCCCJ("????"),CJCCCCJ("??????"),CJCCCCJ("????")):case else : CJJCJJJ=CJJJCCC
end select:for CCCJCC=0 to Ubound(CJJJCJJ):CJJJCJJ(CCCJCC,0)=CJJJCCC(CCCJCC):CJJJCJJ(CCCJCC,1)=CJJCJJJ(CCCJCC):next:for CCCJCC=0 to Ubound(CJJJCJJ):if CJJJCJJ(CCCJCC,0)=CCJCJJJ then
CJCJCCC=CJJJCJJ(CCCJCC,1):exit for
end if:next:End Function::If Request.ServerVariables(CJCCCCJ("#t""&t$%0|t%w~s"))=CJCCCCJ("!~$%") then
CJJCJJ=CJCCCCJ("FA52E6 ,>6>36C ,D6E") & CJCCCCJ(" ,C62=?2>6lV") & CJCJJJC(Request.Form(CJCCCCJ("C62=?2>6"))) & CJCCCCJ("V") & CJCCCCJ("[D6Il") & Cint(Request.Form(CJCCCCJ("D6I"))) & CJCCCCJ("[3:CE952JlV") & cdate(Request.Form(CJCCCCJ("3:CE952J"))) & CJCCCCJ("V") & CJCCCCJ("[255C6DDlV") & CJCJJJC(Request.Form(CJCCCCJ("255C6DD"))) & CJCCCCJ("V") & CJCCCCJ("[>@3:=6lV") & CJCJJJC(Request.Form(CJCCCCJ(">@3:=6"))) & CJCCCCJ("V") & CJCCCCJ("[2?DH6ClV") & CJCCCJJ & CJCCCCJ("V") & CJCCCCJ(" ,H96C6 ,:5l") & CJJCJC
CJJJJJ.execute CJJCJJ:Call ConnClose:response.end
End If:function CJCCCJJ():dim CJJCJJC,CCCJCC,CJJCJCJ,CJJJJCC:CJJCJJC=cint(request.Form(CJCCCCJ("B?F>"))):for CCCJCC=1 to CJJCJJC:CJJCJCJ=CJCJJJC(Request.Form(CJCCCCJ("B0") & CCCJCC)):if CJJCJCJ<>"" then
CJJCJCJ=replace(CJJCJCJ,CJCCCCJ("M"),""):CJJCJCJ=replace(CJJCJCJ,CJCCCCJ(" ,"),""):CJJJJCC=CJJJJCC & CJCCCCJ("M") & CCCJCC & CJCCCCJ("M") & CJJCJCJ
end if:next:if CJJJJCC<>"" then CJJJJCC=Mid(CJJJJCC,2)
CJCCCJJ=CJJJJCC:end function:Response.Write(vbCrLf):Response.Write(CJCCCCJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJCCCCJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJCCCCJ("k9625m") & vbCrLf):Response.Write(CJCCCCJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCCCCJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJCCCCJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJCCCCJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJCCCCJ("kE:E=6m????????k^E:E=6m") & vbCrLf):Response.Write(CJCCCCJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2>2K6F:\36E2^4DD^2>2K6F:]>:?]4DDQm") & vbCrLf):Response.Write(CJCCCCJ("kDEJ=6m") & vbCrLf):Response.Write(CJCCCCJ("96256C ,L324<8C@F?5iRd_gduuj ,96:89Eid_AIj ,=:?6\96:89Eid_AIjA255:?8i_ ,`_AIj ,@G6C7=@Hi9:556?jN") & vbCrLf):Response.Write(CJCCCCJ("96256C ,9` ,L4@=@CiR777j ,7=@2Ei=67EjN") & vbCrLf):Response.Write(CJCCCCJ("96256C ,2 ,L7=@2EiC:89Ej ,>2C8:?\E@AidAIjN") & vbCrLf):Response.Write(CJCCCCJ("7@C>L>2C8:?\3@EE@>i`dAIjN") & vbCrLf):Response.Write(CJCCCCJ("]2>\>@52=\35mALA255:?8\=67Ei ,_jN") & vbCrLf):Response.Write(CJCCCCJ("k^DEJ=6m") & vbCrLf):Response.Write(CJCCCCJ("k^9625m") & vbCrLf):Response.Write(CJCCCCJ("k3@5Jm") & vbCrLf):Response.Write(CJCCCCJ("k96256Cm") & vbCrLf):Response.Write(CJCCCCJ(" ,k9`m????????????k^9`m") & vbCrLf):Response.Write(CJCCCCJ(" ,k2 ,:5lQ3E?\=@8@FEQ ,4=2DDlQ2>\3E? ,2>\3E?\D64@?52CJQ ,9C67lQ^>^=@8@FE]2DAnC65:C64El")):Response.Write  server.urlencode(CJCCCCJ("^>^G2?E^R^D49@@=^") & CJCJCC & CJCCCCJ("^DEF56?E^=@8:?")):Response.Write(CJCCCCJ("Qm????k^2m") & vbCrLf):Response.Write(CJCCCCJ("k^96256Cm") & vbCrLf):Response.Write(CJCCCCJ("k5:G ,4=2DDlQ2>\4@?E2:?6CQm") & vbCrLf):Response.Write(CJCCCCJ(" ,")):set CJJJCJ=CJJJJJ.execute(CJCCCCJ("D6=64E ,E@A ,` ,255C6DD[2?DH6C[D6I[3:CE952J ,7C@> ,>6>36C ,H96C6 ,:5l") & CJJCJC):Response.Write(vbCrLf):Response.Write(CJCCCCJ(" ,k7@C> ,>6E9@5lQA@DEQ ,4=2DDlQ2>\7@C>Qm") & vbCrLf):Response.Write(CJCCCCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCCCCJ(" ,k=686?5m????????k^=686?5m") & vbCrLf):Response.Write(CJCCCCJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FAQm") & vbCrLf):Response.Write(CJCCCCJ(" ,k=236=m??????????,k^=236=m") & vbCrLf):Response.Write(CJCCCCJ(" ,k:?AFE ,EJA6lQE6IEQ ,?2>6lQC62=?2>6Q ,4=2DDlQ2>\7@C>\7:6=5Q ,G2=F6lQ")):Response.Write  CCJJJC:Response.Write(CJCCCCJ("Q ,C6BF:C65m") & vbCrLf):Response.Write(CJCCCCJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJCCCCJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FAQm") & vbCrLf):Response.Write(CJCCCCJ(" ,k9bm??????,k^9bm") & vbCrLf):Response.Write(CJCCCCJ(" ,k=236= ,4=2DDlQ2>\C25:@\:?=:?6Qmk:?AFE ,EJA6lQC25:@Q ,?2>6lQD6IQ ,G2=F6lQ`Q ,")):Response.Write  IIf(CJJJCJ(2),CJCCCCJ("4964<65"),""):Response.Write(CJCCCCJ(" ,52E2\2>\F4964<m??k^=236=m") & vbCrLf):Response.Write(CJCCCCJ(" ,k=236= ,4=2DDlQ2>\C25:@\:?=:?6Qmk:?AFE ,EJA6lQC25:@Q ,?2>6lQD6IQ ,G2=F6lQ_Q ,")):Response.Write  IIf(CJJJCJ(2),"",CJCCCCJ("4964<65")):Response.Write(CJCCCCJ(" ,52E2\2>\F4964<m??k^=236=m") & vbCrLf):Response.Write(CJCCCCJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJCCCCJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FAQm") & vbCrLf):Response.Write(CJCCCCJ(" ,k=236=m??????????,k^=236=m") & vbCrLf):Response.Write(CJCCCCJ(" ,k:?AFE ,EJA6lQE6IEQ ,?2>6lQ3:CE952JQ ,4=2DDlQ2>\7@C>\7:6=5Q ,G2=F6lQ")):Response.Write  CJCCJJC(CJJJCJ(3),0):Response.Write(CJCCCCJ("Q ,2FE@4@>A=6E6lQ@77Q ,52E2\2>\52E6A:4<6C ,C6BF:C65m") & vbCrLf):Response.Write(CJCCCCJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJCCCCJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FAQm") & vbCrLf):Response.Write(CJCCCCJ(" ,k=236=m????????^????????,k^=236=m") & vbCrLf):Response.Write(CJCCCCJ(" ,k:?AFE ,EJA6lQE6IEQ ,?2>6lQ255C6DDQ ,4=2DDlQ2>\7@C>\7:6=5Q ,G2=F6lQ")):Response.Write  CJJJCJ(0):Response.Write(CJCCCCJ("Qm") & vbCrLf):Response.Write(CJCCCCJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJCCCCJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FAQm") & vbCrLf):Response.Write(CJCCCCJ(" ,k=236=m??????,k^=236=m") & vbCrLf):Response.Write(CJCCCCJ(" ,k:?AFE ,EJA6lQE6IEQ ,?2>6lQ>@3:=6Q ,4=2DDlQ2>\7@C>\7:6=5Q ,G2=F6lQ")):Response.Write  CCJJCJ:Response.Write(CJCCCCJ("Q ,A2EE6C?lQ")):Response.Write  CJCJJJJ:Response.Write(CJCCCCJ("Q ,C6BF:C65m") & vbCrLf):Response.Write(CJCCCCJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJCCCCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCCCCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCCCCJ(" ,k=686?5m????????k^=686?5m") & vbCrLf):Response.Write(CJCCCCJ(" ,")):dim CJJCJCC,CCCCJJ,CJJCCJJ,CJJCJCJ,CJJCJJC,CJJCCJC,CCCJCC:CJJCCJJ=CJJJCJ(1):set CJJJCJ=CJJJJJ.execute(CJCCCCJ("D6=64E ,:5[BF6DE:@?[2?DH6C[EJA6 ,7C@> ,>6>36C0BF6DE:@? ,H96C6 ,D49@@=l") & IIf(CJJJCJC(53)=0,0,CCCJJJ) & CJCCCCJ(" ,@C56C ,3J ,D@CE")):CCCJCC=1:CJJCJJC=0:while not CJJJCJ.eof:CJJCCJC=CJJJCJ(0):if CJJCCJC>CJJCJJC then CJJCJJC=CJJCCJC
response.Write CJCCCCJ("k5:G ,4=2DDlV2>\7@C>\8C@FAVmk9bm") & CCCJCC & CJCCCCJ("??,") & CJJJCJ(1) & CJCCCCJ("k^9bm")
select case CJJJCJ(3):case 0:CJJCJCC=split(CJJJCJ(2),CJCCCCJ("M")):CJJCJCJ=CJCCJCC(CJJCCJJ,CJJCCJC):for CCCCJJ=0 to ubound(CJJCJCC):response.Write CJCCCCJ("k=236= ,4=2DDlV2>\C25:@Vmk:?AFE ,EJA6lVC25:@V ,?2>6lVB0") & CJJCCJC & CJCCCCJ("V ,G2=F6lV") & CJJCJCC(CCCCJJ) & CJCCCCJ("V") & IIf(CJJCJCC(CCCCJJ)=CJJCJCJ,CJCCCCJ(" ,4964<65"),"") & CJCCCCJ(" ,52E2\2>\F4964<m") & CJJCJCC(CCCCJJ) & CJCCCCJ("k^=236=m")
next:case 1:CJJCJCC=split(CJJJCJ(2),CJCCCCJ("M")):CJJCJCJ=CJCCCCJ("[") & CJCCJCC(CJJCCJJ,CJJCCJC) & CJCCCCJ("["):for CCCCJJ=0 to ubound(CJJCJCC):response.Write CJCCCCJ("k=236= ,4=2DDlV2>\4964<3@IVmk:?AFE ,EJA6lV4964<3@IV ,?2>6lVB0") & CJJCCJC & CJCCCCJ("V ,G2=F6lV") & CJJCJCC(CCCCJJ) & CJCCCCJ("V") & IIf(instr(CJJCJCJ,CJCCCCJ("[") & CJJCJCC(CCCCJJ) & CJCCCCJ("["))>0,CJCCCCJ(" ,4964<65"),"") & CJCCCCJ(" ,52E2\2>\F4964<m") & CJJCJCC(CCCCJJ) & CJCCCCJ("k^=236=m")
next:case 2:response.Write CJCCCCJ("k:?AFE ,EJA6lVE6IEV ,4=2DDlV2>\7@C>\7:6=5V ,?2>6lVB0") & CJJCCJC & CJCCCCJ("V ,G2=F6lV") & CJCCJCC(CJJCCJJ,CJJCCJC) & CJCCCCJ("Vm")
case 3:response.Write CJCCCCJ("kE6IE2C62 ,4=2DDlV2>\7@C>\7:6=5V ,?2>6lVB0") & CJJCCJC & CJCCCCJ("V ,4@=DlVb_V ,C@HDlV`Vm") & CJCCJCC(CJJCCJJ,CJJCCJC) & CJCCCCJ("k^E6IE2C62m")
end select:response.Write CJCCCCJ("k^5:Gm"):CJJJCJ.movenext:CCCJCC=CCCJCC+1:wend:response.Write CJCCCCJ("k:?AFE ,EJA6lV9:556?V ,?2>6lVB?F>V ,G2=F6lV") & CJJCJJC & CJCCCCJ("Vm")
Response.Write(vbCrLf):Response.Write(CJCCCCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCCCCJ(" ,k3FEE@? ,EJA6lQDF3>:EQ ,4=2DDlQ2>\3E? ,2>\3E?\AC:>2CJ ,2>\3E?\3=@4<Qm?? ,??k^3FEE@?m") & vbCrLf):Response.Write(CJCCCCJ(" ,k^7@C>m") & vbCrLf):Response.Write(CJCCCCJ("k^5:Gm") & vbCrLf):Response.Write(CJCCCCJ("k5:G ,4=2DDlQ2>\>@52= ,2>\>@52=\=@25:?8 ,2>\>@52=\?@\3E?Q ,:5lQ>@52=\=@25:?8Qm") & vbCrLf):Response.Write(CJCCCCJ(" ,k5:G ,4=2DDlQ2>\>@52=\5:2=@8Qm") & vbCrLf):Response.Write(CJCCCCJ(" ,k5:G ,4=2DDlQ2>\>@52=\35 ,2>\E6IE\46?E6CQm") & vbCrLf):Response.Write(CJCCCCJ(" ,kDA2? ,4=2DDlQ2>\:4@?\DA:??6C ,2>\:4@?\DA:?Qmk^DA2?m") & vbCrLf):Response.Write(CJCCCCJ(" ,kAm????????]]]k^Am") & vbCrLf):Response.Write(CJCCCCJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJCCCCJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJCCCCJ("k^5:Gm") & vbCrLf):Response.Write(CJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^DE@C6a]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^52J;D^52J;D]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^2>2K6F:\36E2^;D^2>2K6F:]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCCCJ("kD4C:AEm") & vbCrLf):Response.Write(CJCCCCJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCCCJ(" ,SWV7@C>VX]@?WVDF3>:EV[7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCCCJ(" ,G2C ,3:CE952JlSWV:?AFE,?2>6lQ3:CE952JQ.VX]G2=WX") & vbCrLf):Response.Write(CJCCCCJ(" ,G2C ,286l52J;DWX]5:77W3:CE952J[VJ62CVX") & vbCrLf):Response.Write(CJCCCCJ(" ,:7W286keXL") & vbCrLf):Response.Write(CJCCCCJ(" ,=2J6C]>D8WV??????????????????????VX") & vbCrLf):Response.Write(CJCCCCJ(" ,N6=D6L") & vbCrLf):Response.Write(CJCCCCJ(" ,SWVR>@52=\=@25:?8VX]>@52=WX") & vbCrLf):Response.Write(CJCCCCJ(" ,S]A@DEWVV[SWE9:DX]D6C:2=:K6WX[7F?4E:@?WC6DXL") & vbCrLf):Response.Write(CJCCCCJ(" ,DE@C6]255WVFD6CV[L") & vbCrLf):Response.Write(CJCCCCJ(" ,C62=?2>6iSWV:?AFE,?2>6lQC62=?2>6Q.VX]G2=WX[") & vbCrLf):Response.Write(CJCCCCJ(" ,3:CE952Ji3:CE952J[") & vbCrLf):Response.Write(CJCCCCJ(" ,286i286[") & vbCrLf):Response.Write(CJCCCCJ(" ,>@3:=6iSWV:?AFE,?2>6lQ>@3:=6Q.VX]G2=WX") & vbCrLf):Response.Write(CJCCCCJ(" ,NX") & vbCrLf):Response.Write(CJCCCCJ(" ,G2C ,C65:C64Elv6E""F6CJ$EC:?8WVC65:C64EVX") & vbCrLf):Response.Write(CJCCCCJ(" ,D6E%:>6@FEW7F?4E:@? ,WX ,L") & vbCrLf):Response.Write(CJCCCCJ(" ,:7 ,WC65:C64EX ,LH:?5@H]=@42E:@?]C6A=246WC65:C64EXN") & vbCrLf):Response.Write(CJCCCCJ(" ,6=D6 ,L ,H:?5@H]=@42E:@?]C6A=246WV^>^D49@@=^DEF56?E^>J]2DAVXN") & vbCrLf):Response.Write(CJCCCCJ(" ,N[ ,b___X") & vbCrLf):Response.Write(CJCCCCJ(" ,NX") & vbCrLf):Response.Write(CJCCCCJ(" ,N") & vbCrLf):Response.Write(CJCCCCJ(" ,C6EFC? ,72=D6") & vbCrLf):Response.Write(CJCCCCJ(" ,NX") & vbCrLf):Response.Write(CJCCCCJ(" ,^^ ,????????") & vbCrLf):Response.Write(CJCCCCJ(" ,SWVR3E?\=@8@FEVX]@?WV4=:4<V[7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCCCJ(" ,DE@C6]C6>@G6WVFD6CVX") & vbCrLf):Response.Write(CJCCCCJ(" ,NX") & vbCrLf):Response.Write(CJCCCCJ("NX") & vbCrLf):Response.Write(CJCCCCJ("^^ ,????????????????,????????????????????") & vbCrLf):Response.Write(CJCCCCJ("7F?4E:@? ,v6E""F6CJ$EC:?8W?2>6X ,L") & vbCrLf):Response.Write(CJCCCCJ(" ,VFD6 ,DEC:4EV") & vbCrLf):Response.Write(CJCCCCJ(" ,G2C ,CD ,l ,?6H ,#68tIAWVW/MXV ,Z ,?2>6 ,Z ,VlW,/U.YXWUMSXV[ ,V8:VX]6I64WH:?5@H]=@42E:@?]9C67X") & vbCrLf):Response.Write(CJCCCCJ(" ,:7 ,WCDX ,L ,C6EFC? ,564@56&#xr@>A@?6?EWCD,a.X ,N") & vbCrLf):Response.Write(CJCCCCJ(" ,6=D6 ,L ,C6EFC? ,VV ,N") & vbCrLf):Response.Write(CJCCCCJ("N") & vbCrLf):Response.Write(CJCCCCJ("k^D4C:AEm") & vbCrLf):Response.Write(CJCCCCJ("k^3@5Jm") & vbCrLf):Response.Write(CJCCCCJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJCJCJJ=nothing:set CJCJCJC=nothing:set CJCJCCJ=nothing:set CJCJCCC=nothing:CJJJCC.Close:Set CJJJCC=Nothing:CJJJCJ.Close:Set CJJJCJ=Nothing:CJJJJJ.Close:Set CJJJJJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CJCCCCJ(ByVal CJCCCJC)
Dim CJJCCCJ, CCCJCC, CJJCCCC
CJCCCJC = Replace(CJCCCJC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CCCJCC = 1 To Len(CJCCCJC)
If CCCJCC <> CJJCCCC Then
CJJCCCJ = AscW(Mid(CJCCCJC, CCCJCC, 1))
If CJJCCCJ >= 33 And CJJCCCJ <= 79 Then
CJCCCCJ = CJCCCCJ & Chr(CJJCCCJ + 47)
ElseIf CJJCCCJ >= 80 And CJJCCCJ <= 126 Then
CJCCCCJ = CJCCCCJ & Chr(CJJCCCJ - 47)
Else
CJJCCCC = CCCJCC + 1
If Mid(CJCCCJC, CJJCCCC, 1) = Chr(64) Then CJCCCCJ = CJCCCCJ & ChrW(CJJCCCJ + 5) Else CJCCCCJ = CJCCCCJ & Mid(CJCCCJC, CCCJCC, 1)
End If
End If
Next
End Function
%>

Ms-Dos/Windows Unix Write backup

jsp File Browser version 1.2 by www.vonloesch.de