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

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

??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CJJJCJ, CJJJCC,CJJCJJ, CJJCJC, CJJCCJ:Set CJJJCJ = server.CreateObject(CCCJCJJ("ps~sq]r@??64E:@?")):CJJJCJ.open Application(CCCJCJJ("r@??64E:@?$EC:?8")):Set CJJJCC=CJJJCJ::Dim CJJCCC,CJCJJJ,CJCJJC,CJCJCJ,CJCJCC,CJCCJJ,CJCCJC,CJCCCJ,CJCCCC:Dim CCJJJJ,CCJJJC,CCJJCJ,CCJJCC,CCJCJJ,CCJCJC:Dim CCJCCJ,CCJCCC,CCCJJJ:Dim CCCJJC:CCCJJC=Trim(Request.Cookies(CCCJCJJ("!$*|t|qt#"))):if CCCJJC="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CJJCCC>0 then
CJJCCJ=CCCJCJJ("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") & CJCJJJ & CCCJCJJ("V ,2?5 ,:5l") & CJJCCC
set CJJCJJ=CJJJCJ.execute(CJJCCJ):If CJJCJJ.EOF Then
Call ClearMemberCookie
Else
CJCJJC=CJJCJJ(2) & "":CJCJCJ=CJJCJJ(3):CJCJCC=CJJCJJ(5):CJCCJJ=CJJCJJ(6):CJCCJC=CJJCJJ(9):CJCCCJ=CJJCJJ(15):CCJJJJ=CJJCJJ(0):CCJCCC=CJJCJJ(1):CCJCCJ=CJJCJJ(11) & "":CCJJJC=CJJCJJ(10) & "":CJCCCC=CJJCJJ(12):CCJJCJ=CJJCJJ(14):CCJJCC=CJJCJJ(13):CCJCJJ=CJJCJJ(7) & "":CCJCJC=CJJCJJ(4):CCCJJJ=CJJCJJ(8):if isnull(CJCCCJ) then CJCCCJ=0
if isnull(CJCCJC) or CJCCJC=0 then CJCCJC=CJCJCJ
if isnull(CCJCJC) then CCJCJC=0
if isnull(CJCJCC) then CJCJCC=0
if instr(CCCJCJJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CJCJJJ)>0 then Call RedirectMessage(CCCJCJJ("????????,????????????????????????????????,"))
Call SetMemberCookie(CJJCCC,CJCJJJ)
End IF
end if:Sub CheckRight(CJJCJJC):dim CCCJCJ,CCCJCC:if CJJCCC=0 then
Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CCCJCJJ("??????????????,????????????,"))
elseIf not CCJJJJJ(CJJCJJC) then
Call RedirectMessage(CCCJCJJ("????W") & CJJCJJC & CCCJCJJ("X????????,????????????????????,"))
end if:End Sub:Function CCJJJJJ(CJJCJJC):dim CCCJCJ,CCCJCC:CCCJCC=split(CJJCJJC,CCCJCJJ("[")):CCJJJJJ=False:for CCCJCJ=0 to ubound(CCCJCC):If Mid(CJCJJC,CCCJCC(CCCJCJ),1)="1" then
CCJJJJJ=True:exit function
end if:next:End Function:Sub CheckLogined():if CJJCCC=0 then
Call ClearMemberCookie:Call ConnClose:dim CCCCJJ:CCCCJJ=trim(request.QueryString(CCCJCJJ("D49@@="))):if isnumeric(CCCCJJ) then
response.Redirect CCCJCJJ("^>^G2?E^R^D49@@=^") & CCCCJJ & CCCJCJJ("^DEF56?E^=@8:?nC65:C64El") & url
else
Call RedirectMessage(CCCJCJJ("??????????????,????????????,"))
end if
end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CCCJCJJ("!$*|t|qt#"))="":CJJCCC=0:CJCCJJ=0:CJCJJJ=Empty:CJCJCC=0:CJCCCJ=0:CJCCJC=0:CJCJCJ=0:CCJJJJ=False:CCJCCC=False:CCCJJJ=Empty:End Sub:Sub CheckMemberCookie():dim CCCCJC,CCCCCJ,CCCJCJ,CCCCCC,CJJJJJJ:CCCCJC=split(CCCJJC,CCCJCJJ("]")):if ubound(CCCCJC)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CCCCJC(0)) or len(CCCCJC(1))<>32 or len(CCCCJC(2))<>32 then
Call ClearMemberCookie
else
CCCCCJ=CCCCJC(1):for CCCJCJ=1 to len(CCCCCJ):CCCCCC=mid(CCCCCJ,CCCJCJ,1):if isnumeric(CCCCCC) then CJJJJJJ=CJJJJJJ & CCCCCC
if len(CJJJJJJ)=7 then exit for
next:CCCCCJ=CCCCJC(2):if CJJJJJJ<>mid(CCCCCJ,6,7) then
Call ClearMemberCookie
else
CCCCCC=mid(CCCCCJ,18,10)/2:if CCCCCC<DateDiff(CCCJCJJ("D"), CCCJCJJ("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CJJCCC=Clng(CCCCJC(0)):CJCJJJ=CCCCJC(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CCCJJJJ,CCCJCJC):dim CCCJCJ,CCCCCC,CJJJJJJ:for CCCJCJ=1 to len(CCCJCJC):CCCCCC=mid(CCCJCJC,CCCJCJ,1):if isnumeric(CCCCCC) then CJJJJJJ=CJJJJJJ & CCCCCC
if len(CJJJJJJ)=7 then exit for
next:CJJJJJJ=CCCJJJJ & CCCJCJJ("]") & CCCJCJC & CCCJCJJ("]") & Fix(10000*(Rnd+1)) & CJJJJJJ & Fix(10000*(Rnd+1)) & DateDiff(CCCJCJJ("D"), CCCJCJJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CCCJCJJ("!$*|t|qt#"))=CJJJJJJ:End Sub:::Function IIf(CCCJCCJ, CCCJCCC, CCCCJJJ):if isnull(CCCJCCJ) or isempty(CCCJCCJ) then
IIf = CCCCJJJ
elseif CCCJCCJ Then
IIf = CCCJCCC
Else
IIf = CCCCJJJ
end if:End Function:Const CJCCCCC="^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 CCCJCJ,CCCCCC,CJJJJJC:if isarray(str) then
on error resume next:CCCJCJ=ubound(str,2):CJJJJJC=err.number:err.clear:on error goto 0:if CJJJJJC<>0 then
for CCCJCJ=0 to ubound(str):if CCCJCJ>0 then response.Write CCCJCJJ("k3C ,^m")
response.Write CCCJCJ & CCCJCJJ("i ,") & str(CCCJCJ):next
else
response.Write CCCJCJJ("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m")
for CCCJCJ=0 to ubound(str,2):response.Write CCCJCJJ("kE9 ,2=:8?lV=67EVm") & CCCJCJ & CCCJCJJ("k^E9m")
next:response.Write CCCJCJJ("k^ECm"):for CCCJCJ=0 to ubound(str):response.Write CCCJCJJ("kECmkE9m") & CCCJCJ & CCCJCJJ("k^E9m"):for CCCCCC=0 to ubound(str,2):response.Write CCCJCJJ("kE5m") & str(CCCJCJ,CCCCCC) & CCCJCJJ("k^E5m"):next:response.Write CCCJCJJ("k^ECm"):next:response.Write CCCJCJJ("k^E23=6m")
end if
elseif isnull(str) then
response.Write CCCJCJJ(",}F==.")
else
Response.Write replace(str,vbcrlf,CCCJCJJ("k3Cm"))
end if:Call ConnClose:Response.End:End Sub::Sub SetHttpOnlyCookie(CCCCJJC,CCCCJCJ):dim CCCCJC:CCCCJC=CCCCJJC & CCCJCJJ("l") & CCCCJCJ & CCCJCJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CCCJCJJ("$6E\r@@<:6"),CCCCJC):End Sub:::::::Function CCJJJCJ(CJJJJJC):if isnull(CJJJJJC) or trim(CJJJJJC)="" or not isnumeric(CJJJJJC) then
CCJJJCJ=false
else
Dim CJJJJCJ:Set CJJJJCJ = New RegExp:CJJJJCJ.Pattern = CCCJCJJ("/-5ZS"):CJJJJCJ.IgnoreCase = True:CCJJJCJ = CJJJJCJ.test(CJJJJJC):set CJJJJCJ=nothing
end if:End Function:Function CCJJJCC(CCCCJCC):dim CJJJJCC,CJJJCJJ:CJJJJCC=CCCJCJJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CCCCJCC & CCCJCJJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJJJCJJ=CJJJCJ.execute(CJJJJCC):CCJJJCC = CJJJCJJ(0):if isnull(CCJJJCC) then CCJJJCC=1
CJJJCJJ.close : set CJJJCJJ=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CJJCCJC=nothing:set CCJJCJJ=nothing:set CCJJCJC=nothing:set CCJJCCJ=nothing:CJJJCJJ.close : set CJJJCJJ=nothing:CJJCJC.Close : Set CJJCJC=Nothing:CJJCJJ.Close : Set CJJCJJ=Nothing:CCJJCCC.Close : Set CCJJCCC = Nothing:CJJJCJ.Close : Set CJJJCJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCCCCJJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CCCJCJJ("!$*0|6DD286"),server.URLEncode(CCCCCJJ)):Response.Redirect CCCJCJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::Function CCJCJJJ(ByVal CCJCJJC,style):if not isdate(CCJCJJC) then
CCJCJJJ=CCJCJJC:exit function
end if:dim CJJJCJC,CJJJCCJ,CJJJCCC,CJJCJJJ:CCJCJJC=cdate(CCJCJJC):CJJJCJC=Year(CCJCJJC):CJJJCCJ=Month(CCJCJJC):CJJJCCC=Day(CCJCJJC):select case style:case 0:CCJCJJJ=CJJJCJC & CCCJCJJ("\") & right(0 & CJJJCCJ,2) & CCCJCJJ("\") & right(0 & CJJJCCC,2):case 1:CCJCJJJ=CJJJCJC & right(0 & CJJJCCJ,2) & right(0 & CJJJCCC,2):case 2:CCJCJJJ=right(CJJJCJC,2) & CCCJCJJ("\") & right(0 & CJJJCCJ,2) & CCCJCJJ("\") & right(0 & CJJJCCC,2):case 3:CCJCJJJ=CJJJCJC & CCCJCJJ("\") & right(0 & CJJJCCJ,2):case 4:CCJCJJJ=right(0 & CJJJCCJ,2) & CCCJCJJ("\") & right(0 & CJJJCCC,2):case 5:CCJCJJJ=right(0 & CJJJCCC,2):case 6:CCJCJJJ=CJJJCJC & CCCJCJJ("??") & right(0 & CJJJCCJ,2) & CCCJCJJ("??") & right(0 & CJJJCCC,2) & CCCJCJJ("??"):case else
CCJCJJJ=CCJCJJC:end select:End Function:Function CCJCJCJ(Table):Dim CJJJCJJ, CJJCJJC, str(), CCCJCJ,CCCCCC,CJJCJCC:CJJCJCC=UCase(Table):If Not IsArray(Application(CCCJCJJ("!$*0") & CJJCJCC)) Then
CJJCCJ=CCCJCJJ("D6=64E ,:5[?2>6[>6>36CEJA6 ,7C@> ,,") & Table & CCCJCJJ(". ,@C56C ,3J ,D@CE[:5"):set CJJJCJJ=server.createobject(CCCJCJJ("25@53]C64@C5D6E")):CJJJCJJ.open CJJCCJ,CJJJCJ,1:CJJCJJC = CJJJCJJ.RecordCount:ReDim str(CJJCJJC, 2):If CJJCJJC > 0 Then
For CCCJCJ = 1 To CJJCJJC:for CCCCCC=0 to 2:str(CCCJCJ, CCCCCC) = CJJJCJJ(CCCCCC):next:CJJJCJJ.MoveNext:Next
End If:CJJJCJJ.Close: Set CJJJCJJ = Nothing:Application(CCCJCJJ("!$*0") & CJJCJCC) = str
End If:CCJCJCJ = Application(CCCJCJJ("!$*0") & CJJCJCC):End Function::Function CCJCJCC(CCCCJCC,CCCCCJC,CCCJJJJ):Dim str, CCCJCJ, CJJCCJJ:CJJCCJJ = CCJCJCJ(CCCCJCC):For CCCJCJ = 1 To UBound(CJJCCJJ):if Cstr(CJJCCJJ(CCCJCJ,2))=Cstr(CCCCCJC) and CStr(CJJCCJJ(CCCJCJ, 0)) = CCCJJJJ & "" then
str=CJJCCJJ(CCCJCJ,1):exit for
end if:Next:if str="" then str=CCCJCJJ(",????.")
CCJCJCC=str:End Function:::::::::::::::::Sub ClearCache(CCCCCCJ):Application.Contents.Remove CCCCCCJ
End Sub::Class jTree:Private CJJCCJ, CJJCCJC, CJJCCCJ, CJJCCCC,CJCJJJJ,CJCJJJC,CJCJJCJ,CJCJJCC:Private Sub Class_Initialize():CJJCCCJ = 0:CJJCCCC = 0:CJCJJCC=10:End Sub:Public Property Let Table(CCCCCCC):if CCCCCCC="" then Call RedirectMessage(CCCJCJJ("????????,;%C66????????????????????@??????????,"))
CJCJJJJ=CCCCCCC:CJCJJJC=CCCJCJJ("!$*0") & UCase(CJCJJJJ):Call GetTreeArray:End Property:Public Property Get Table():Table=CJCJJJJ:End Property:::Private Sub GetTreeArray():Dim CCCJCJ, CCCCCC, CJCJCJJ,RecordCount:CJJCCJC = Application(CJCJJJC):If Not IsArray(CJJCCJC) Then
CJJCCJ = CCCJCJJ("D6=64E ,4@F?EW:5X ,7C@> ,") & CJCJJJJ:if CJCJJCJ<>"" then CJJCCJ=CJJCCJ & CCCJCJJ(" ,H96C6 ,") & CJCJJCJ
set CJCJCJJ=CJJJCJ.execute(CJJCCJ):RecordCount=CJCJCJJ(0):if RecordCount=0 then Call RedirectMessage(CCCJCJJ("????W") & CJCJJJJ & CCCJCJJ("^") & CJCJJCJ & CCCJCJJ("X????????????"))
CJJCCCC=RecordCount+CJCJJCC:ReDim CJJCCJC(CJJCCCC, 4):CJJCCJ = CCCJCJJ("D6=64E ,:5[A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJCJJJJ & CCCJCJJ(" ,H:E9 ,W?@=@4<X"):if CJCJJCJ<>"" then CJJCCJ=CJJCCJ & CCCJCJJ(" ,H96C6 ,") & CJCJJCJ
CJJCCJ=CJJCCJ & CCCJCJJ(" ,@C56C ,3J ,D@CE[:5"):set CJCJCJJ=CJJJCJ.execute(CJJCCJ):For CCCJCJ = 1 To RecordCount:For CCCCCC = 0 To 4:CJJCCJC(CCCJCJ, CCCCCC) = CJCJCJJ(CCCCCC):if IsNull(CJJCCJC(CCCJCJ,4)) then CJJCCJC(CCCJCJ,4)=0
If CJJCCJC(CCCJCJ,2)="" then CJJCCJC(CCCJCJ,2)=CCCJCJJ(",??.")
Next:CJCJCJJ.MoveNext:Next:CJCJCJJ.Close: Set CJCJCJJ = Nothing:for CCCJCJ=CJJCCCC-(CJCJJCC-1) to CJJCCCC:CJJCCJC(CCCJCJ,0)=CCCJCJ:next:Application.Lock():Application(CJCJJJC) = CJJCCJC:Application.UnLock()
else
CJJCCCC=Ubound(CJJCCJC)
End If:End Sub:::::Private Function CCJCCJC(CCCJJJJ):dim CCCJCJ,CJCJCCJ:CCJCCJC=0:CJCJCCJ=CStr(CCCJJJJ):if CJCJCCJ<>"0" then
for CCCJCJ=1 to CJJCCCC:If CStr(CJJCCJC(CCCJCJ, 0))=CJCJCCJ Then
CCJCCJC = CCCJCJ:Exit For
End If:Next
end if:End Function::::Public Function CCJCCCJ(CCCJJJJ):Dim CCCJCJ,CJCJCCC:CCCJCJ=CCJCCJC(CCCJJJJ):if CCCJCJ=0 then
CJCJCCC=CCJCCCC(CCCJJJJ)
else
CJCJCCC=CJJCCJC(CCCJCJ,3):if isnull(CJCJCCC) or CJCJCCC="" then
CJCJCCC=CCJCCCC(CCCJJJJ)
elseif Mid(CJCJCCC,instrrev(CJCJCCC,CCCJCJJ("["))+1)<>CStr(CCCJJJJ) then
CJCJCCC=CCJCCCC(CCCJJJJ)
elseif Left(CJCJCCC,1)=CCCJCJJ("[") then
CJCJCCC=CCJCCCC(CCCJJJJ)
end if
end if:CCJCCCJ=CJCJCCC:End Function:Private Function CCJCCCC(CCCJJJJ):dim CJCJCCJ:CJCJCCJ=CStr(CCCJJJJ):if CJCJCCJ="0" then
CCJCCCC=""
else
dim CJCJCJJ:set CJCJCJJ=CJJJCJ.execute(CCCJCJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJCJJJJ & CCCJCJJ(" ,H96C6 ,:5l") & CCCJJJJ):if CJCJCJJ.eof then
Call UpdateCache(CCCJJJJ,"","","",""):Call RedirectMessage(CCCJCJJ("??????,xs??,") & CCCJJJJ & CCCJCJJ("??,????????,????????????????????,"))
else
if CJCJCJJ(0)=0 then
CCJCCCC="0," & CCCJJJJ
else
CCJCCCC=CCJCCCJ(CJCJCJJ(0)) & CCCJCJJ("[") & CCCJJJJ
end if:if CJCJCJJ(2)<>CCJCCCC then
CJJJCJ.execute CCCJCJJ("FA52E6 ,") & CJCJJJJ & CCCJCJJ(" ,D6E ,A2E9lV") & CCJCCCC & CCCJCJJ("V ,H96C6 ,:5l") & CCCJJJJ
else
CCJCCCC=CJCJCJJ(2)
end if
end if:Call UpdateCache(CCCJJJJ,CJCJCJJ(0),CJCJCJJ(1),CCJCCCC,CJCJCJJ(3)):CJCJCJJ.Close: Set CJCJCJJ = Nothing
end if:End Function::::::::::::::::::::::Public Sub ClearCache():Application.Contents.Remove CJCJJJC
End Sub:Public Sub UpdateCache(CCCJJJJ,CJJJJJJJ,CJJJJJJC,CJCJCCC,CJJJJJCJ):dim CCCJCJ,CCCCCC:CCCJJJJ=CLng(CCCJJJJ):CCCJCJ=CCJCCJC(CCCJJJJ):if CJJJJJJJ="" and CJJJJJJC="" and CJCJCCC="" and CJJJJJCJ="" then
if CCCJCJ>0 then
for CCCCCC=1 to 4:CJJCCJC(CCCJCJ,CCCCCC)=Null:next
end if
else
if CCCJCJ=0 then
for CCCCCC=1 to CJJCCCC:if CJJCCJC(CCCCCC,1) & ""="" then
CCCJCJ=CCCCCC:exit for
end if:next
end if:if CCCJCJ=0 then
Call ClearCache
else
CJJCCJC(CCCJCJ,0)=CLng(CCCJJJJ):if CJJJJJJJ<>"" then CJJCCJC(CCCJCJ,1)=CLng(CJJJJJJJ)
if CJJJJJJC<>"" then CJJCCJC(CCCJCJ,2)=CJJJJJJC
if CJCJCCC<>"" then CJJCCJC(CCCJCJ,3)=CJCJCCC
if CJJJJJCJ<>"" then CJJCCJC(CCCJCJ,4)=CLng(CJJJJJCJ)
end if
end if:if CCCJCJ>0 then
Application.Lock():Application(CJCJJJC) = CJJCCJC:Application.UnLock()
end if:End Sub:Private Sub Debug(CCCCCJJ):Call ConnClose:Response.Write CCCCCJJ:Response.End:End Sub:Private Function CCJJJCC():CCJJJCC=CCCJJJC+1:End Function:Private Function CCCJJJC():dim CJJJCJJ:set CJJJCJJ=CJJJCJ.execute(CCCJCJJ("D6=64E ,E@A ,` ,:5 ,7C@> ,") & CJCJJJJ & CCCJCJJ(" ,@C56C ,3J ,:5 ,56D4")):CCCJJJC=CJJJCJJ(0):CJJJCJJ.Close: Set CJJJCJJ = Nothing:End Function:Private Sub Class_Terminate():End Sub:End Class::dim CCCCJJ:CJJCCJ=Request.ServerVariables(CCCJCJJ("!p%w0x}u~")):if instr(CJJCCJ,CCCJCJJ("^D49@@=^25>:?^"))>0 then
Call CheckLogined:if not CCJJJJ and not CCJCCC then Call RedirectMessage(CCCJCJJ("????????,????????????????????????,"))
CCCCJJ=CJCCJC
elseif instr(CJJCCJ,CCCJCJJ("^>^D49@@=^DEF56?E^"))>0 or instr(CJJCCJ,CCCJCJJ("^DEF56?E^"))>0 then
Call CheckLogined:CCCCJJ=CJCCJC
elseif instr(CJJCCJ,CCCJCJJ("^D49@@="))>0 then
CCCCJJ=Request.QueryString(CCCJCJJ("D49@@=")):if not CCJJJCJ(CCCCJJ) then CCCCJJ=Request.QueryString(CCCJCJJ("F"))
if not CCJJJCJ(CCCCJJ) then CCCCJJ=Request.QueryString(CCCJCJJ("D4"))
if not CCJJJCJ(CCCCJJ) then Call RedirectMessage(CCCJCJJ("????????W$49@@=X??@??????????,"))
CCCCJJ=csng(CCCCJJ)
end if:if CCCCJJ=0 then Call RedirectMessage(CCCJCJJ("????????W$49@@=X????W_X??,"))
Dim CJCCJJJ:Call SetConfig:Sub SetConfig():dim CCCJCC,CJJJCJJ:CJJCCJ=CCCJCJJ("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") & CCCCJJ:set CJJJCJJ=CJJJCJ.execute(CJJCCJ):if CJJJCJJ.eof then Call RedirectMessage(CCCJCJJ("??W") & CJJCCC & CCCJCJJ("X??????????W") & CCCCJJ & CCCJCJJ("X????????,"))
ReDim CCCJCC(61):CCCJCC(0)=CJJJCJJ(CCCJCJJ(";:2@H6:")) & "":CCCJCC(1)=CJJJCJJ(CCCJCJJ("EJA6")):CCCJCC(2)=CJJJCJJ(CCCJCJJ("D>D")):CCCJCC(3)=CJJJCJJ(CCCJCJJ("4FDE@>8C@FA")) & "":CCCJCC(4)=CJJJCJJ(CCCJCJJ("D:5632C0@E96C")) & "":CCCJCC(5)=IIf(isnull(CJJJCJJ(CCCJCJJ("E6DEC6DF=EG:6H"))),0,CJJJCJJ(CCCJCJJ("E6DEC6DF=EG:6H"))):CCCJCC(6)=CJJJCJJ(CCCJCJJ("K:IF?E:>6")):CCCJCC(7)=CJJJCJJ(CCCJCJJ("766")):CCCJCC(8)=CJJJCJJ(CCCJCJJ("C6E6DE52J")):CCCJCC(9)=CJJJCJJ(CCCJCJJ("6IA:C652E6")):CCCJCC(10)=CJJJCJJ(CCCJCJJ("E:E=6")):CCCJCC(11)=CJJJCJJ(CCCJCJJ(":?EC@")) & "":CCCJCC(12)=CJJJCJJ(CCCJCJJ("A:4EFC6")) & "":CCCJCC(13)=CJJJCJJ(CCCJCJJ("72>:=J")):CCCJCC(14)=CJJJCJJ(CCCJCJJ("4@AJC:89E")) & "":CCCJCC(15)=IIf(isnull(CJJJCJJ(CCCJCJJ("D6>6DE6C0DE2CE052E6"))),CCCJCJJ("`h__\`\`"),CJJJCJJ(CCCJCJJ("D6>6DE6C0DE2CE052E6"))):CCCJCC(16)=IIf(isnull(CJJJCJJ(CCCJCJJ("K:IF?0E:>6D09:89=:89E"))),0,CJJJCJJ(CCCJCJJ("K:IF?0E:>6D09:89=:89E"))):CCCJCC(17)=CJJJCJJ(CCCJCJJ("4@?E24E")) & "":CCCJCC(18)=CJJJCJJ(CCCJCJJ("D2?5E23=6")):CCCJCC(19)=CJJJCJJ(CCCJCJJ("4C:D:D")):CCCJCC(20)=CJJJCJJ(CCCJCJJ("JJ52E6")):CCCJCC(21)=CJJJCJJ(CCCJCJJ("BB")):CCCJCC(22)=CJJJCJJ(CCCJCJJ("JFJF60D>D0EA=")) & "":CCCJCC(23)=CJJJCJJ(CCCJCJJ("JFJF60E6DE0=3")) & "":CCCJCC(25)=CJJJCJJ(CCCJCJJ("6IA6CE")):CCCJCC(26)=CJJJCJJ(CCCJCJJ(">@5:?7@")):CCCJCC(27)=CJJJCJJ(CCCJCJJ("9@>6A286E@AA:4EFC6")) & "":CCCJCC(28)=CJJJCJJ(CCCJCJJ("4C:D:D=3")):CCCJCC(29)=IIf(CJJJCJJ(CCCJCJJ("4C:D:D@=5")),False,True):CCCJCC(30)=CJJJCJJ(CCCJCJJ("8C@FA8F:52?46")):CCCJCC(31)=CJJJCJJ(CCCJCJJ("3:@7665324<")):CCCJCC(32)=CJJJCJJ(CCCJCJJ("<6JDEC")):CCCJCC(33)=CJJJCJJ(CCCJCJJ("=@8@")) & "":CCCJCC(34)=CJJJCJJ(CCCJCJJ("K:46")):CCCJCC(35)=IIf(CJJJCJJ(CCCJCJJ(":D?6H")),True,False):CCCJCC(36)=121:CCCJCC(37)=111:CCCJCC(38)=160:CCCJCC(39)=CJJJCJJ(CCCJCJJ("8F6DE3@@<")):CCCJCC(40)=CJJJCJJ(CCCJCJJ("75D")):CCCJCC(42)=CJJJCJJ(CCCJCJJ("9@>6=@8:?")):CCCJCC(43)=CJJJCJJ(CCCJCJJ("K:IF?0?6657665324<")):CCCJCC(44)=CJJJCJJ(CCCJCJJ("K:IF?0E:>6D0=:>:E")):CCCJCC(45)=CJJJCJJ(CCCJCJJ("4@>A=6E60:?7@")):CCCJCC(46)=CJJJCJJ(CCCJCJJ("E6DE:?EC@")) & "":CCCJCC(47)=IIf(isnull(CJJJCJJ(CCCJCJJ("JFJF60367@C60E:>6"))),0,CJJJCJJ(CCCJCJJ("JFJF60367@C60E:>6"))):CCCJCC(49)=CJJJCJJ(CCCJCJJ("D>D0C646:G6C")):CCCJCC(50)=CJJJCJJ(CCCJCJJ("D>D0D:8?")) & "":CCCJCC(52)=CJJJCJJ(CCCJCJJ("JFJF602CC2?86")):CCCJCC(53)=IIf(isnull(CJJJCJJ(CCCJCJJ("DEF56?E0BF6DE:@?04@F?E"))),0,CJJJCJJ(CCCJCJJ("DEF56?E0BF6DE:@?04@F?E"))):CCCJCC(54)=CJJJCJJ(CCCJCJJ("9:560=30@FE@7286")):CCCJCC(55)=CJJJCJJ(CCCJCJJ("JFJF60E6DE052JD")):CCCJCC(56)=CJJJCJJ(CCCJCJJ("JFJF60H66<0=:>:E")):CCCJCC(57)=CJJJCJJ(CCCJCJJ("JFJF604964<65")):CCCJCC(58)=CJJJCJJ(CCCJCJJ("K:IF?0?6657665324<0?6IE")):CCCJCC(59)=CJJJCJJ(CCCJCJJ("4964<?6HDEF56?E")):CCCJCC(60)=CJJJCJJ(CCCJCJJ("K:IF?04=@D6052E6")):CJJJCJJ.close : set CJJJCJJ=nothing:if isNull(CCCJCC(8)) or CCCJCC(8)="" then CCCJCC(8)=0
if isdate(CCCJCC(9)) then
CCCJCC(9)=cdate(CCCJCC(9)):if CCCJCC(9)<Date then Call RedirectMessage(CCCJCJJ("????????,????????????????W") & CCCJCC(9) & CCCJCJJ("X??????,"))
end if:if not CCJJJCJ(CCCJCC(20)) then CCCJCC(20)=7
select case CCCJCC(1):case 1,2,16:CCCJCC(36)=159:case 4,5,6,10,11:CCCJCC(36)=190:CCCJCC(37)=178:CCCJCC(38)=191:case 7,13:CCCJCC(36)=164:CCCJCC(37)=178:CCCJCC(38)=179:end select:CJCCJJJ=CCCJCC:End Sub:Function CCJJCCJ(CJJJJJCC):dim CCCJCC(7,1),CCCJCJ,CJCCJJC,CJCCJCJ:CJCCJJC=Array(CCCJCJJ("$49@@="),CCCJCJJ("$EF56?E"),CCCJCJJ("s6AE"),CCCJCJJ("vC256"),CCCJCJJ("r=2DD>2E6"),CCCJCJJ("}F>36C"),CCCJCJJ("%62496C"),CCCJCJJ("!2C6?E")):select case CJCCJJJ(1):case 1,2 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????")):case 3,16 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????")):case 4 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("??????@"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????")):case 5 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????")):case 6 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("??????@"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("??????"),CCCJCJJ("????")):case 7 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("??????"),CCCJCJJ("????")):case 8 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("??????@"),CCCJCJJ("????"),CCCJCJJ("????????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("??????"),CCCJCJJ("????")):case 9 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("??????"),CCCJCJJ("????")):case 10 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("??????"),CCCJCJJ("????")):case 11 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("??????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("??????"),CCCJCJJ("????")):case 12 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("??????"),CCCJCJJ("????")):case 13 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????")):case 14 : CJCCJCJ=Array(CCCJCJJ("??????"),CCCJCJJ("??@??"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("??????"),CCCJCJJ("????")):case 15 : CJCCJCJ=Array(CCCJCJJ("????"),CCCJCJJ("????????"),CCCJCJJ("????"),CCCJCJJ("????????"),CCCJCJJ("????"),CCCJCJJ("????"),CCCJCJJ("??????"),CCCJCJJ("????")):case else : CJCCJCJ=CJCCJJC
end select:for CCCJCJ=0 to Ubound(CCCJCC):CCCJCC(CCCJCJ,0)=CJCCJJC(CCCJCJ):CCCJCC(CCCJCJ,1)=CJCCJCJ(CCCJCJ):next:for CCCJCJ=0 to Ubound(CCCJCC):if CCCJCC(CCCJCJ,0)=CJJJJJCC then
CCJJCCJ=CCCJCC(CCCJCJ,1):exit for
end if:next:End Function::Call CheckRight(14):dim CJCCJCC,CJCCCJJ:CJCCJCC=Request.QueryString(CCCJCJJ("DEF56?E:5")):CJCCCJJ=Request.QueryString(CCCJCJJ("24E")):if not CCJJJCJ(CJCCJCC) then Call RedirectMessage(CCCJCJJ("????????,??????????????,"))
if CJCCCJJ="" then CJCCCJJ=CCCJCJJ("D4")
dim CJJCCJC:set CJJCCJC =new jtree:CJJCCJC.Table=CCCJCJJ(">6>36C0EJA6"):function CCCJJCJ(CJJJJCJJ):dim CJCCCJC:if not CCJJJCJ(CJJJJCJJ) then
CCCJJCJ=CCCJCJJ("????")
else
CJCCCJC=split(CCCJCJJ("????M????M????M????M????"),CCCJCJJ("M")):CCCJJCJ=CJCCCJC(CJJJJCJJ)
end if:End function:Response.Write(vbCrLf):Response.Write(CCCJCJJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CCCJCJJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CCCJCJJ("k9625m") & vbCrLf):Response.Write(CCCJCJJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CCCJCJJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CCCJCJJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CCCJCJJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CCCJCJJ("kE:E=6m")):Response.Write  IIf(CJCCCJJ=CCCJCJJ("D4"),CCCJCJJ("??????????????????????@????"),CCCJCJJ("??????????????????????")):Response.Write(CCCJCJJ("k^E:E=6m") & vbCrLf):Response.Write(CCCJCJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2>2K6F:\36E2^4DD^2>2K6F:]>:?]4DDQm") & vbCrLf):Response.Write(CCCJCJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^4DD^C6A@CE]4DDQm") & vbCrLf):Response.Write(CCCJCJJ("kDEJ=6m") & vbCrLf):Response.Write(CCCJCJJ("]E3 ,L3@C56C\4@==2AD6i4@==2AD6jN") & vbCrLf):Response.Write(CCCJCJJ("]E3 ,E9[]E3 ,E5L ,3@C56Ci`AI ,D@=:5 ,ReeejA255:?8idAIj7@?E\H6:89Ei?@C>2=jN") & vbCrLf):Response.Write(CCCJCJJ("9`L7@?E\D:K6i`gAIj ,E6IE\2=:8?i46?E6CjN") & vbCrLf):Response.Write(CCCJCJJ("k^DEJ=6m") & vbCrLf):Response.Write(CCCJCJJ("kDEJ=6 ,>65:2lQAC:?EQm") & vbCrLf):Response.Write(CCCJCJJ("3@5J ,L ,324<8C@F?5\4@=@Ci ,EC2?DA2C6?Ej ,N") & vbCrLf):Response.Write(CCCJCJJ("2CE:4=6 ,L ,H:5E9i ,`__Tj ,>2C8:?i ,_j ,A255:?8i ,_j ,3@I\D925@Hi ,?@?6j ,324<8C@F?5\4@=@Ci ,EC2?DA2C6?Ej ,N") & vbCrLf):Response.Write(CCCJCJJ("7@@E6C[]?@\H@C5 ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CCCJCJJ("k^DEJ=6m") & vbCrLf):Response.Write(CCCJCJJ("k^9625m") & vbCrLf):Response.Write(CCCJCJJ("k3@5Jm") & vbCrLf):Response.Write(CCCJCJJ("k2CE:4=6 ,4=2DDlQ2>\4@?E2:?6CQm") & vbCrLf):Response.Write(CCCJCJJ(" ,k5:G ,4=2DDlQ:??6CQm") & vbCrLf):Response.Write(CCCJCJJ(" ,")):if CJCCCJJ=CCCJCJJ("D4") then
Response.Write(vbCrLf):Response.Write(CCCJCJJ(" ,k9`m??????????????????????@????k^9`m") & vbCrLf):Response.Write(CCCJCJJ(" ,")):set CJJCJJ=CJJJCJ.execute(CCCJCJJ("D6=64E ,E@A ,` ,Y ,7C@> ,G0>6>36C ,H96C6 ,:5l") & CJCCJCC)::set CJJCJC=CJJJCJ.execute(CCCJCJJ("D6=64E ,E@A ,` ,Y ,7C@> ,4C:D:D042D6 ,H96C6 ,:5l") & CJCCJCC):Response.Write(vbCrLf):Response.Write(CCCJCJJ(" ,kE23=6 ,4=2DDlQE3Qm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ("EJA6?2>6")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ("?F>36C")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ("D6I?2>6")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ("C62=?2>6")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CCJCJCC(CCCJCJJ(">6>36C08C256"),CCCCJJ,CJJCJJ(CCCJCJJ("8C256"))):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,?@HC2Am????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ("3:CE952J")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ(">@3:=6")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m??@????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJC(CCCJCJJ("E62496C")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,C@HDA2?lQcQm??????????@??k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQ ,C@HDA2?lQaQm??????????????????,????????????????,k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQdQm??????????@????,??????@??????????,k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm??????????,")):Response.Write  CCCJJCJ(CJJCJC(CCCJCJJ("=6G6=0KDBK7I"))):Response.Write(CCCJCJJ("k3Cm??????????,")):Response.Write  CCCJJCJ(CJJCJC(CCCJCJJ("=6G6=02DED"))):Response.Write(CCCJCJJ("k3Cm??????????,")):Response.Write  CCCJJCJ(CJJCJC(CCCJCJJ("=6G6=0CD2"))):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQfQm??????@????,k3Cm")):Response.Write  CJJCJC(CCCJCJJ("A2:492")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,C@HDA2?lQdQm??????????@??k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm??????????????@k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQdQm??????????@??k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,C@HDA2?lQaQm????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,C@HDA2?lQaQm????????????????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQbQ ,C@HDA2?lQaQm????????????????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm????????????@??k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m??????????@??????????????????????@??k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQbQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQfQm??????????,k3Cm")):Response.Write  CJJCJC(CCCJCJJ("A2:4920562=")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,C@HDA2?lQgQm????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m??????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m??????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m??????????????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmp]??????, ,??,k3Cmq]??,????, ,??,k3Cmr]????@??, ,??,k3Cms]??????, ,??,k3Cmt]??????????, ,??,k3Cmu]??????????, ,??,k3Cmv]??????????, ,??,k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm????????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQdQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm????????????????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQdQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,C@HDA2?lQcQm????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,C@HDA2?lQcQm????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm??????????????@????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQdQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm??????????????W????????X??@??k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQdQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm??????????????,??????,??????????,k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQdQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm??????????????????????????@??,????????@??,??????,??????????,k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQdQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,C@HDA2?lQcQm????????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm????????????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQbQm????") & vbCrLf):Response.Write(CCCJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm??????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQbQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQbQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQbQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQfQmW????????????????????????????????????,??????@??Xk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQbQm??????@????????k3Cmk3Cmk3Cmk3Cmk5:G ,2=:8?lQC:89EQm??U?3DAjU?3DAjU?3DAj??U?3DAjU?3DAjU?3DAj??k^5:Gmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQbQm??????@????????k3Cmk3Cmk3Cmk3Cmk5:G ,2=:8?lQC:89EQm??U?3DAjU?3DAjU?3DAj??U?3DAjU?3DAjU?3DAj??k^5:Gmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm??????????k3Cmk3Cmk3Cmk5:G ,2=:8?lQC:89EQm??,??????,k3Cm??U?3DAjU?3DAjU?3DAj??U?3DAjU?3DAjU?3DAj??k^5:Gmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCCJCJJ(" ,kD>2==m????,??????????????????,??,????????,??,??????????????,??,????????????????????@????????????,k^D>2==m") & vbCrLf):Response.Write(CCCJCJJ(" ,"))
else
Response.Write(vbCrLf):Response.Write(CCCJCJJ(" ,k9`m??????????????????????k^9`m") & vbCrLf):Response.Write(CCCJCJJ(" ,")):set CJJCJJ=CJJJCJ.execute(CCCJCJJ("D6=64E ,E@A ,` ,Y ,7C@> ,G0>6>36C ,H96C6 ,:5l") & CJCCJCC):set CJJCJC=CJJJCJ.execute(CCCJCJJ("D6=64E ,E@A ,` ,A2:492[A2:4920562=[E62496C ,7C@> ,4C:D:D042D6 ,H96C6 ,:5l") & CJCCJCC):Response.Write(vbCrLf):Response.Write(CCCJCJJ(" ,k5:G ,2=:8?lQC:89EQm??????????,")):Response.Write  CCJCJJJ(Date,6):Response.Write(CCCJCJJ("k^5:Gm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE23=6 ,4=2DDlQE3Qm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ("EJA6?2>6")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ("?F>36C")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ("D6I?2>6")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ("C62=?2>6")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CCJCJCC(CCCJCJJ(">6>36C08C256"),CCCCJJ,CJJCJJ(CCCJCJJ("8C256"))):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ("3:CE952J")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJJ(CCCJCJJ(">@3:=6")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m??@????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m")):Response.Write  CJJCJC(2):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,C@HDA2?lQaQ ,?@HC2Am????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m??????@??k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQeQmkAm")):Response.Write  replace(CJJCJC(0) & "",vbcrlf,CCCJCJJ("k^AmkAm")):Response.Write(CCCJCJJ("k^Amk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQeQmkAm")):Response.Write  replace(CJJCJC(1) & "",vbcrlf,CCCJCJJ("k^AmkAm")):Response.Write(CCCJCJJ("k^Amk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCCJCJJ(" ,")):set CJJCJJ=CJJJCJ.execute(CCCJCJJ("D6=64E ,4@?E6?E[562=[EJA6[52E6E:>6[DE2EFD[E62496C[IF6;:[,H@C<. ,7C@> ,4C:D:D042D60K9F:K@?8 ,H96C6 ,>6>36Cl") & CJCCJCC & CCCJCJJ(" ,2?5 ,52E6E:>6mlV") & CJCCJJJ(15) & CCCJCJJ("V ,@C56C ,3J ,:5"))
while not CJJCJJ.eof:Response.Write(vbCrLf):Response.Write(CCCJCJJ(" ,k3Cm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE23=6 ,4=2DDlQE3Qm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQcQm")):Response.Write  CCJCJJJ(CJJCJJ(3),0):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m??????@??k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQcQmkAm")):Response.Write  replace(CJJCJJ(0),vbcrlf,CCCJCJJ("k^AmkAm")):Response.Write(CCCJCJJ("k^Amk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQcQmkAm")):Response.Write  replace(CJJCJJ(1),vbcrlf,CCCJCJJ("k^AmkAm")):Response.Write(CCCJCJJ("k^Amk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,C@HDA2?lQdQm????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5m????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm????????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm")):Response.Write  CJJCJJ(CCCJCJJ("IF6;:")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm??????@??????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm")):Response.Write  CJJCJJ(CCCJCJJ("H@C<")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm????????k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm")):Response.Write  CJJCJJ(CCCJCJJ("DE2EFD")):Response.Write(CCCJCJJ("k^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCCJCJJ(" ,")):CJJCJJ.movenext:wend:Response.Write(vbCrLf):Response.Write(CCCJCJJ(" ,k3Cm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE23=6 ,4=2DDlQE3Qm") & vbCrLf):Response.Write(CCCJCJJ(" ,kECm") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQbQm??????@????????k3Cmk3Cmk3Cmk3Cmk5:G ,2=:8?lQC:89EQm??U?3DAjU?3DAjU?3DAj??U?3DAjU?3DAjU?3DAj??k^5:Gmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQbQm??????@????????k3Cmk3Cmk3Cmk3Cmk5:G ,2=:8?lQC:89EQm??U?3DAjU?3DAjU?3DAj??U?3DAjU?3DAjU?3DAj??k^5:Gmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,kE5 ,4@=DA2?lQaQm??????????k3Cmk3Cmk3Cmk5:G ,2=:8?lQC:89EQm??,??????,k3Cm??U?3DAjU?3DAjU?3DAj??U?3DAjU?3DAjU?3DAj??k^5:Gmk^E5m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCCJCJJ(" ,"))
end if:Response.Write(vbCrLf):Response.Write(CCCJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CCCJCJJ("k^2CE:4=6m") & vbCrLf):Response.Write(CCCJCJJ("k7@@E6C ,4=2DDlQ2>\47Qm") & vbCrLf):Response.Write(CCCJCJJ(" ,k5:G ,4=2DDlQ2>\7= ,2>\9:56\D>\@?=JQmk: ,4=2DDlQ2>\:4@?\7:=6\E6IEQmk^:m ,")):Response.Write  CJCCJJJ(10):Response.Write(CCCJCJJ(" ,U>:55@Ej ,??????????????????????@????k^5:Gm") & vbCrLf):Response.Write(CCCJCJJ(" ,k5:G ,4=2DDlQ2>\7CQm") & vbCrLf):Response.Write(CCCJCJJ(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\3E?\AC:>2CJ ,2>\3E?\9@==@H ,2>\3E?\IDQ ,:5lQ3E?\AC:?EQmk: ,4=2DDlQ2>\:4@?\AC:?EQmk^:m ,????????k^3FEE@?m") & vbCrLf):Response.Write(CCCJCJJ(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\3E?\AC:>2CJ ,2>\3E?\9@==@H ,2>\3E?\IDQ ,:5lQ3E?\H@C5Qmk: ,4=2DDlQ2>\:4@?\7:=6\H@C5\@Qmk^:m ,??????(@C5????k^3FEE@?m") & vbCrLf):Response.Write(CCCJCJJ(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\3E?\AC:>2CJ ,2>\3E?\9@==@H ,2>\3E?\IDQ ,52E2\2>\D>@@E9\D4C@==mk: ,4=2DDlQ2>\:4@?\2CC@H\FAQmk^:m ,??????k^3FEE@?m") & vbCrLf):Response.Write(CCCJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CCCJCJJ("k^7@@E6Cm") & vbCrLf):Response.Write(CCCJCJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCJCJJ("kD4C:AE ,DC4lQ^$4C:AED^2>2K6F:\36E2^;D^2>2K6F:]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCJCJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]9E>=a5@4I];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCJCJJ("kD4C:AEm") & vbCrLf):Response.Write(CCCJCJJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CCCJCJJ(" ,SWVR3E?\AC:?EVX]@?WV4=:4<V[7F?4E:@?WXLH:?5@H]AC:?EWXNX") & vbCrLf):Response.Write(CCCJCJJ(" ,SWVR3E?\H@C5VX]@?WV4=:4<V[7F?4E:@?WXLSWV2CE:4=6VX]9E>=a5@4IWXNX") & vbCrLf):Response.Write(CCCJCJJ("NX") & vbCrLf):Response.Write(CCCJCJJ("k^D4C:AEm") & vbCrLf):Response.Write(CCCJCJJ("k^3@5Jm") & vbCrLf):Response.Write(CCCJCJJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJCCJC=nothing:set CCJJCJJ=nothing:set CCJJCJC=nothing:set CCJJCCJ=nothing:CJJCJC.Close:Set CJJCJC=Nothing:CJJCJJ.Close:Set CJJCJJ=Nothing:CJJJCJ.Close:Set CJJJCJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CCCJCJJ(ByVal CCCJJCC)
Dim CJCCCCJ, CCCJCJ, CJJJJJC
CCCJJCC = Replace(CCCJJCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CCCJCJ = 1 To Len(CCCJJCC)
If CCCJCJ <> CJJJJJC Then
CJCCCCJ = AscW(Mid(CCCJJCC, CCCJCJ, 1))
If CJCCCCJ >= 33 And CJCCCCJ <= 79 Then
CCCJCJJ = CCCJCJJ & Chr(CJCCCCJ + 47)
ElseIf CJCCCCJ >= 80 And CJCCCCJ <= 126 Then
CCCJCJJ = CCCJCJJ & Chr(CJCCCCJ - 47)
Else
CJJJJJC = CCCJCJ + 1
If Mid(CCCJJCC, CJJJJJC, 1) = Chr(64) Then CCCJCJJ = CCCJCJJ & ChrW(CJCCCCJ + 5) Else CCCJCJJ = CCCJCJJ & Mid(CCCJJCC, CCCJCJ, 1)
End If
End If
Next
End Function
%>

Ms-Dos/Windows Unix Write backup

jsp File Browser version 1.2 by www.vonloesch.de