Edit D:\xinhaisoft\crisis_new\student\growreport.asp

??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CCJCJC, CCJCCJ,CCJCCC, CCCJJJ, CCCJJC:Set CCJCJC = server.CreateObject(CCCCCCC("ps~sq]r@??64E:@?")):CCJCJC.open Application(CCCCCCC("r@??64E:@?$EC:?8")):Set CCJCCJ=CCJCJC::Dim CCCJCJ,CCCJCC,CCCCJJ,CCCCJC,CCCCCJ,CCCCCC,CJJJJJJ,CJJJJJC,CJJJJCJ:Dim CJJJJCC,CJJJCJJ,CJJJCJC,CJJJCCJ,CJJJCCC,CJJCJJJ:Dim CJJCJJC,CJJCJCJ,CJJCJCC:Dim CJJCCJJ:CJJCCJJ=Trim(Request.Cookies(CCCCCCC("!$*|t|qt#"))):if CJJCCJJ="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CCCJCJ>0 then
CCCJJC=CCCCCCC("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") & CCCJCC & CCCCCCC("V ,2?5 ,:5l") & CCCJCJ
set CCJCCC=CCJCJC.execute(CCCJJC):If CCJCCC.EOF Then
Call ClearMemberCookie
Else
CCCCJJ=CCJCCC(2) & "":CCCCJC=CCJCCC(3):CCCCCJ=CCJCCC(5):CCCCCC=CCJCCC(6):CJJJJJJ=CCJCCC(9):CJJJJJC=CCJCCC(15):CJJJJCC=CCJCCC(0):CJJCJCJ=CCJCCC(1):CJJCJJC=CCJCCC(11) & "":CJJJCJJ=CCJCCC(10) & "":CJJJJCJ=CCJCCC(12):CJJJCJC=CCJCCC(14):CJJJCCJ=CCJCCC(13):CJJJCCC=CCJCCC(7) & "":CJJCJJJ=CCJCCC(4):CJJCJCC=CCJCCC(8):if isnull(CJJJJJC) then CJJJJJC=0
if isnull(CJJJJJJ) or CJJJJJJ=0 then CJJJJJJ=CCCCJC
if isnull(CJJCJJJ) then CJJCJJJ=0
if isnull(CCCCCJ) then CCCCCJ=0
if instr(CCCCCCC("6`_254bhch32dh2336de6_df7a_7ggb6"),CCCJCC)>0 then Call RedirectMessage(CCCCCCC("????????,????????????????????????????????,"))
Call SetMemberCookie(CCCJCJ,CCCJCC)
End IF
end if:::Sub CheckLogined():if CCCJCJ=0 then
Call ClearMemberCookie:Call ConnClose:dim CJJCCJC:CJJCCJC=trim(request.QueryString(CCCCCCC("D49@@="))):if isnumeric(CJJCCJC) then
response.Redirect CCCCCCC("^>^G2?E^R^D49@@=^") & CJJCCJC & CCCCCCC("^DEF56?E^=@8:?nC65:C64El") & url
else
Call RedirectMessage(CCCCCCC("??????????????,????????????,"))
end if
end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CCCCCCC("!$*|t|qt#"))="":CCCJCJ=0:CCCCCC=0:CCCJCC=Empty:CCCCCJ=0:CJJJJJC=0:CJJJJJJ=0:CCCCJC=0:CJJJJCC=False:CJJCJCJ=False:CJJCJCC=Empty:End Sub:Sub CheckMemberCookie():dim CJJCCCJ,CJJCCCC,CJCJJJJ,CJCJJJC,CJCJJCJ:CJJCCCJ=split(CJJCCJJ,CCCCCCC("]")):if ubound(CJJCCCJ)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CJJCCCJ(0)) or len(CJJCCCJ(1))<>32 or len(CJJCCCJ(2))<>32 then
Call ClearMemberCookie
else
CJJCCCC=CJJCCCJ(1):for CJCJJJJ=1 to len(CJJCCCC):CJCJJJC=mid(CJJCCCC,CJCJJJJ,1):if isnumeric(CJCJJJC) then CJCJJCJ=CJCJJCJ & CJCJJJC
if len(CJCJJCJ)=7 then exit for
next:CJJCCCC=CJJCCCJ(2):if CJCJJCJ<>mid(CJJCCCC,6,7) then
Call ClearMemberCookie
else
CJCJJJC=mid(CJJCCCC,18,10)/2:if CJCJJJC<DateDiff(CCCCCCC("D"), CCCCCCC("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CCCJCJ=Clng(CJJCCCJ(0)):CCCJCC=CJJCCCJ(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CCJCJCC,CJJJJJJJ):dim CJCJJJJ,CJCJJJC,CJCJJCJ:for CJCJJJJ=1 to len(CJJJJJJJ):CJCJJJC=mid(CJJJJJJJ,CJCJJJJ,1):if isnumeric(CJCJJJC) then CJCJJCJ=CJCJJCJ & CJCJJJC
if len(CJCJJCJ)=7 then exit for
next:CJCJJCJ=CCJCJCC & CCCCCCC("]") & CJJJJJJJ & CCCCCCC("]") & Fix(10000*(Rnd+1)) & CJCJJCJ & Fix(10000*(Rnd+1)) & DateDiff(CCCCCCC("D"), CCCCCCC("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CCCCCCC("!$*|t|qt#"))=CJCJJCJ:End Sub::Function CCJCCCC(CJJJJJJC):Dim str,CJCJCJJ:str = Trim(CJJJJJJC):If IsNull(str) Or str = "" Then
CCJCCCC = ""
else
str=Replace(str, CCCCCCC("V"), "")
str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CCCCCCC("k:7C2>6"), CCCCCCC("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CCCCCCC("kD4C:AE"), CCCCCCC("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJCJCJJ=new RegExp:CJCJCJJ.Pattern=CCCCCCC("@?W,2\K.ZXl"):CJCJCJJ.IgnoreCase = True:CJCJCJJ.Global=True:str=CJCJCJJ.Replace(str,CCCCCCC("@?S`U6BF2=Dj")):set CJCJCJJ=nothing:CCJCCCC=str
End If:End Function:Function IIf(CJJJJJCJ, CJJJJJCC, CJJJJCJJ):if isnull(CJJJJJCJ) or isempty(CJJJJJCJ) then
IIf = CJJJJCJJ
elseif CJJJJJCJ Then
IIf = CJJJJJCC
Else
IIf = CJJJJCJJ
end if:End Function:Const CCJCCCJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::Sub Debug(str):response.Charset="utf-8":dim CJCJJJJ,CJCJJJC,CJCJCJC:if isarray(str) then
on error resume next:CJCJJJJ=ubound(str,2):CJCJCJC=err.number:err.clear:on error goto 0:if CJCJCJC<>0 then
for CJCJJJJ=0 to ubound(str):if CJCJJJJ>0 then response.Write CCCCCCC("k3C ,^m")
response.Write CJCJJJJ & CCCCCCC("i ,") & str(CJCJJJJ):next
else
response.Write CCCCCCC("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m")
for CJCJJJJ=0 to ubound(str,2):response.Write CCCCCCC("kE9 ,2=:8?lV=67EVm") & CJCJJJJ & CCCCCCC("k^E9m")
next:response.Write CCCCCCC("k^ECm"):for CJCJJJJ=0 to ubound(str):response.Write CCCCCCC("kECmkE9m") & CJCJJJJ & CCCCCCC("k^E9m"):for CJCJJJC=0 to ubound(str,2):response.Write CCCCCCC("kE5m") & str(CJCJJJJ,CJCJJJC) & CCCCCCC("k^E5m"):next:response.Write CCCCCCC("k^ECm"):next:response.Write CCCCCCC("k^E23=6m")
end if
elseif isnull(str) then
response.Write CCCCCCC(",}F==.")
else
Response.Write replace(str,vbcrlf,CCCCCCC("k3Cm"))
end if:Call ConnClose:Response.End:End Sub::Sub SetHttpOnlyCookie(CJJJJCJC,CJJJJCCJ):dim CJJCCCJ:CJJCCCJ=CJJJJCJC & CCCCCCC("l") & CJJJJCCJ & CCCCCCC("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CCCCCCC("$6E\r@@<:6"),CJJCCCJ):End Sub:::::::Function CCCJJJC(CJCJCJC):if isnull(CJCJCJC) or trim(CJCJCJC)="" or not isnumeric(CJCJCJC) then
CCCJJJC=false
else
Dim CJCJCJJ:Set CJCJCJJ = New RegExp:CJCJCJJ.Pattern = CCCCCCC("/-5ZS"):CJCJCJJ.IgnoreCase = True:CCCJJJC = CJCJCJJ.test(CJCJCJC):set CJCJCJJ=nothing
end if:End Function:Function CCCJJCJ(CJJJJCCC):dim CJCJCCJ,CJCJCCC:CJCJCCJ=CCCCCCC("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CJJJJCCC & CCCCCCC("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJCJCCC=CCJCJC.execute(CJCJCCJ):CCCJJCJ = CJCJCCC(0):if isnull(CCCJJCJ) then CCCJJCJ=1
CJCJCCC.close : set CJCJCCC=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CJCCCJJ=nothing:set CCCJJCC=nothing:set CCCJCJJ=nothing:set CCCJCJC=nothing:CJCJCCC.close : set CJCJCCC=nothing:CCCJJJ.Close : Set CCCJJJ=Nothing:CCJCCC.Close : Set CCJCCC=Nothing:CCCJCCJ.Close : Set CCCJCCJ = Nothing:CCJCJC.Close : Set CCJCJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJJJCJJJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CCCCCCC("!$*0|6DD286"),server.URLEncode(CJJJCJJJ)):Response.Redirect CCCCCCC("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::Function CCCJCCC(ByVal CCCCJJJ,style):if not isdate(CCCCJJJ) then
CCCJCCC=CCCCJJJ:exit function
end if:dim CJCCJJJ,CJCCJJC,CJCCJCJ,CJCCJCC:CCCCJJJ=cdate(CCCCJJJ):CJCCJJJ=Year(CCCCJJJ):CJCCJJC=Month(CCCCJJJ):CJCCJCJ=Day(CCCCJJJ):select case style:case 0:CCCJCCC=CJCCJJJ & CCCCCCC("\") & right(0 & CJCCJJC,2) & CCCCCCC("\") & right(0 & CJCCJCJ,2):case 1:CCCJCCC=CJCCJJJ & right(0 & CJCCJJC,2) & right(0 & CJCCJCJ,2):case 2:CCCJCCC=right(CJCCJJJ,2) & CCCCCCC("\") & right(0 & CJCCJJC,2) & CCCCCCC("\") & right(0 & CJCCJCJ,2):case 3:CCCJCCC=CJCCJJJ & CCCCCCC("\") & right(0 & CJCCJJC,2):case 4:CCCJCCC=right(0 & CJCCJJC,2) & CCCCCCC("\") & right(0 & CJCCJCJ,2):case 5:CCCJCCC=right(0 & CJCCJCJ,2):case 6:CCCJCCC=CJCCJJJ & CCCCCCC("??") & right(0 & CJCCJJC,2) & CCCCCCC("??") & right(0 & CJCCJCJ,2) & CCCCCCC("??"):case else
CCCJCCC=CCCCJJJ:end select:End Function::::::::::::::::::::Sub ClearCache(CJJJCJJC):Application.Contents.Remove CJJJCJJC
End Sub::Class jTree:Private CCCJJC, CJCCCJJ, CJCCCJC, CJCCCCJ,CJCCCCC,CCJJJJJ,CCJJJJC,CCJJJCJ:Private Sub Class_Initialize():CJCCCJC = 0:CJCCCCJ = 0:CCJJJCJ=10:End Sub:Public Property Let CCCCJJC(CJJJCJCJ):if CJJJCJCJ="" then Call RedirectMessage(CCCCCCC("????????,;%C66????????????????????@??????????,"))
CJCCCCC=CJJJCJCJ:CCJJJJJ=CCCCCCC("!$*0") & UCase(CJCCCCC):Call GetTreeArray:End Property:Public Property Get CCCCJJC():CCCCJJC=CJCCCCC:End Property:::Private Sub GetTreeArray():Dim CJCJJJJ, CJCJJJC, CCJJJCC,CCJJCJJ:CJCCCJJ = Application(CCJJJJJ):If Not IsArray(CJCCCJJ) Then
CCCJJC = CCCCCCC("D6=64E ,4@F?EW:5X ,7C@> ,") & CJCCCCC:if CCJJJJC<>"" then CCCJJC=CCCJJC & CCCCCCC(" ,H96C6 ,") & CCJJJJC
set CCJJJCC=CCJCJC.execute(CCCJJC):CCJJCJJ=CCJJJCC(0):if CCJJCJJ=0 then Call RedirectMessage(CCCCCCC("????W") & CJCCCCC & CCCCCCC("^") & CCJJJJC & CCCCCCC("X????????????"))
CJCCCCJ=CCJJCJJ+CCJJJCJ:ReDim CJCCCJJ(CJCCCCJ, 4):CCCJJC = CCCCCCC("D6=64E ,:5[A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJCCCCC & CCCCCCC(" ,H:E9 ,W?@=@4<X"):if CCJJJJC<>"" then CCCJJC=CCCJJC & CCCCCCC(" ,H96C6 ,") & CCJJJJC
CCCJJC=CCCJJC & CCCCCCC(" ,@C56C ,3J ,D@CE[:5"):set CCJJJCC=CCJCJC.execute(CCCJJC):For CJCJJJJ = 1 To CCJJCJJ:For CJCJJJC = 0 To 4:CJCCCJJ(CJCJJJJ, CJCJJJC) = CCJJJCC(CJCJJJC):if IsNull(CJCCCJJ(CJCJJJJ,4)) then CJCCCJJ(CJCJJJJ,4)=0
If CJCCCJJ(CJCJJJJ,2)="" then CJCCCJJ(CJCJJJJ,2)=CCCCCCC(",??.")
Next:CCJJJCC.MoveNext:Next:CCJJJCC.Close: Set CCJJJCC = Nothing:for CJCJJJJ=CJCCCCJ-(CCJJJCJ-1) to CJCCCCJ:CJCCCJJ(CJCJJJJ,0)=CJCJJJJ:next:Application.Lock():Application(CCJJJJJ) = CJCCCJJ:Application.UnLock()
else
CJCCCCJ=Ubound(CJCCCJJ)
End If:End Sub:::::Private Function CCCCJCJ(CCJCJCC):dim CJCJJJJ,CCJJCJC:CCCCJCJ=0:CCJJCJC=CStr(CCJCJCC):if CCJJCJC<>"0" then
for CJCJJJJ=1 to CJCCCCJ:If CStr(CJCCCJJ(CJCJJJJ, 0))=CCJJCJC Then
CCCCJCJ = CJCJJJJ:Exit For
End If:Next
end if:End Function::::Public Function CCCCJCC(CCJCJCC):Dim CJCJJJJ,CCJJCCJ:CJCJJJJ=CCCCJCJ(CCJCJCC):if CJCJJJJ=0 then
CCJJCCJ=CCCCCJJ(CCJCJCC)
else
CCJJCCJ=CJCCCJJ(CJCJJJJ,3):if isnull(CCJJCCJ) or CCJJCCJ="" then
CCJJCCJ=CCCCCJJ(CCJCJCC)
elseif Mid(CCJJCCJ,instrrev(CCJJCCJ,CCCCCCC("["))+1)<>CStr(CCJCJCC) then
CCJJCCJ=CCCCCJJ(CCJCJCC)
elseif Left(CCJJCCJ,1)=CCCCCCC("[") then
CCJJCCJ=CCCCCJJ(CCJCJCC)
end if
end if:CCCCJCC=CCJJCCJ:End Function:Private Function CCCCCJJ(CCJCJCC):dim CCJJCJC:CCJJCJC=CStr(CCJCJCC):if CCJJCJC="0" then
CCCCCJJ=""
else
dim CCJJJCC:set CCJJJCC=CCJCJC.execute(CCCCCCC("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJCCCCC & CCCCCCC(" ,H96C6 ,:5l") & CCJCJCC):if CCJJJCC.eof then
Call UpdateCache(CCJCJCC,"","","",""):Call RedirectMessage(CCCCCCC("??????,xs??,") & CCJCJCC & CCCCCCC("??,????????,????????????????????,"))
else
if CCJJJCC(0)=0 then
CCCCCJJ="0," & CCJCJCC
else
CCCCCJJ=CCCCJCC(CCJJJCC(0)) & CCCCCCC("[") & CCJCJCC
end if:if CCJJJCC(2)<>CCCCCJJ then
CCJCJC.execute CCCCCCC("FA52E6 ,") & CJCCCCC & CCCCCCC(" ,D6E ,A2E9lV") & CCCCCJJ & CCCCCCC("V ,H96C6 ,:5l") & CCJCJCC
else
CCCCCJJ=CCJJJCC(2)
end if
end if:Call UpdateCache(CCJCJCC,CCJJJCC(0),CCJJJCC(1),CCCCCJJ,CCJJJCC(3)):CCJJJCC.Close: Set CCJJJCC = Nothing
end if:End Function::::::::::::::::::::::Public Sub ClearCache():Application.Contents.Remove CCJJJJJ
End Sub:Public Sub UpdateCache(CCJCJCC,CJJJCJCC,CJJJCCJJ,CCJJCCJ,CJJJCCJC):dim CJCJJJJ,CJCJJJC:CCJCJCC=CLng(CCJCJCC):CJCJJJJ=CCCCJCJ(CCJCJCC):if CJJJCJCC="" and CJJJCCJJ="" and CCJJCCJ="" and CJJJCCJC="" then
if CJCJJJJ>0 then
for CJCJJJC=1 to 4:CJCCCJJ(CJCJJJJ,CJCJJJC)=Null:next
end if
else
if CJCJJJJ=0 then
for CJCJJJC=1 to CJCCCCJ:if CJCCCJJ(CJCJJJC,1) & ""="" then
CJCJJJJ=CJCJJJC:exit for
end if:next
end if:if CJCJJJJ=0 then
Call ClearCache
else
CJCCCJJ(CJCJJJJ,0)=CLng(CCJCJCC):if CJJJCJCC<>"" then CJCCCJJ(CJCJJJJ,1)=CLng(CJJJCJCC)
if CJJJCCJJ<>"" then CJCCCJJ(CJCJJJJ,2)=CJJJCCJJ
if CCJJCCJ<>"" then CJCCCJJ(CJCJJJJ,3)=CCJJCCJ
if CJJJCCJC<>"" then CJCCCJJ(CJCJJJJ,4)=CLng(CJJJCCJC)
end if
end if:if CJCJJJJ>0 then
Application.Lock():Application(CCJJJJJ) = CJCCCJJ:Application.UnLock()
end if:End Sub:Private Sub Debug(CJJJCJJJ):Call ConnClose:Response.Write CJJJCJJJ:Response.End:End Sub:Private Function CCCJJCJ():CCCJJCJ=CCCCCJC+1:End Function:Private Function CCCCCJC():dim CJCJCCC:set CJCJCCC=CCJCJC.execute(CCCCCCC("D6=64E ,E@A ,` ,:5 ,7C@> ,") & CJCCCCC & CCCCCCC(" ,@C56C ,3J ,:5 ,56D4")):CCCCCJC=CJCJCCC(0):CJCJCCC.Close: Set CJCJCCC = Nothing:End Function:Private Sub Class_Terminate():End Sub:End Class::dim CJJCCJC:CCCJJC=Request.ServerVariables(CCCCCCC("!p%w0x}u~")):if instr(CCCJJC,CCCCCCC("^D49@@=^25>:?^"))>0 then
Call CheckLogined:if not CJJJJCC and not CJJCJCJ then Call RedirectMessage(CCCCCCC("????????,????????????????????????,"))
CJJCCJC=CJJJJJJ
elseif instr(CCCJJC,CCCCCCC("^>^D49@@=^DEF56?E^"))>0 or instr(CCCJJC,CCCCCCC("^DEF56?E^"))>0 then
Call CheckLogined:CJJCCJC=CJJJJJJ
elseif instr(CCCJJC,CCCCCCC("^D49@@="))>0 then
CJJCCJC=Request.QueryString(CCCCCCC("D49@@=")):if not CCCJJJC(CJJCCJC) then CJJCCJC=Request.QueryString(CCCCCCC("F"))
if not CCCJJJC(CJJCCJC) then CJJCCJC=Request.QueryString(CCCCCCC("D4"))
if not CCCJJJC(CJJCCJC) then Call RedirectMessage(CCCCCCC("????????W$49@@=X??@??????????,"))
CJJCCJC=csng(CJJCCJC)
end if:if CJJCCJC=0 then Call RedirectMessage(CCCCCCC("????????W$49@@=X????W_X??,"))
Dim CCJJCCC:Call SetConfig:Sub SetConfig():dim CCJCJJJ,CJCJCCC:CCCJJC=CCCCCCC("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") & CJJCCJC:set CJCJCCC=CCJCJC.execute(CCCJJC):if CJCJCCC.eof then Call RedirectMessage(CCCCCCC("??W") & CCCJCJ & CCCCCCC("X??????????W") & CJJCCJC & CCCCCCC("X????????,"))
ReDim CCJCJJJ(61):CCJCJJJ(0)=CJCJCCC(CCCCCCC(";:2@H6:")) & "":CCJCJJJ(1)=CJCJCCC(CCCCCCC("EJA6")):CCJCJJJ(2)=CJCJCCC(CCCCCCC("D>D")):CCJCJJJ(3)=CJCJCCC(CCCCCCC("4FDE@>8C@FA")) & "":CCJCJJJ(4)=CJCJCCC(CCCCCCC("D:5632C0@E96C")) & "":CCJCJJJ(5)=IIf(isnull(CJCJCCC(CCCCCCC("E6DEC6DF=EG:6H"))),0,CJCJCCC(CCCCCCC("E6DEC6DF=EG:6H"))):CCJCJJJ(6)=CJCJCCC(CCCCCCC("K:IF?E:>6")):CCJCJJJ(7)=CJCJCCC(CCCCCCC("766")):CCJCJJJ(8)=CJCJCCC(CCCCCCC("C6E6DE52J")):CCJCJJJ(9)=CJCJCCC(CCCCCCC("6IA:C652E6")):CCJCJJJ(10)=CJCJCCC(CCCCCCC("E:E=6")):CCJCJJJ(11)=CJCJCCC(CCCCCCC(":?EC@")) & "":CCJCJJJ(12)=CJCJCCC(CCCCCCC("A:4EFC6")) & "":CCJCJJJ(13)=CJCJCCC(CCCCCCC("72>:=J")):CCJCJJJ(14)=CJCJCCC(CCCCCCC("4@AJC:89E")) & "":CCJCJJJ(15)=IIf(isnull(CJCJCCC(CCCCCCC("D6>6DE6C0DE2CE052E6"))),CCCCCCC("`h__\`\`"),CJCJCCC(CCCCCCC("D6>6DE6C0DE2CE052E6"))):CCJCJJJ(16)=IIf(isnull(CJCJCCC(CCCCCCC("K:IF?0E:>6D09:89=:89E"))),0,CJCJCCC(CCCCCCC("K:IF?0E:>6D09:89=:89E"))):CCJCJJJ(17)=CJCJCCC(CCCCCCC("4@?E24E")) & "":CCJCJJJ(18)=CJCJCCC(CCCCCCC("D2?5E23=6")):CCJCJJJ(19)=CJCJCCC(CCCCCCC("4C:D:D")):CCJCJJJ(20)=CJCJCCC(CCCCCCC("JJ52E6")):CCJCJJJ(21)=CJCJCCC(CCCCCCC("BB")):CCJCJJJ(22)=CJCJCCC(CCCCCCC("JFJF60D>D0EA=")) & "":CCJCJJJ(23)=CJCJCCC(CCCCCCC("JFJF60E6DE0=3")) & "":CCJCJJJ(25)=CJCJCCC(CCCCCCC("6IA6CE")):CCJCJJJ(26)=CJCJCCC(CCCCCCC(">@5:?7@")):CCJCJJJ(27)=CJCJCCC(CCCCCCC("9@>6A286E@AA:4EFC6")) & "":CCJCJJJ(28)=CJCJCCC(CCCCCCC("4C:D:D=3")):CCJCJJJ(29)=IIf(CJCJCCC(CCCCCCC("4C:D:D@=5")),False,True):CCJCJJJ(30)=CJCJCCC(CCCCCCC("8C@FA8F:52?46")):CCJCJJJ(31)=CJCJCCC(CCCCCCC("3:@7665324<")):CCJCJJJ(32)=CJCJCCC(CCCCCCC("<6JDEC")):CCJCJJJ(33)=CJCJCCC(CCCCCCC("=@8@")) & "":CCJCJJJ(34)=CJCJCCC(CCCCCCC("K:46")):CCJCJJJ(35)=IIf(CJCJCCC(CCCCCCC(":D?6H")),True,False):CCJCJJJ(36)=121:CCJCJJJ(37)=111:CCJCJJJ(38)=160:CCJCJJJ(39)=CJCJCCC(CCCCCCC("8F6DE3@@<")):CCJCJJJ(40)=CJCJCCC(CCCCCCC("75D")):CCJCJJJ(42)=CJCJCCC(CCCCCCC("9@>6=@8:?")):CCJCJJJ(43)=CJCJCCC(CCCCCCC("K:IF?0?6657665324<")):CCJCJJJ(44)=CJCJCCC(CCCCCCC("K:IF?0E:>6D0=:>:E")):CCJCJJJ(45)=CJCJCCC(CCCCCCC("4@>A=6E60:?7@")):CCJCJJJ(46)=CJCJCCC(CCCCCCC("E6DE:?EC@")) & "":CCJCJJJ(47)=IIf(isnull(CJCJCCC(CCCCCCC("JFJF60367@C60E:>6"))),0,CJCJCCC(CCCCCCC("JFJF60367@C60E:>6"))):CCJCJJJ(49)=CJCJCCC(CCCCCCC("D>D0C646:G6C")):CCJCJJJ(50)=CJCJCCC(CCCCCCC("D>D0D:8?")) & "":CCJCJJJ(52)=CJCJCCC(CCCCCCC("JFJF602CC2?86")):CCJCJJJ(53)=IIf(isnull(CJCJCCC(CCCCCCC("DEF56?E0BF6DE:@?04@F?E"))),0,CJCJCCC(CCCCCCC("DEF56?E0BF6DE:@?04@F?E"))):CCJCJJJ(54)=CJCJCCC(CCCCCCC("9:560=30@FE@7286")):CCJCJJJ(55)=CJCJCCC(CCCCCCC("JFJF60E6DE052JD")):CCJCJJJ(56)=CJCJCCC(CCCCCCC("JFJF60H66<0=:>:E")):CCJCJJJ(57)=CJCJCCC(CCCCCCC("JFJF604964<65")):CCJCJJJ(58)=CJCJCCC(CCCCCCC("K:IF?0?6657665324<0?6IE")):CCJCJJJ(59)=CJCJCCC(CCCCCCC("4964<?6HDEF56?E")):CCJCJJJ(60)=CJCJCCC(CCCCCCC("K:IF?04=@D6052E6")):CJCJCCC.close : set CJCJCCC=nothing:if isNull(CCJCJJJ(8)) or CCJCJJJ(8)="" then CCJCJJJ(8)=0
if isdate(CCJCJJJ(9)) then
CCJCJJJ(9)=cdate(CCJCJJJ(9)):if CCJCJJJ(9)<Date then Call RedirectMessage(CCCCCCC("????????,????????????????W") & CCJCJJJ(9) & CCCCCCC("X??????,"))
end if:if not CCCJJJC(CCJCJJJ(20)) then CCJCJJJ(20)=7
select case CCJCJJJ(1):case 1,2,16:CCJCJJJ(36)=159:case 4,5,6,10,11:CCJCJJJ(36)=190:CCJCJJJ(37)=178:CCJCJJJ(38)=191:case 7,13:CCJCJJJ(36)=164:CCJCJJJ(37)=178:CCJCJJJ(38)=179:end select:CCJJCCC=CCJCJJJ:End Sub:Function CCCJCJC(CJJJCCCJ):dim CCJCJJJ(7,1),CJCJJJJ,CCJCJJC,CCJCJCJ:CCJCJJC=Array(CCCCCCC("$49@@="),CCCCCCC("$EF56?E"),CCCCCCC("s6AE"),CCCCCCC("vC256"),CCCCCCC("r=2DD>2E6"),CCCCCCC("}F>36C"),CCCCCCC("%62496C"),CCCCCCC("!2C6?E")):select case CCJJCCC(1):case 1,2 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????")):case 3,16 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????")):case 4 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("??????@"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????")):case 5 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????")):case 6 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("??????@"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("??????"),CCCCCCC("????")):case 7 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("??????"),CCCCCCC("????")):case 8 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("??????@"),CCCCCCC("????"),CCCCCCC("????????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("??????"),CCCCCCC("????")):case 9 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("??????"),CCCCCCC("????")):case 10 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("??????"),CCCCCCC("????")):case 11 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("??????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("??????"),CCCCCCC("????")):case 12 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("??????"),CCCCCCC("????")):case 13 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????")):case 14 : CCJCJCJ=Array(CCCCCCC("??????"),CCCCCCC("??@??"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("??????"),CCCCCCC("????")):case 15 : CCJCJCJ=Array(CCCCCCC("????"),CCCCCCC("????????"),CCCCCCC("????"),CCCCCCC("????????"),CCCCCCC("????"),CCCCCCC("????"),CCCCCCC("??????"),CCCCCCC("????")):case else : CCJCJCJ=CCJCJJC
end select:for CJCJJJJ=0 to Ubound(CCJCJJJ):CCJCJJJ(CJCJJJJ,0)=CCJCJJC(CJCJJJJ):CCJCJJJ(CJCJJJJ,1)=CCJCJCJ(CJCJJJJ):next:for CJCJJJJ=0 to Ubound(CCJCJJJ):if CCJCJJJ(CJCJJJJ,0)=CJJJCCCJ then
CCCJCJC=CCJCJJJ(CJCJJJJ,1):exit for
end if:next:End Function::dim CCJCJCC,CCJCCJJ:CCJCJCC=Request.QueryString(CCCCCCC(":5")):CCJCCJJ=Request.QueryString(CCCCCCC("24E")):If Request.ServerVariables(CCCCCCC("#t""&t$%0|t%w~s"))=CCCCCCC("!~$%") then
if CCJCCJJ=CCCCCCC("255") then
CCCJJC=CCCCCCC(":?D6CE ,:?E@ ,8C@HC6A@CEW2FE9@C[52E6E:>6[2FE@3:@8C2A9J[72>:=J[>60D6=7[>60@E96C[>60E6DE[8C@H[42C66CX ,G2=F6DW") & CCCJCJ  & CCCCCCC("[86E52E6WX") & CCCCCCC("[V") & CCJCCCC(Request.Form(CCCCCCC("2FE@3:@8C2A9J"))) & CCCCCCC("V") & CCCCCCC("[V") & CCJCCCC(Request.Form(CCCCCCC("72>:=J"))) & CCCCCCC("V") & CCCCCCC("[V") & CCJCCCC(Request.Form(CCCCCCC(">60D6=7"))) & CCCCCCC("V") & CCCCCCC("[V") & CCJCCCC(Request.Form(CCCCCCC(">60@E96C"))) & CCCCCCC("V") & CCCCCCC("[V") & CCJCCCC(Request.Form(CCCCCCC(">60E6DE"))) & CCCCCCC("V") & CCCCCCC("[V") & CCJCCCC(Request.Form(CCCCCCC("8C@H"))) & CCCCCCC("V") & CCCCCCC("[V") & CCJCCCC(Request.Form(CCCCCCC("42C66C"))) & CCCCCCC("V") & CCCCCCC("X")
CCJCJC.execute(CCCJJC)
end if:Call ConnClose:response.Redirect CCCCCCC("n")
End If:Response.Write(vbCrLf):Response.Write(CCCCCCC("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CCCCCCC("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CCCCCCC("k9625m") & vbCrLf):Response.Write(CCCCCCC("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CCCCCCC("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CCCCCCC("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CCCCCCC("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CCCCCCC("kE:E=6m")):Response.Write  CCJJCCC(10):Response.Write(CCCCCCC("k^E:E=6m") & vbCrLf):Response.Write(CCCCCCC("k=:?< ,9C67lQ]]^4DD^C6D6E]4DDQ ,C6=lQDEJ=6D966EQm") & vbCrLf):Response.Write(CCCCCCC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CCCCCCC("kDEJ=6m") & vbCrLf):Response.Write(CCCCCCC("E6IE2C62 ,L ,H:5E9i ,hdTj ,N") & vbCrLf):Response.Write(CCCCCCC("k^DEJ=6m") & vbCrLf):Response.Write(CCCCCCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCCCCC("k^9625m") & vbCrLf):Response.Write(CCCCCCC("k3@5Jm") & vbCrLf):Response.Write(CCCCCCC("k5:G ,:5lQ4@?E2:?6CQm") & vbCrLf):Response.Write(CCCCCCC(" ,k5:G ,:5lQ96256CQm") & vbCrLf):Response.Write(CCCCCCC(" ,k9`m")):Response.Write  CCJJCCC(10):Response.Write(CCCCCCC("k^9`m") & vbCrLf):Response.Write(CCCCCCC("kF= ,:5lQ?2GQm") & vbCrLf):Response.Write(CCCCCCC(" ,k=: ,E:E=6lQxsi ,")):Response.Write  CCCJCJ:Response.Write(CCCCCCC("Qm????????,")):Response.Write  CJJJCCJ:Response.Write(CCCCCCC("??,")):Response.Write  CCCCCC:Response.Write(CCCCCCC("??,k^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ:?56I]2DAQm????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,")):set CCJCCC=CCJCJC.execute(CCCCCCC("D6=64E ,4@F?EW:5X ,7C@> ,>6DD286 ,H96C6 ,:D?6Hl` ,2?5 ,C646:G6Cl") & CCCJCJ):if CCJCCC(0)=0 then
Response.Write CCCCCCC("k=:mk2 ,9C67lV]]^>6DD286^:?]2DAnC625@?=Jl`V ,E2C86ElV03=2?<Vm????k^2mk^=:m")
else
Response.Write CCCCCCC("k=:mk2 ,9C67lV]]^>6DD286^:?]2DAnC625@?=Jl`V ,E2C86ElV03=2?<Vm???? ,kDA2? ,DEJ=6lV4@=@CiR777j7@?E\D:K6i`_AIj5:DA=2Ji:?=:?6\3=@4<j324<8C@F?5\4@=@CiR7b_j96:89Ei`dAIjA255:?8i_ ,aAIj=:?6\96:89Ei`dAIj3@C56C\C25:FDibAIjVm") & CCJCCC(0) & CCCCCCC("k^DA2?mk^2mk^=:m")
end if:Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ>J:?7@]2DAQm????????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ492?86ADH]2DAQm????????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,")):If CJJJJCC or CJJCJCJ Then
Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ]]^D49@@=^25>:?^>2:?]2DAQm????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ]]^>6>36C^=@8@FE]2DAnC65:C64El^D49@@=^:?56I]2DAnD49@@=l")):Response.Write  CJJCCJC:Response.Write(CCCCCCC("Qm????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC("k^F=m") & vbCrLf):Response.Write(CCCCCCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCCCCC(" ,k5:G ,:5lQ>2:?Qm") & vbCrLf):Response.Write(CCCCCCC(" ,k5:G ,:5lQ>2:?4@?E6?EQm") & vbCrLf):Response.Write(CCCCCCC(" ,k9am????????????k^9am") & vbCrLf):Response.Write(CCCCCCC(" ,k5:G ,4=2DDlQ4@?E6?EQm") & vbCrLf):Response.Write(CCCCCCC(" ,")):If CCJCCJJ=CCCCCCC("255") Then
Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,k7@C> ,:5lQ7@C>`Q ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQm") & vbCrLf):Response.Write(CCCCCCC(" ,kE23=6 ,H:5E9lQ`__TQ ,46==DA24:?8lQdQm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,H:5E9lQc_Q ,2=:8?lQC:89EQm??,??,k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m??????,????????????????????????????????????????k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mkE6IE2C62 ,?2>6lQ2FE@3:@8C2A9JQ ,4=2DDlQE6IEQ ,:5lQ2FE@3:@8C2A9JQmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQm????,k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m????????????????,??????????????????????????????????k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mkE6IE2C62 ,?2>6lQ72>:=JQ ,4=2DDlQE6IEQ ,:5lQ72>:=JQmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQm????,k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQm`]k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m??????????????k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,G2=:8?lQE@AQmU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mkE6IE2C62 ,?2>6lQ>60D6=7Q ,4=2DDlQE6IEQ ,:5lQE6IE2C62Qmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQma]k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m??????????????k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mkE6IE2C62 ,?2>6lQ>60@E96CQ ,4=2DDlQE6IEQ ,:5lQ>60@E96CQmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQmb]k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m??????,??????????@??????????????????????k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mkE6IE2C62 ,?2>6lQ>60E6DEQ ,4=2DDlQE6IEQ ,:5lQ>60E6DEQmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQ ,G2=:8?lQE@AQm????,k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m??????????????,??????????????????????????????????????????,????????,??????????,????????????????????????????,k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mkE6IE2C62 ,?2>6lQ8C@HQ ,4=2DDlQE6IEQ ,:5lQ8C@HQmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQm????,k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m??????????????????,??????????????????????????????????????k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mkE6IE2C62 ,?2>6lQ42C66CQ ,4=2DDlQE6IEQ ,:5lQ42C66CQmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,4@=DA2?lQaQmU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mk:?AFE ,EJA6lQDF3>:EQ ,4=2DDlQ3FEE@?Q ,:5lQ3FEE@?Q ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CCCCCCC(" ,k:?AFE ,?2>6lQ3FEE@?aQ ,EJA6lQC6D6EQ ,4=2DDlQ3FEE@?Q ,:5lQ3FEE@?aQ ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CCCCCCC(" ,k:?AFE ,?2>6lQ3FEE@?bQ ,EJA6lQ3FEE@?Q ,4=2DDlQ3FEE@?Q ,:5lQ3FEE@?bQ ,G2=F6lQ?? ,??Qmk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,k^E23=6m") & vbCrLf):Response.Write(CCCCCCC(" ,k^7@C>m") & vbCrLf):Response.Write(CCCCCCC(" ,"))
ElseIf CCJCCJJ=CCCCCCC("G:6H") and CCCJJJC(CCJCJCC) Then
set CCJCCC=CCJCJC.execute(CCCCCCC("D6=64E ,E@A ,` ,52E6E:>6[2FE@3:@8C2A9J[72>:=J[>60D6=7[>60@E96C[>60E6DE[8C@H[42C66C ,7C@> ,8C@HC6A@CE ,H96C6 ,:5l") & CCJCJCC & CCCCCCC(" ,2?5 ,2FE9@Cl") & CCCJCJ):if CCJCCC.eof then Call RedirectMessage(CCCCCCC("????????,????????????????@????,"))
Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,kE23=6 ,H:5E9lQ`__TQ ,46==DA24:?8lQdQm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,H:5E9lQc_QmU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9 ,2=:8?lQ=67EQmk:?AFE ,?2>6lQ3FEE@?bQ ,EJA6lQ3FEE@?Q ,4=2DDlQ3FEE@?Q ,:5lQ3FEE@?bQ ,G2=F6lQ?? ,??Qmk^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9 ,2=:8?lQ=67EQm??????????,")):Response.Write  CCCJCCC(CCJCCC(0),0):Response.Write(CCCCCCC("k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQm??,??,k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9 ,2=:8?lQ=67EQm??????,????????????????????????????????????????k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m")):Response.Write  replace(CCJCCC(1) & "",vbcrlf,CCCCCCC("k3Cm")):Response.Write(CCCCCCC("k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQm????,k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9 ,2=:8?lQ=67EQm????????????????,??????????????????????????????????k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m")):Response.Write  replace(CCJCCC(2) & "",vbcrlf,CCCCCCC("k3Cm")):Response.Write(CCCCCCC("k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQm????,k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9 ,2=:8?lQ=67EQm????????k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQm`]k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9 ,2=:8?lQ=67EQm??????????????k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m")):Response.Write  replace(CCJCCC(3) & "",vbcrlf,CCCCCCC("k3Cm")):Response.Write(CCCCCCC("k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQma]k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9 ,2=:8?lQ=67EQm??????????????k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m")):Response.Write  replace(CCJCCC(4) & "",vbcrlf,CCCCCCC("k3Cm")):Response.Write(CCCCCCC("k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQmb]k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9 ,2=:8?lQ=67EQm??????,??????????@??????????????????????k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m")):Response.Write  replace(CCJCCC(5) & "",vbcrlf,CCCCCCC("k3Cm")):Response.Write(CCCCCCC("k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQm????,k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9 ,2=:8?lQ=67EQm??????????????,??????????????????????????????????????????,????????,??????????,????????????????????????????,k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m")):Response.Write  replace(CCJCCC(6) & "",vbcrlf,CCCCCCC("k3Cm")):Response.Write(CCCCCCC("k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQC:89EQm????,k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9 ,2=:8?lQ=67EQm??????????????????,??????????????????????????????????????k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5m")):Response.Write  replace(CCJCCC(7) & "",vbcrlf,CCCCCCC("k3Cm")):Response.Write(CCCCCCC("k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5mk:?AFE ,?2>6lQ3FEE@?cQ ,EJA6lQ3FEE@?Q ,4=2DDlQ3FEE@?Q ,:5lQ3FEE@?cQ ,G2=F6lQ?? ,??Qmk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,k^E23=6m") & vbCrLf):Response.Write(CCCCCCC(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,kE23=6 ,4=2DDlQE30=:DEQm") & vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,")):dim CJCJJJJ:CJCJJJJ=1:set CCJCCC=CCJCJC.execute(CCCCCCC("D6=64E ,:5[52E6E:>6 ,7C@> ,8C@HC6A@CE ,H96C6 ,2FE9@Cl") & CCCJCJ & CCCCCCC(" ,@C56C ,3J ,:5 ,56D4")):while not CCJCCC.eof:Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CJCJJJJ:Response.Write(CCCCCCC("k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CCCJCCC(CCJCCC(1),0):Response.Write(CCCCCCC("k^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQ46?E6CQmk2 ,9C67lQn24ElG:6HU:5l")):Response.Write  CCJCCC(0):Response.Write(CCCCCCC("Qm????k^2mk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,")):CCJCCC.movenext:CJCJJJJ=CJCJJJJ+1:wend:Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,kECm") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,4@=DA2?lQaQmk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,kE5 ,2=:8?lQ46?E6CQmk2 ,9C67lQn24El255Qm????k^2mk^E5m") & vbCrLf):Response.Write(CCCCCCC(" ,k^ECm") & vbCrLf):Response.Write(CCCCCCC(" ,k^E23=6m") & vbCrLf):Response.Write(CCCCCCC(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCCCCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCCCCC(" ,k5:G ,:5lQD:56Qm") & vbCrLf):Response.Write(CCCCCCC(" ,k9bm????????????k^9bm") & vbCrLf):Response.Write(CCCCCCC("kF=m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQE6DE0AF46]2DAQm????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,")):If CCJJCCC(34) Then
Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQE6DE0K:46]2DAQm????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ>JE6DE]2DAQm????????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC("k^F=m") & vbCrLf)::If CCJJCCC(7)=3 Then
Response.Write(vbCrLf):Response.Write(CCCCCCC("k9bm????????????k^9bm") & vbCrLf):Response.Write(CCCCCCC("kF=m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ:?EC@]2DAQm????????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,:5lQ2D:56\JFJF6\=:?<Q ,9C67lQ^>^G2?E^R^=@8:?nC65:C64El^D49@@=^DEF56?EU<6JlQ ,52E2\:5lQ")):Response.Write  CCCJCJ:Response.Write(CCCCCCC("Qm????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQJFJF6]2DAn24El=:DEQm????????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQK:IF?]2DAQm????????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ:?E6CG:6H]2DAQm????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,")):If CCJJCCC(39) Then
Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ=:FJ2?]2DAn24El255Qm????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ=:FJ2?]2DAQm????????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,"))
End If::If CCJJCCC(30) Then
Response.Write(vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ^>^G2?E^R^D49@@=^DEF56?E^EF2?7FQm??????@??k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CCCCCCC("k^F=m") & vbCrLf):Response.Write(CCCCCCC("k9bm????????????k^9bm") & vbCrLf):Response.Write(CCCCCCC("kF=m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQ8C@HC6A@CE]2DAQm????????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQC6>2C<]2DAn24El>JQm????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC(" ,k=:mk2 ,9C67lQC6>2C<]2DAQm????????k^2mk^=:m") & vbCrLf):Response.Write(CCCCCCC("k^F=m") & vbCrLf)
End If:Response.Write(vbCrLf):Response.Write(CCCCCCC("kD4C:AE ,DC4lQ^$4C:AED^6?4CJAE\?F>36C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCCCCC("kD4C:AEm") & vbCrLf):Response.Write(CCCCCCC("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CCCCCCC(" ,^Y ,8=@32= ,t?4CJAE ,Y^") & vbCrLf):Response.Write(CCCCCCC(" ,SWVR2D:56\JFJF6\=:?<VX]2EECWV9C67V[7F?4E:@?W:[G2=F6XLC6EFC? ,G2=F6Zt?4CJAEWSWE9:DX]52E2WV:5VXXNX") & vbCrLf):Response.Write(CCCCCCC("NX") & vbCrLf):Response.Write(CCCCCCC("k^D4C:AEm") & vbCrLf):Response.Write(CCCCCCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCCCCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCCCCC(" ,k5:G ,:5lQ7@@EQm") & vbCrLf):Response.Write(CCCCCCC(" ,k5:G ,4=2DDlQ56A2CE>6?EQm")):Response.Write  CCCCCCC("??????????????????,") & CCJJCCC(10):Response.Write(CCCCCCC("k^5:Gm") & vbCrLf):Response.Write(CCCCCCC(" ,k5:G ,4=2DDlQ4@AJC:89EQm")):Response.Write  replace(CCJJCCC(14),vbcrlf,CCCCCCC("k3Cm")):Response.Write(CCCCCCC("k^5:Gm") & vbCrLf):Response.Write(CCCCCCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCCCCC("k^5:Gm") & vbCrLf):Response.Write(CCCCCCC("kD4C:AE ,DC4lQ^$4C:AED^2FE@D:K6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCCCCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E23=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCCCCC("kD4C:AEm") & vbCrLf):Response.Write(CCCCCCC("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CCCCCCC(" ,SWVE23=6]E30=:DEVX];%23=6WX") & vbCrLf):Response.Write(CCCCCCC(" ,2FE@D:K6WSWVE6IE2C62VXX") & vbCrLf):Response.Write(CCCCCCC(" ,SWV:?AFE,G2=F6lQ?? ,??Q.VX]4=:4<W7F?4E:@?WXL9:DE@CJ]324<WXNX") & vbCrLf):Response.Write(CCCCCCC(" ,SWVRD:56VX]96:89EWSWVR>2:?VX]96:89EWXX") & vbCrLf):Response.Write(CCCCCCC("NX") & vbCrLf):Response.Write(CCCCCCC("k^D4C:AEm") & vbCrLf):Response.Write(CCCCCCC("k^3@5Jm") & vbCrLf):Response.Write(CCCCCCC("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJCCCJJ=nothing:set CCCJJCC=nothing:set CCCJCJJ=nothing:set CCCJCJC=nothing:CCCJJJ.Close:Set CCCJJJ=Nothing:CCJCCC.Close:Set CCJCCC=Nothing:CCJCJC.Close:Set CCJCJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CCCCCCC(ByVal CCCCCCJ)
Dim CCJCCJC, CJCJJJJ, CJCJCJC
CCCCCCJ = Replace(CCCCCCJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CJCJJJJ = 1 To Len(CCCCCCJ)
If CJCJJJJ <> CJCJCJC Then
CCJCCJC = AscW(Mid(CCCCCCJ, CJCJJJJ, 1))
If CCJCCJC >= 33 And CCJCCJC <= 79 Then
CCCCCCC = CCCCCCC & Chr(CCJCCJC + 47)
ElseIf CCJCCJC >= 80 And CCJCCJC <= 126 Then
CCCCCCC = CCCCCCC & Chr(CCJCCJC - 47)
Else
CJCJCJC = CJCJJJJ + 1
If Mid(CCCCCCJ, CJCJCJC, 1) = Chr(64) Then CCCCCCC = CCCCCCC & ChrW(CCJCCJC + 5) Else CCCCCCC = CCCCCCC & Mid(CCCCCCJ, CJCJJJJ, 1)
End If
End If
Next
End Function
%>

Ms-Dos/Windows Unix Write backup

jsp File Browser version 1.2 by www.vonloesch.de