<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CJJJJJ, CJJJJC,CJJJCJ, CJJJCC, CJJCJJ:Set CJJJJJ = server.CreateObject(CJJJJJCC("ps~sq]r@??64E:@?")):CJJJJJ.open Application(CJJJJJCC("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(CJJJJJCC("!$*|t|qt#"))):if CCJCCC="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CJJCJC>0 then
CJJCJJ=CJJJJJCC("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 & CJJJJJCC("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(CJJJJJCC("6`_254bhch32dh2336de6_df7a_7ggb6"),CJJCCJ)>0 then Call RedirectMessage(CJJJJJCC("弬@寁@矼@，,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,"))
Call SetMemberCookie(CJJCJC,CJJCCJ)
End IF
end if:Sub CheckRight(CJJJJCJJ):dim CCCJJJ,CCCJJC:if CJJCJC=0 then
Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJJJJJCC("癶@彐@俜@恪@夬@敃@，,诲@釈@斫@癶@彐@。,"))
elseIf not CCJCCCJ(CJJJJCJJ) then
Call RedirectMessage(CJJJJJCC("朾@陋@W") & CJJJJCJJ & CJJJJJCC("X袦@祼@歝@，,诲@三@糶@绚@箜@琁@呓@聏@糶@。,"))
end if:End Sub:Function CCJCCCJ(CJJJJCJJ):dim CCCJJJ,CCCJJC:CCCJJC=split(CJJJJCJJ,CJJJJJCC("[")):CCJCCCJ=False:for CCCJJJ=0 to ubound(CCCJJC):If Mid(CJJCCC,CCCJJC(CCCJJJ),1)="1" then
CCJCCCJ=True:exit function
end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CJJJJJCC("!$*|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 CCCJCJ,CCCJCC,CCCJJJ,CCCCJJ,CCCCJC:CCCJCJ=split(CCJCCC,CJJJJJCC("]")):if ubound(CCCJCJ)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CCCJCJ(0)) or len(CCCJCJ(1))<>32 or len(CCCJCJ(2))<>32 then
Call ClearMemberCookie
else
CCCJCC=CCCJCJ(1):for CCCJJJ=1 to len(CCCJCC):CCCCJJ=mid(CCCJCC,CCCJJJ,1):if isnumeric(CCCCJJ) then CCCCJC=CCCCJC & CCCCJJ
if len(CCCCJC)=7 then exit for
next:CCCJCC=CCCJCJ(2):if CCCCJC<>mid(CCCJCC,6,7) then
Call ClearMemberCookie
else
CCCCJJ=mid(CCCJCC,18,10)/2:if CCCCJJ<DateDiff(CJJJJJCC("D"), CJJJJJCC("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CJJCJC=Clng(CCCJCJ(0)):CJJCCJ=CCCJCJ(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CCCJCCJ,CJJJJCJC):dim CCCJJJ,CCCCJJ,CCCCJC:for CCCJJJ=1 to len(CJJJJCJC):CCCCJJ=mid(CJJJJCJC,CCCJJJ,1):if isnumeric(CCCCJJ) then CCCCJC=CCCCJC & CCCCJJ
if len(CCCCJC)=7 then exit for
next:CCCCJC=CCCJCCJ & CJJJJJCC("]") & CJJJJCJC & CJJJJJCC("]") & Fix(10000*(Rnd+1)) & CCCCJC & Fix(10000*(Rnd+1)) & DateDiff(CJJJJJCC("D"), CJJJJJCC("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJJJJJCC("!$*|t|qt#"))=CCCCJC:End Sub::::Const CCJCJCC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::Sub Debug(str):response.Charset=CJJJJJCC("FE7\g"):dim CCCJJJ,CCCCJJ,CCCCCJ:if isarray(str) then
on error resume next:CCCJJJ=ubound(str,2):CCCCCJ=err.number:err.clear:on error goto 0:if CCCCCJ<>0 then
for CCCJJJ=0 to ubound(str):if CCCJJJ>0 then response.Write CJJJJJCC("k3C ,^m")
response.Write CCCJJJ & CJJJJJCC("i ,") & str(CCCJJJ):next
else
response.Write CJJJJJCC("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m")
for CCCJJJ=0 to ubound(str,2):response.Write CJJJJJCC("kE9 ,2=:8?lV=67EVm") & CCCJJJ & CJJJJJCC("k^E9m")
next:response.Write CJJJJJCC("k^ECm"):for CCCJJJ=0 to ubound(str):response.Write CJJJJJCC("kECmkE9m") & CCCJJJ & CJJJJJCC("k^E9m"):for CCCCJJ=0 to ubound(str,2):response.Write CJJJJJCC("kE5m") & str(CCCJJJ,CCCCJJ) & CJJJJJCC("k^E5m"):next:response.Write CJJJJJCC("k^ECm"):next:response.Write CJJJJJCC("k^E23=6m")
end if
elseif isnull(str) then
response.Write CJJJJJCC(",}F==.")
else
Response.Write replace(str,vbcrlf,CJJJJJCC("k3Cm"))
end if:Call ConnClose:Response.End:End Sub::Sub SetHttpOnlyCookie(CJJJJCCJ,CJJJJCCC):dim CCCJCJ:CCCJCJ=CJJJJCCJ & CJJJJJCC("l") & CJJJJCCC & CJJJJJCC("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJJJJJCC("$6E\r@@<:6"),CCCJCJ):End Sub::::::sub ShowMessage(CJJJCJJJ):response.Charset="utf-8":Response.Write CJJJJJCC("k3Cmk5:G ,2=:8?lV46?E6CVmk5:G ,DEJ=6lV4@=@CiC65j ,7@?E\H6:89Ei3@=5j ,E6IE\2=:8?i46?E6Cj ,3@C56Ci`AI ,D@=:5 ,Rrrrrrrj ,324<8C@F?5\4@=@CiRtgtgtgj ,A255:?8icAI ,aAI ,aAIj ,H:5E9ibd_AIj ,7@?E\D:K6i`aAIVm") & CJJJCJJJ & CJJJJJCC("k^5:Gmk^5:Gmk3Cm")
end sub:Function CCJCCCC(CCCCCJ):if isnull(CCCCCJ) or trim(CCCCCJ)="" or not isnumeric(CCCCCJ) then
CCJCCCC=false
else
Dim CCCCCC:Set CCCCCC = New RegExp:CCCCCC.Pattern = CJJJJJCC("/-5ZS"):CCCCCC.IgnoreCase = True:CCJCCCC = CCCCCC.test(CCCCCJ):set CCCCCC=nothing
end if:End Function:Function CCCJJJJ(CJJJCJJC):dim CJJJJJJ,CJJJJJC:CJJJJJJ=CJJJJJCC("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CJJJCJJC & CJJJJJCC("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJJJJJC=CJJJJJ.execute(CJJJJJJ):CCCJJJJ = CJJJJJC(0):if isnull(CCCJJJJ) then CCCJJJJ=1
CJJJJJC.close : set CJJJJJC=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CJJJCJC=nothing:set CCCJJJC=nothing:set CCCJJCJ=nothing:set CCCJJCC=nothing:CJJJJJC.close : set CJJJJJC=nothing:CJJJCC.Close : Set CJJJCC=Nothing:CJJJCJ.Close : Set CJJJCJ=Nothing:CCCJCJJ.Close : Set CCCJCJJ = Nothing:CJJJJJ.Close : Set CJJJJJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJJJCJJJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJJJJJCC("!$*0|6DD286"),server.URLEncode(CJJJCJJJ)):Response.Redirect CJJJJJCC("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::::::::Sub CheckQueryTime(CJJJCJCJ,CJJJCJCC):dim str,CCCCCJ:str=CJJJJJCC("!$*0") & Ucase(CJJJCJCJ):if Session(str)<>"" then
CCCCCJ=DateDiff(CJJJJJCC("D"),Session(str),Time):if CCCCCJ<CJJJCJCC and CCCCCJ>0 then
Call ConnClose:Call ShowMessage(CJJJJJCC("柠@话@闯@随@忀@顶@夢@争@ ,") & CJJJCJCC & CJJJJJCC(" ,种@，,迓@剤@ ,") & CJJJCJCC-CCCCCJ & CJJJJJCC(" ,种@！,")):response.End()
else
Session.Contents.Remove(str)
end if
end if:Session(str)=Time:End Sub:::::::Sub ArrayInit(CJJJCCJJ):dim CCCJJJ,CCCCJJ,CJJJJCC,CJJJCJJ:on error resume next:CJJJJCC=ubound(CJJJCCJJ):CJJJCJJ=ubound(CJJJCCJJ,2):if err.number<>0 then
err.clear:for CCCJJJ=0 to CJJJJCC:CJJJCCJJ(CCCJJJ)=0:next
else
for CCCJJJ=0 to CJJJJCC:for CCCCJJ=0 to CJJJCJJ:CJJJCCJJ(CCCJJJ,CCCCJJ)=0:next:next
end if:End Sub:::Sub ClearCache(CJJJCCJC):Application.Contents.Remove CJJJCCJC
End Sub::Class jTree:Private CJJCJJ, CJJJCJC, CJJJCCJ, CJJJCCC,CJJCJJJ,CJJCJJC,CJJCJCJ,CJJCJCC:Private Sub Class_Initialize():CJJJCCJ = 0:CJJJCCC = 0:CJJCJCC=10:End Sub:Public Property Let Table(CJJJCCCJ):if CJJJCCCJ="" then Call RedirectMessage(CJJJJJCC("寴@丈@赲@，,;%C66籶@宙@來@匑@旱@沜@朄@讹@罩@忀@襼@癿@屙@怢@！,"))
CJJCJJJ=CJJJCCCJ:CJJCJJC=CJJJJJCC("!$*0") & UCase(CJJCJJJ):Call GetTreeArray:End Property:Public Property Get Table():Table=CJJCJJJ:End Property:::Private Sub GetTreeArray():Dim CCCJJJ, CCCCJJ, CJJCCJJ,CJJCCJC:CJJJCJC = Application(CJJCJJC):If Not IsArray(CJJJCJC) Then
CJJCJJ = CJJJJJCC("D6=64E ,4@F?EW:5X ,7C@> ,") & CJJCJJJ:if CJJCJCJ<>"" then CJJCJJ=CJJCJJ & CJJJJJCC(" ,H96C6 ,") & CJJCJCJ
set CJJCCJJ=CJJJJJ.execute(CJJCJJ):CJJCCJC=CJJCCJJ(0):if CJJCCJC=0 then Call RedirectMessage(CJJJJJCC("柠@话@W") & CJJCJJJ & CJJJJJCC("^") & CJJCJCJ & CJJJJJCC("X沜@朄@绎@林@敫@捩@"))
CJJJCCC=CJJCCJC+CJJCJCC:ReDim CJJJCJC(CJJJCCC, 4):CJJCJJ = CJJJJJCC("D6=64E ,:5[A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCJJJ & CJJJJJCC(" ,H:E9 ,W?@=@4<X"):if CJJCJCJ<>"" then CJJCJJ=CJJCJJ & CJJJJJCC(" ,H96C6 ,") & CJJCJCJ
CJJCJJ=CJJCJJ & CJJJJJCC(" ,@C56C ,3J ,D@CE[:5"):set CJJCCJJ=CJJJJJ.execute(CJJCJJ):For CCCJJJ = 1 To CJJCCJC:For CCCCJJ = 0 To 4:CJJJCJC(CCCJJJ, CCCCJJ) = CJJCCJJ(CCCCJJ):if IsNull(CJJJCJC(CCCJJJ,4)) then CJJJCJC(CCCJJJ,4)=0
If CJJJCJC(CCCJJJ,2)="" then CJJJCJC(CCCJJJ,2)=CJJJJJCC(",穵@.")
Next:CJJCCJJ.MoveNext:Next:CJJCCJJ.Close: Set CJJCCJJ = Nothing:for CCCJJJ=CJJJCCC-(CJJCJCC-1) to CJJJCCC:CJJJCJC(CCCJJJ,0)=CCCJJJ:next:Application.Lock():Application(CJJCJJC) = CJJJCJC:Application.UnLock()
else
CJJJCCC=Ubound(CJJJCJC)
End If:End Sub::::Public Function GetChild(CCCJCCJ):Dim CCCJJJ, Str:CCCJCCJ=CLng(CCCJCCJ):For CCCJJJ = 1 To CJJJCCC:If CJJJCJC(CCCJJJ, 1) = CCCJCCJ Then Str = Str & CJJJJJCC("M") & CJJJCJC(CCCJJJ, 0) & CJJJJJCC("M") & CJJJCJC(CCCJJJ,2)
Next:If Str <> "" Then Str = Mid(Str, 2)
GetChild = Split(str,CJJJJJCC("M")):End Function:Private Function CCCCJJJ(CCCJCCJ):dim CCCJJJ,CJJCCCJ:CCCCJJJ=0:CJJCCCJ=CStr(CCCJCCJ):if CJJCCCJ<>"0" then
for CCCJJJ=1 to CJJJCCC:If CStr(CJJJCJC(CCCJJJ, 0))=CJJCCCJ Then
CCCCJJJ = CCCJJJ:Exit For
End If:Next
end if:End Function:Public Function GetCurName(CCCJCCJ):if Cstr(CCCJCCJ)="0" then
GetCurName=CJJJJJCC("栴@")
else
Dim CCCJJJ,CJJCCJJ:CCCJJJ=CCCCJJJ(CCCJCCJ):if CCCJJJ>0 then
GetCurName=CJJJCJC(CCCJJJ,2):if GetCurName="" then
set CJJCCJJ=CJJJJJ.execute(CJJJJJCC("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCJJJ & CJJJJJCC(" ,H96C6 ,:5l") & CCCJCCJ):if CJJCCJJ.eof then Call RedirectMessage(CJJJJJCC("xs（,") & CCCJCCJ & CJJJJJCC("）,朥@批@别@"))
GetCurName=CJJCCJJ(1):Call UpdateCache(CCCJCCJ,CJJCCJJ(0),GetCurName,CJJCCJJ(2),CJJCCJJ(3)):CJJCCJJ.Close: Set CJJCCJJ = Nothing
end if
else
set CJJCCJJ=CJJJJJ.execute(CJJJJJCC("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCJJJ & CJJJJJCC(" ,H96C6 ,:5l") & CCCJCCJ):if CJJCCJJ.eof then Call RedirectMessage(CJJJJJCC("xs（,") & CCCJCCJ & CJJJJJCC("）,朥@批@别@"))
GetCurName=CJJCCJJ(1):Call UpdateCache(CCCJCCJ,CJJCCJJ(0),GetCurName,CJJCCJJ(2),CJJCCJJ(3)):CJJCCJJ.Close: Set CJJCCJJ = Nothing
end if
end if:End Function:::Public Function CCCCJCJ(CCCJCCJ):Dim CCCJJJ,CJJCCCC:CCCJJJ=CCCCJJJ(CCCJCCJ):if CCCJJJ=0 then
CJJCCCC=CCCCJCC(CCCJCCJ)
else
CJJCCCC=CJJJCJC(CCCJJJ,3):if isnull(CJJCCCC) or CJJCCCC="" then
CJJCCCC=CCCCJCC(CCCJCCJ)
elseif Mid(CJJCCCC,instrrev(CJJCCCC,CJJJJJCC("["))+1)<>CStr(CCCJCCJ) then
CJJCCCC=CCCCJCC(CCCJCCJ)
elseif Left(CJJCCCC,1)=CJJJJJCC("[") then
CJJCCCC=CCCCJCC(CCCJCCJ)
end if
end if:CCCCJCJ=CJJCCCC:End Function:Private Function CCCCJCC(CCCJCCJ):dim CJJCCCJ:CJJCCCJ=CStr(CCCJCCJ):if CJJCCCJ="0" then
CCCCJCC=""
else
dim CJJCCJJ:set CJJCCJJ=CJJJJJ.execute(CJJJJJCC("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCJJJ & CJJJJJCC(" ,H96C6 ,:5l") & CCCJCCJ):if CJJCCJJ.eof then
Call UpdateCache(CCCJCCJ,"","","",""):Call RedirectMessage(CJJJJJCC("顴@盩@（,xs：,") & CCCJCCJ & CJJJJJCC("）,丈@孓@圣@，,诲@患@迏@囙@吉@釈@斫@擈@佗@。,"))
else
if CJJCCJJ(0)=0 then
CCCCJCC="0," & CCCJCCJ
else
CCCCJCC=CCCCJCJ(CJJCCJJ(0)) & CJJJJJCC("[") & CCCJCCJ
end if:if CJJCCJJ(2)<>CCCCJCC then
CJJJJJ.execute CJJJJJCC("FA52E6 ,") & CJJCJJJ & CJJJJJCC(" ,D6E ,A2E9lV") & CCCCJCC & CJJJJJCC("V ,H96C6 ,:5l") & CCCJCCJ
else
CCCCJCC=CJJCCJJ(2)
end if
end if:Call UpdateCache(CCCJCCJ,CJJCCJJ(0),CJJCCJJ(1),CCCCJCC,CJJCCJJ(3)):CJJCCJJ.Close: Set CJJCCJJ = Nothing
end if:End Function::::Public Function IsParent(CJJJCCCC, CJJCJJJJ):IsParent=InStr(CCCCJCJ(CJJCJJJJ) & CJJJJJCC("["), CJJJJJCC("[") & CJJJCCCC & CJJJJJCC("[")) > 0:End Function::::::::Public Function Sql_GetChildren(CCCJCCJ):dim CJJCCCC:CJJCCCC=CCCCJCJ(CCCJCCJ):Sql_GetChildren = CJJCJJJ & CJJJJJCC("0A2E9ZV[V ,=:<6 ,V") & CJJCCCC & CJJJJJCC("[TV")
End Function::::::::::Public Sub ClearCache():Application.Contents.Remove CJJCJJC
End Sub:Public Sub UpdateCache(CCCJCCJ,CJJCJJJC,CJJCJJCJ,CJJCCCC,CJJCJJCC):dim CCCJJJ,CCCCJJ:CCCJCCJ=CLng(CCCJCCJ):CCCJJJ=CCCCJJJ(CCCJCCJ):if CJJCJJJC="" and CJJCJJCJ="" and CJJCCCC="" and CJJCJJCC="" then
if CCCJJJ>0 then
for CCCCJJ=1 to 4:CJJJCJC(CCCJJJ,CCCCJJ)=Null:next
end if
else
if CCCJJJ=0 then
for CCCCJJ=1 to CJJJCCC:if CJJJCJC(CCCCJJ,1) & ""="" then
CCCJJJ=CCCCJJ:exit for
end if:next
end if:if CCCJJJ=0 then
Call ClearCache
else
CJJJCJC(CCCJJJ,0)=CLng(CCCJCCJ):if CJJCJJJC<>"" then CJJJCJC(CCCJJJ,1)=CLng(CJJCJJJC)
if CJJCJJCJ<>"" then CJJJCJC(CCCJJJ,2)=CJJCJJCJ
if CJJCCCC<>"" then CJJJCJC(CCCJJJ,3)=CJJCCCC
if CJJCJJCC<>"" then CJJJCJC(CCCJJJ,4)=CLng(CJJCJJCC)
end if
end if:if CCCJJJ>0 then
Application.Lock():Application(CJJCJJC) = CJJJCJC:Application.UnLock()
end if:End Sub:Private Sub Debug(CJJJCJJJ):Call ConnClose:Response.Write CJJJCJJJ:Response.End:End Sub:Private Function CCCJJJJ():CCCJJJJ=CCCCCCJ+1:End Function:Private Function CCCCCCJ():dim CJJJJJC:set CJJJJJC=CJJJJJ.execute(CJJJJJCC("D6=64E ,E@A ,` ,:5 ,7C@> ,") & CJJCJJJ & CJJJJJCC(" ,@C56C ,3J ,:5 ,56D4")):CCCCCCJ=CJJJJJC(0):CJJJJJC.Close: Set CJJJJJC = Nothing:End Function:Private Sub Class_Terminate():End Sub:End Class::Const CCJCCJJ=98:Const CCJCCJC="心理健康自我评价表":Call CheckRight("54,81"):Call CheckQueryTime(CJJJJJCC("%6DE0#6A@CE"),30):dim CJCJJJJ,CJCJJJC,CJCJJCJ,CJCJJCC,CJCJCJJ,CJCJCJC:CJCJCJC=Request.QueryString(CJJJJJCC("$49@@=")):CJCJJJJ=Request.QueryString(CJJJJJCC("s6AE")):CJCJJJC=Request.QueryString(CJJJJJCC("vC256")):CJCJJCJ=Request.QueryString(CJJJJJCC("vC@FA")):CJCJJCC=Request.QueryString(CJJJJJCC("E`")):CJCJCJJ=Request.QueryString(CJJJJJCC("Ea")):if not CCJCCCC(CJCJJJJ) then Call RedirectMessage(CJJJJJCC("寴@丈@赲@，,糶@绚@厽@敫@丝@夬@！,"))
dim CJJJCJC:set CJJJCJC=new jtree:CJJJCJC.table=CJJJJJCC(">6>36C0EJA6"):if not CJJJCJC.IsParent(CJCJJJ,CJCJJJJ) then Call RedirectMessage(CJJJJJCC("诠@苾@囯@W") & CJCJJJJ & CJJJJJCC("X丈@圣@患@W") & CJCJJJ & CJJJJJCC("X癿@箜@琁@苾@囯@冀@。,"))
dim CCCCCCC:CCCCCCC=CJJJCJC.GetChild(CJCJJJJ):if ubound(CCCCCCC)<0 then Call RedirectMessage(CJJJJJCC("苾@囯@诲@丈@襼@逄@别@曻@庐@尽@！,"))
CCCCCCC=join(CCCCCCC,CJJJJJCC("M")) & CJJJJJCC("M_M共@仑@"):CCCCCCC=split(CCCCCCC,CJJJJJCC("M")):dim CJCJCCJ:CJCJCCJ=CJJJCJC.GetCurName(CJCJJJJ):dim CJCJCCC,CJCCJJJ(5):CJCJCCC=split(CJJJJJCC("無@蹼@祙@绊@痂@M歂@斪@庐@采@M粹@祙@刁@袽@M蹼@邼@痂@M抌@邼@痂@M祙@绊@责@M徾@琁@痂@犱@挂@敫@"),CJJJJJCC("M")):CJCCJJJ(0)=CJJJJJCC("轾@張@烃@癿@愚@别@無@虌@、,索@弛@"):CJCCJJJ(1)=CJJJJJCC("惀@绥@明@澻@劣@，,只@胸@伕@朄@一,亖@躦@低@癿@丈@追@痂@犱@"):CJCCJJJ(2)=CJJJJJCC("乛@惪@导@门@臥@巬@，,愚@别@臥@巬@圣@三@呣@囯@亵@壿@争@圣@粹@祙@丅@壿@争@一,秈@随@禶@犱@忼@"):CJCCJJJ(3)=CJJJJJCC("惀@绥@叓@匑@夢@，,偕@了@宴@明@冭@劣@"):CJCCJJJ(4)=CJJJJJCC("宴@明@愚@别@惀@愚@佉@萸@，,抌@邼@悭@覽@"):CJCCJJJ(5)=CJJJJJCC("惀@绥@丈@種@宕@，,敊@愚@，,帳@愚@规@丈@宄@，,喗@欝@迸@氽@宇@羉@"):dim CCCJJJ,CCCCJJ,CCCCJC,CJCCJJC,CJCCJCJ,CJCCJCC:dim CJCCCJJ():redim CJCCCJJ((ubound(CCCCCCC)-1)/2,22):for CCCJJJ=0 to ubound(CCCCCCC)-1 step 2:CCCCJC=CCCJJJ/2:CJCCCJJ(CCCCJC,0)=CCCCCCC(CCCJJJ):CJCCCJJ(CCCCJC,1)=CCCCCCC(CCCJJJ+1):for CCCCJJ=2 to ubound(CJCCCJJ,2):CJCCCJJ(CCCCJC,CCCCJJ)=0:next:next:dim CJCCCJC(1,21):Call ArrayInit(CJCCCJC):CJCCCJC(0,0)=CJJJJJCC("甲@"):CJCCCJC(1,0)=CJJJJJCC("奮@"):dim CCCJJC,CJCCCCJ,CJCCCCC,CCJJJJJ:dim CCJJJJC,CCJJJCJ:CCJJJJC=Date:CCJJJCJ=cdate(CJJJJJCC("a___\`\`")):dim CCJJJCC(6,10):Call ArrayInit(CCJJJCC):CJJCJJ=CJJJJJCC("D6=64E ,>6>36C0EJA60A2E9[52E6E:>6[D6I[D4@C60C2H[C6DF=E[E6DE286[C62=?2>6[?F>36C[:5 ,7C@> ,G0E6DE ,H:E9 ,W?@=@4<X ,H96C6 ,=3l") & CCJCCJJ & CJJJJJCC(" ,2?5 ,G2=:5l`"):if cstr(CJCJJJJ)=cstr(CJCJCJC) then CJJCJJ=CJJCJJ & CJJJJJCC(" ,2?5 ,>6>36C0EJA60E@Al") & CJCJCJC else CJJCJJ=CJJCJJ & CJJJJJCC(" ,2?5 ,") & CJJJCJC.Sql_GetChildren(CJCJJJJ)
if CCJCCCC(CJCJJJC) then CJJCJJ=CJJCJJ & CJJJJJCC(" ,2?5 ,8C256l") & CJCJJJC
if CCJCCCC(CJCJJCJ) then CJJCJJ=CJJCJJ & CJJJJJCC(" ,2?5 ,4FDE@>8C@FAl") & CJCJJCJ
if isdate(CJCJJCC) then CJJCJJ=CJJCJJ & CJJJJJCC(" ,2?5 ,52E6E:>6mlV") & CJCJJCC & CJJJJJCC("V")
if isdate(CJCJCJJ) then CJJCJJ=CJJCJJ & CJJJJJCC(" ,2?5 ,52E6E:>6kV") & cdate(CJCJCJJ)+1 & CJJJJJCC("V")
set CJJJCJ=CJJJJJ.execute(CJJCJJ):if CJJJCJ.eof then Call RedirectMessage(CJJJJJCC("寴@丈@赲@，,沜@朄@浆@访@讫@彐@。,"))
while not CJJJCJ.eof:CCCCJC=CJJJCJ(1):if CCCCJC<CCJJJJC then CCJJJJC=CCCCJC
if CCCCJC>CCJJJCJ then CCJJJCJ=CCCCJC
if isnull(CJJJCJ(3)) then Call RedirectMessage(CJJJCJ(6) & CJJJJJCC("（,") & CJJJCJ(7) & CJJJJJCC("）,癿@浆@诐@讫@彐@丨@朄@旛@敃@敫@捩@（,") & CJJJCJ(8) & CJJJJJCC("）,，,诲@柠@话@凵@杠@吉@创@陟@。,"))
CCCJJC=split(CJJJCJ(3),CJJJJJCC("M")):for CCCJJJ=0 to 5:CCJJJCC(CCCJJJ,0)=CCJJJCC(CCCJJJ,0) & CJJJJJCC("M") & CCCJJC(CCCJJJ):next:CCJJJCC(6,0)=CCJJJCC(6,0) & CJJJJJCC("M") & CCCJJC(7):CCCJJC=split(CJJJCJ(4),CJJJJJCC("M")):for CCCJJJ=0 to 5:CCCCJC=cint(CCCJJC(CCCJJJ))+2:CCJJJCC(CCCJJJ,CCCCJC)=CCJJJCC(CCCJJJ,CCCCJC)+1:next:CCCCJC=cint(CCCJJC(7))+5:CCJJJCC(6,CCCCJC)=CCJJJCC(6,CCCCJC)+1:if CJJJCJ(2) then CCCCJJ=0 else CCCCJJ=1
CJCCCJC(CCCCJJ,1)=CJCCCJC(CCCCJJ,1)+1:CCCJJC=split(CJJJCJ(3),CJJJJJCC("M")):for CCCJJJ=0 to 5:CCCCJC=CCCJJJ+2:CJCCCJC(CCCCJJ,CCCCJC)=CJCCCJC(CCCCJJ,CCCCJC) & CJJJJJCC("M") & CCCJJC(CCCJJJ):next:CJCCCJC(CCCCJJ,8)=CJCCCJC(CCCCJJ,8) & CJJJJJCC("M") & CCCJJC(7):CCCJJC=split(CJJJCJ(4),CJJJJJCC("M")):for CCCJJJ=0 to 5:CCCCJC=CCCJJJ+9:if CCCJJC(CCCJJJ)="2" then CJCCCJC(CCCCJJ,CCCCJC)=CJCCCJC(CCCCJJ,CCCCJC)+1
next:CCJJJJJ=CCJJJJJ+CJJJCJ(5):CCCJJC=split(CJJJCJ(3),CJJJJJCC("M")):CCCCJJ=ubound(CJCCCJJ):for CCCJJJ=0 to CCCCJJ-1:if instr(CJJJCJ(0) & CJJJJJCC("["),CJJJJJCC("[") & CJCCCJJ(CCCJJJ,0) & CJJJJJCC("["))>0 then
CCCCJJ=CCCJJJ:exit for
end if:next:CCCJJJ=CCCCJJ:CJCCCJJ(CCCJJJ,2)=CJCCCJJ(CCCJJJ,2)+1:for CCCCJJ=0 to 5:CCCCJC=CCCCJJ+3:CJCCCJJ(CCCJJJ,CCCCJC)=CJCCCJJ(CCCJJJ,CCCCJC) & CJJJJJCC("M") & CCCJJC(CCCCJJ):next:CJCCCJJ(CCCJJJ,9)=CJCCCJJ(CCCJJJ,9) & CJJJJJCC("M") & CCCJJC(7):CCCJJC=split(CJJJCJ(4),CJJJJJCC("M")):for CCCCJJ=0 to 5:CCCCJC=CCCCJJ+17:if CCCJJC(CCCCJJ)="2" then CJCCCJJ(CCCJJJ,CCCCJC)=CJCCCJJ(CCCJJJ,CCCCJC)+1
next:CJCCCCJ=CJCCCCJ+1:CJJJCJ.movenext:wend:Response.Write(vbCrLf):Response.Write(CJJJJJCC("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJJJJJCC("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJJJJJCC("k9625m") & vbCrLf):Response.Write(CJJJJJCC("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJJJJJCC("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJJJJJCC("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJJJJJCC("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJJJJJCC("kE:E=6m")):Response.Write  CJCJCCJ:Response.Write(CJJJJJCC("\")):Response.Write  CCJCCJC:Response.Write(CJJJJJCC("绎@林@抠@呅@k^E:E=6m") & vbCrLf):Response.Write(CJJJJJCC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2>2K6F:\36E2^4DD^2>2K6F:]>:?]4DDQm") & vbCrLf):Response.Write(CJJJJJCC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2FE@4;D^4DD^2FE@4]>:?]4DDQm") & vbCrLf):Response.Write(CJJJJJCC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^4DD^C6A@CE]4DDQm") & vbCrLf):Response.Write(CJJJJJCC("kDEJ=6m") & vbCrLf):Response.Write(CJJJJJCC("k^DEJ=6m") & vbCrLf):Response.Write(CJJJJJCC("kDEJ=6 ,>65:2lQAC:?EQm") & vbCrLf):Response.Write(CJJJJJCC("3@5J ,L ,324<8C@F?5\4@=@Ci ,EC2?DA2C6?Ej ,N") & vbCrLf):Response.Write(CJJJJJCC("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(CJJJJJCC("7@@E6C[]@FE=:?6\@FED:56[]?@\H@C5 ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CJJJJJCC("k^DEJ=6m") & vbCrLf):Response.Write(CJJJJJCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJJCC("kD4C:AE ,DC4lQ^$4C:AED^6492CED^6492CED]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJJCC("k^9625m") & vbCrLf):Response.Write(CJJJJJCC("k3@5Jm") & vbCrLf):Response.Write(CJJJJJCC("k2CE:4=6 ,4=2DDlQ2>\4@?E2:?6CQm") & vbCrLf):Response.Write(CJJJJJCC(" ,k5:G ,4=2DDlQ:??6CQm") & vbCrLf):Response.Write(CJJJJJCC(" ,k9`mkD>2==m")):Response.Write  CJCJCCJ:Response.Write(CJJJJJCC("k^D>2==mk3Cm")):Response.Write  CCJCCJC:Response.Write(CJJJJJCC("浆@诐@绎@林@抠@呅@k^9`m") & vbCrLf):Response.Write(CJJJJJCC(" ,k9am一,、,浆@诐@巠@兲@k^9am") & vbCrLf):Response.Write(CJJJJJCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm徾@琁@偠@庲@臥@戌@访@仲@衣@丵@臥@访@释@衣@，,昪@戋@幯@亵@徾@琁@偠@庲@诅@斨@癿@一,秈@筻@明@巠@兲@，,幺@泖@産@争@粹@祙@秌@丯@庅@、,粹@祙@卦@甚@课@柠@咇@徾@琁@咣@话@宙@跰@。,栴@捩@浆@诐@绎@林@，,只@封@袦@诐@癿@徾@琁@偠@庲@犱@冰@刁@丵@e严@筄@红@：,徾@琁@偠@庲@犱@忼@轾@奸@、,埵@朧@偠@庲@、,一,舧@偠@庲@、,孓@圣@一,亖@徾@琁@疹@痀@癿@彼@允@、,只@胸@悞@朄@柋@秈@稆@庡@癿@徾@琁@疹@痀@、,只@胸@悞@朄@每@轾@丠@釈@癿@徾@琁@疹@痀@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm朧@释@衣@兲@低@刍@刁@丵@七,严@绯@庡@，,刁@刦@丵@：,無@蹼@祙@绊@痂@、,歂@斪@庐@采@、,粹@祙@刁@袽@痂@、,蹼@邼@痂@、,抌@邼@痂@、,祙@绊@责@、,掤@饫@怢@。,掤@饫@怢@迂@髓@癿@闩@卲@封@见@丵@旛@敃@闩@卲@，,丈@伕@讜@兠@囝@低@绚@讜@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJJJCC(" ,k42AE:@?m衣@` ,徾@琁@偠@庲@臥@戌@访@仲@衣@叿@绯@庡@觞@釅@k^42AE:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECmkE5m無@蹼@祙@绊@痂@k^E5mkE5m夯@痖@、,夯@釈@、,盩@眤@，,尊@尊@刵@澻@侺@伕@力@忦@徾@跮@，,徾@怘@敞@乬@，,拀@徾@夬@贠@，,拀@徾@了@惀@癿@绎@林@丈@奸@，,帳@帳@朄@秈@秈@丈@宄@咇@恋@惢@丈@甬@臥@丶@圫@涇@丅@徾@夯@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECmkE5m歂@斪@庐@采@k^E5mkE5m只@胸@伕@圣@沜@朄@躦@低@斴@靝@癿@痂@犱@旱@仠@躦@低@痂@犱@杠@衣@玫@臥@巬@癿@欭@朖@，,臥@戌@愊@证@轾@張@，,惀@愚@又@序@張@烃@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECmkE5m粹@祙@刁@袽@痂@k^E5mkE5m宴@明@臥@戌@导@门@，,缵@乊@亵@惀@呮@，,愚@别@三@呣@囯@亵@圣@粹@祙@丅@壿@争@一,秈@随@禶@犱@忼@，,朄@旱@伕@凵@玫@并@吧@我@一,亖@丈@笡@吃@玫@宙@癿@惮@泐@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECmkE5m蹼@邼@痂@k^E5mkE5m粹@劖@兀@沖@，,绊@帳@壿@争@兯@奆@犱@忼@，,惀@绥@叓@匑@夢@，,偕@了@明@冭@劣@，,叓@匑@旛@帳@，,奸@再@除@，,寴@夬@贠@缵@乊@又@盼@忼@庡@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECmkE5m抌@邼@痂@k^E5mkE5m缵@乊@洶@劖@、,兯@趞@，,惀@绥@涃@沄@，,宴@明@索@弛@，,伕@丵@一,亖@丈@忀@襼@癿@了@惀@拀@徾@，,迂@刁@釈@见@夬@贠@，,丵@復@尊@癿@巩@锔@苡@恷@丈@堥@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECmkE5m祙@绊@责@k^E5mkE5m贞@件@徾@淜@蕿@，,丈@月@箜@敔@咇@纡@杚@，,明@三@亵@双@甚@冭@穼@；,明@朄@丈@宄@兣@愚@，,帇@朖@胸@攴@叓@甚@洶@玪@塾@，,喗@欝@迸@氽@宇@羉@；,惀@绥@丈@種@宕@，,缵@乊@臥@刱@劖@，,宴@明@怠@蹼@、,双@脹@氏@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECmkE5m掤@饫@怢@k^E5mkE5m掤@饫@怢@超@髓@，,刔@浆@诐@绎@林@超@丈@只@俜@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECmkE5 ,?@HC2Am徾@琁@痂@犱@挂@敫@k^E5mkE5m仞@衣@徾@琁@偠@庲@犱@冰@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,k9am亇@、,浆@诐@旱@闯@k^9am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm")):Response.Write  formatdatetime(CCJJJJC,1):Response.Write(CJJJJJCC("～,")):Response.Write  formatdatetime(CCJJJCJ,1):Response.Write(CJJJJJCC("k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,k9am丄@、,浆@诐@羟@低@k^9am") & vbCrLf):Response.Write(CJJJJJCC(" ,kF=m") & vbCrLf):Response.Write(CJJJJJCC(" ,k=:m楽@迫@：, ,公@讜@")):Response.Write  CJCCCCJ:Response.Write(CJJJJJCC("亵@厽@三@，,共@丨@甲@怢@")):Response.Write  CJCCCJC(0,1):Response.Write(CJJJJJCC("亵@，,奮@怢@")):Response.Write  CJCCCJC(1,1):Response.Write(CJJJJJCC("亵@。,k^=:m") & vbCrLf):Response.Write(CJJJJJCC(" ,k=:m幯@齿@：, ,幮@坂@幯@齿@")):Response.Write  formatnumber(CCJJJJJ/CJCCCCJ,2,-1):Response.Write(CJJJJJCC("屼@。,k^=:m") & vbCrLf):Response.Write(CJJJJJCC(" ,k=:m卐@佈@：,") & vbCrLf):Response.Write(CJJJJJCC(" ,")):CCCCJJ=0:for CCCJJJ=0 to ubound(CJCCCJJ):if CJCCCJJ(CCCJJJ,2)>0 then
CCCCJJ=CCCCJJ+1:response.Write CJCCCJJ(CCCJJJ,1) & CJJJJJCC("：,") & CJCCCJJ(CCCJJJ,2) & CJJJJJCC("亵@，,")
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,公@讜@")):Response.Write  CCCCJJ:Response.Write(CJJJJJCC("严@卐@佈@。,") & vbCrLf):Response.Write(CJJJJJCC(" ,k^=:m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^F=m") & vbCrLf):Response.Write(CJJJJJCC(" ,k9am囖@、,怶@低@癿@浆@诐@绎@林@k^9am") & vbCrLf):Response.Write(CJJJJJCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,k9bm`] ,徾@琁@痂@犱@挂@敫@k^9bm") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):CJCCCCC=(CCJJJCC(6,5)+CCJJJCC(6,6)+CCJJJCC(6,7))/CJCCCCJ*100:if CJCCCCC>=80 then
Response.Write CJJJJJCC("浆@柠@羟@低@怶@低@癿@徾@琁@偠@庲@犱@冰@轾@丵@之@覽@，,孓@圣@徾@琁@偠@庲@闩@颓@癿@亵@敫@轾@尌@。,")
elseif CJCCCCC>=60 then
Response.Write CJJJJJCC("浆@柠@羟@低@怶@低@癿@徾@琁@偠@庲@犱@冰@一,舧@，,朄@尌@敫@亵@孓@圣@徾@琁@偠@庲@闩@颓@。,")
else
Response.Write CJJJJJCC("浆@柠@羟@低@怶@低@癿@徾@琁@偠@庲@犱@冰@電@襼@譡@惐@，,朄@郣@刁@亵@羟@孓@圣@柋@亖@徾@琁@偠@庲@闩@颓@。,")
end if:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):redim CCCJJC(5):for CCCJJJ=0 to 5:CCCCJC=CCCJJJ+5:CCCJJC(CCCJJJ)=formatpercent(CCJJJCC(6,CCCCJC)/CJCCCCJ,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,圣@浆@柠@羟@低@丨@，,朄@")):Response.Write  CCJJJCC(6,5):Response.Write(CJJJJJCC("亵@徾@琁@偠@庲@犱@忼@轾@奸@，,戻@卛@每@來@丵@")):Response.Write  CCCJJC(0):Response.Write(CJJJJJCC("；,") & vbCrLf):Response.Write(CJJJJJCC(" ,朄@")):Response.Write  CCJJJCC(6,6):Response.Write(CJJJJJCC("亵@徾@琁@埵@朧@偠@庲@，,戻@卛@每@來@丵@")):Response.Write  CCCJJC(1):Response.Write(CJJJJJCC("；,") & vbCrLf):Response.Write(CJJJJJCC(" ,朄@")):Response.Write  CCJJJCC(6,7):Response.Write(CJJJJJCC("亵@徾@琁@偠@庲@犱@忼@一,舧@，,戻@卛@每@來@丵@")):Response.Write  CCCJJC(2):Response.Write(CJJJJJCC("；,") & vbCrLf):Response.Write(CJJJJJCC(" ,朄@")):Response.Write  CCJJJCC(6,8):Response.Write(CJJJJJCC("亵@孓@圣@一,亖@徾@琁@疹@痀@癿@彼@允@，,戻@卛@每@來@丵@")):Response.Write  CCCJJC(3):Response.Write(CJJJJJCC("；,") & vbCrLf):Response.Write(CJJJJJCC(" ,朄@")):Response.Write  CCJJJCC(6,9):Response.Write(CJJJJJCC("亵@只@胸@悞@朄@柋@秈@稆@庡@癿@徾@琁@疹@痀@，,戻@卛@每@來@丵@")):Response.Write  CCCJJC(4):Response.Write(CJJJJJCC("；,") & vbCrLf):Response.Write(CJJJJJCC(" ,朄@")):Response.Write  CCJJJCC(6,10):Response.Write(CJJJJJCC("亵@只@胸@悞@朄@每@轾@丠@釈@癿@徾@琁@疹@痀@，,戻@卛@每@來@丵@")):Response.Write  CCCJJC(5):Response.Write(CJJJJJCC("，,返@郣@刁@亵@羟@只@胸@孓@圣@柋@亖@徾@琁@闩@颓@，,電@釈@炴@兮@泣@咇@揋@侖@徾@琁@帩@劤@。,") & vbCrLf):Response.Write(CJJJJJCC(" ,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\DEC:A65 ,2>\E23=6\9@G6C ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJJJCC(" ,k42AE:@?m衣@a ,徾@琁@偠@庲@犱@冰@k^42AE:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m绎@林@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m轾@奸@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m埵@朧@偠@庲@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m一,舧@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m孓@圣@徾@琁@疹@痀@癿@彼@允@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m只@胸@悞@朄@柋@秈@稆@庡@癿@徾@琁@疹@痀@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m只@胸@悞@朄@每@轾@丠@釈@癿@徾@琁@疹@痀@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m亵@敫@k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):CJCCJCJ="":for CCCJJJ=5 to 10:Response.Write CJJJJJCC("kE5m") & CCJJJCC(6,CCCJJJ) & CJJJJJCC("k^E5m"):CJCCJCJ=CJCCJCJ & CJJJJJCC("M") & CCJJJCC(6,CCCJJJ):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m每@玂@k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):for CCCJJJ=0 to 5:Response.Write CJJJJJCC("kE5m") & CCCJJC(CCCJJJ) & CJJJJJCC("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJJCC(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l6CC@C32CU9lb__UIl轾@奸@M埵@朧@偠@庲@M一,舧@M孓@圣@徾@琁@疹@痀@癿@彼@允@M只@胸@悞@朄@柋@秈@稆@庡@癿@徾@琁@疹@痀@M只@胸@悞@朄@每@轾@丠@釈@癿@徾@琁@疹@痀@UGl")):Response.Write  mid(CJCCJCJ,2):Response.Write(CJJJJJCC("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJJCC(" ,k9bma] ,叿@四@孋@徒@刁@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\DEC:A65 ,2>\E23=6\9@G6C ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJJJCC(" ,k42AE:@?m衣@b ,叿@四@孋@徒@刁@惀@冰@k^42AE:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m四@孋@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m坂@倷@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):dim CCJJCJJ,CCJJCJC:for CCCJJJ=0 to 6:CCCJJC=CJJJJJJJ(Split(Mid(CCJJJCC(CCCJJJ,0),3),CJJJJJCC("M"))):CCJJJCC(CCCJJJ,1)=CCCJJC(0):CCJJCJJ=CCJJCJJ & CJJJJJCC("[") & formatnumber(CCCJJC(0),2,-1):CCJJCJC=CCJJCJC & CJJJJJCC("[") & formatnumber(CCCJJC(1),2,-1):Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  CJCJCCC(CCCJJJ):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  formatnumber(CCCJJC(0),2,-1):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  formatnumber(CCCJJC(1),2,-1):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:CJCCJCJ=CJJJJJCC("L|i,") & Mid(CCJJCJJ,2) & CJJJJJCC(".[$si,") & Mid(CCJJCJC,2) & CJJJJJCC(".N"):Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJJCC(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l6CC@C32CU9lb__UIl無@蹼@祙@绊@痂@M歂@斪@庐@采@M粹@祙@刁@袽@M蹼@邼@痂@M抌@邼@痂@M祙@绊@责@UGl")):Response.Write  CJCCJCJ:Response.Write(CJJJJJCC("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):redim CCCJJC(5,2):for CCCJJJ=0 to 5:CCCJJC(CCCJJJ,0)=CCCJJJ:CCCJJC(CCCJJJ,1)=CJCJCCC(CCCJJJ):CCCJJC(CCCJJJ,2)=CCJJJCC(CCCJJJ,1):next:CCCJJC=CJJJJJJC(CCCJJC,2):Response.Write CJJJJJCC("kAm浆@柠@羟@低@圣@") & CCCJJC(0,1) & CJJJJJCC("、,") & CCCJJC(1,1) & CJJJJJCC("、,") & CCCJJC(2,1) & CJJJJJCC("四@孋@丅@徒@刁@轾@髓@，,误@昉@诠@羟@低@圣@") & CCCJJC(0,1) & CJJJJJCC("、,") & CCCJJC(1,1) & CJJJJJCC("、,") & CCCJJC(2,1) & CJJJJJCC("斴@靝@闩@颓@轾@丵@穼@凵@，,仑@仧@只@胸@孓@圣@仠@丆@牴@炴@：,k^AmkF=m"):for CCCJJJ=0 to 2:CCCCJC=CCCJJC(CCCJJJ,0):Response.Write CJJJJJCC("k=:m") & CCCJJC(CCCJJJ,1) & CJJJJJCC("：,") & CJCCJJJ(CCCCJC) & CJJJJJCC("。,k^=:m"):next:Response.Write CJJJJJCC("k^F=m"):Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k9bmb] ,阮@怢@梻@凵@玂@k^9bm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\DEC:A65 ,2>\E23=6\9@G6C ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJJJCC(" ,k42AE:@?m衣@c ,阮@怢@梻@凵@玂@k^42AE:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4=2DDlQ2>\E6IE\>:55=6Q ,C@HDA2?lQaQm}l")):Response.Write  CJCCCCJ:Response.Write(CJJJJJCC("k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4@=DA2?lQaQm阮@怢@梻@浆@惀@冰@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m梻@凵@玂@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):redim CCCJJC(5,2):for CCCJJJ=0 to 5:CCCJJC(CCCJJJ,0)=CCCJJJ:CCCJJC(CCCJJJ,1)=CJCJCCC(CCCJJJ):CCCJJC(CCCJJJ,2)=CCJJJCC(CCCJJJ,4):Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  CJCJCCC(CCCJJJ):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  CCJJJCC(CCCJJJ,4):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  formatpercent(CCJJJCC(CCCJJJ,4)/CJCCCCJ,2,-1):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):CCCJJC=CJJJJJJC(CCCJJC,2):Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kAm圣@梻@凵@廽@帳@癿@羟@低@丨@，,徾@琁@偠@庲@闩@颓@丶@襼@衣@玫@圣@")):Response.Write  CCCJJC(0,1):Response.Write(CJJJJJCC("、,")):Response.Write  CCCJJC(1,1):Response.Write(CJJJJJCC("、,")):Response.Write  CCCJJC(2,1):Response.Write(CJJJJJCC("筄@斴@靝@丅@，,電@襼@釈@炴@兮@泣@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm")):Response.Write  CCCJJC(0,1):Response.Write(CJJJJJCC("四@孋@愊@呮@眻@")):Response.Write  CJCCJJJ(CCCJJC(0,0)):Response.Write(CJJJJJCC("；,")):Response.Write  CCCJJC(1,1):Response.Write(CJJJJJCC("四@孋@愊@呮@眻@")):Response.Write  CJCCJJJ(CCCJJC(1,0)):Response.Write(CJJJJJCC("；,")):Response.Write  CCCJJC(2,1):Response.Write(CJJJJJCC("四@孋@愊@呮@眻@")):Response.Write  CJCCJJJ(CCCJJC(2,0)):Response.Write(CJJJJJCC("。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,k9bmc] ,四@孋@徒@刁@筄@红@刁@巾@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\DEC:A65 ,2>\E23=6\9@G6C ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJJJCC(" ,k42AE:@?m衣@d ,四@孋@徒@刁@筄@红@刁@巾@惀@冰@k^42AE:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4=2DDlQ2>\E6IE\>:55=6Q ,C@HDA2?lQaQm}l")):Response.Write  CJCCCCJ:Response.Write(CJJJJJCC("k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4@=DA2?lQaQm轾@佉@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4@=DA2?lQaQm丨@筄@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4@=DA2?lQaQm轾@髓@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m每@玂@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m每@玂@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m每@玂@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):redim CCCJJC(5,2):for CCCJJJ=0 to 5:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  CJCJCCC(CCCJJJ):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):for CCCCJJ=0 to 2:CCCCJC=CCCCJJ+2:CCCJJC(CCCJJJ,CCCCJJ)=formatpercent(CCJJJCC(CCCJJJ,CCCCJC)/CJCCCCJ,2,-1):Response.Write CJJJJJCC("kE5m") & CCJJJCC(CCCJJJ,CCCCJC) & CJJJJJCC("k^E5mkE5m") & CCCJJC(CCCJJJ,CCCCJJ) & CJJJJJCC("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):dim CCJJCCJ(5):CCJJCCJ(0)=CJJJJJCC("诠@四@孋@浆@柠@癿@昪@袦@诐@昪@吡@一,亖@無@虌@痂@犱@。,"):CCJJCCJ(1)=CJJJJJCC("诠@四@孋@浆@柠@癿@昪@袦@诐@昪@吡@朄@一,亖@歂@斪@庐@采@癿@衇@丵@我@衣@玫@。,"):CCJJCCJ(2)=CJJJJJCC("诠@四@孋@浆@柠@癿@昪@袦@诐@昪@吡@兲@朄@一,亖@籶@伷@徾@琁@隗@碈@（,好@并@吧@）,癿@愚@叒@咇@衇@丵@。,"):CCJJCCJ(3)=CJJJJJCC("诠@四@孋@浆@柠@癿@昪@袦@诐@昪@吡@朄@一,亖@蹼@邼@痂@（,好@惀@绥@叓@匑@夢@、,明@冭@劣@）,癿@愚@叒@我@衣@玫@。,"):CCJJCCJ(4)=CJJJJJCC("诠@四@孋@浆@柠@癿@昪@袦@诐@昪@吡@朄@一,亖@抌@邼@癿@痂@犱@。,"):CCJJCCJ(5)=CJJJJJCC("诠@四@孋@浆@柠@癿@昪@袦@诐@昪@吡@朄@一,亖@祙@绊@责@（,好@愚@别@丈@宄@、,敊@愚@、,惀@绥@丈@種@宕@）,癿@衇@丵@我@衣@玫@。,"):for CCCJJJ=0 to 5:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k9cm【,")):Response.Write  CJCJCCC(CCCJJJ):Response.Write(CJJJJJCC("】,k^9cm") & vbCrLf):Response.Write(CJJJJJCC(" ,kA ,4=2DDlQ2>\2CE:4=6\=625Qm")):Response.Write  CCJJCCJ(CCCJJJ):Response.Write(CJJJJJCC("k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm圣@浆@柠@羟@低@丨@，,朄@")):Response.Write  CCJJJCC(CCCJJJ,2):Response.Write(CJJJJJCC("亵@圣@诠@四@孋@丅@癿@刁@轾@佉@，,戻@卛@每@來@丵@")):Response.Write  CCCJJC(CCCJJJ,0):Response.Write(CJJJJJCC("；,朄@")):Response.Write  CCJJJCC(CCCJJJ,3):Response.Write(CJJJJJCC("亵@圣@诠@四@孋@丅@徒@刁@丵@丨@筄@，,戻@卛@每@來@丵@")):Response.Write  CCCJJC(CCCJJJ,1):Response.Write(CJJJJJCC("k^DA2?m；,朄@")):Response.Write  CCJJJCC(CCCJJJ,4):Response.Write(CJJJJJCC("亵@圣@诠@四@孋@丅@徒@刁@轾@髓@，,戻@卛@每@來@丵@")):Response.Write  CCCJJC(CCCJJJ,2):Response.Write(CJJJJJCC("，,電@釈@炴@兮@泣@徒@刁@轾@髓@癿@返@郣@刁@亵@羟@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lb__UIl轾@佉@M丨@筄@M轾@髓@UGl")):Response.Write  CCJJJCC(CCCJJJ,2) & CJJJJJCC("[") & CCJJJCC(CCCJJJ,3) & CJJJJJCC("[") & CCJJJCC(CCCJJJ,4):Response.Write(CJJJJJCC("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,k9am亏@、,丈@吇@卐@佈@浆@诐@绎@林@k^9am") & vbCrLf):Response.Write(CJJJJJCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,k9bm`] ,叿@卐@佈@徾@琁@偠@庲@徒@刁@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\DEC:A65 ,2>\E23=6\9@G6C ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJJJCC(" ,k42AE:@?m衣@e ,叿@卐@佈@徾@琁@偠@庲@徒@刁@衣@k^42AE:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,C@HDA2?lQaQm卐@佈@^四@孋@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):for CCCJJJ=0 to 6:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4=2DDlQ2>\E6IE\>:55=6Q ,4@=DA2?lQaQm")):Response.Write  CJCJCCC(CCCJJJ):Response.Write(CJJJJJCC("k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):for CCCJJJ=0 to 6:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4=2DDlQ@G6C=:?6Qm坂@倷@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):for CCCJJJ=0 to ubound(CJCCCJJ):if CJCCCJJ(CCCJJJ,2)>0 then
Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  CJCCCJJ(CCCJJJ,1):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):for CCCCJJ=0 to 6:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kE5m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):CCCCJC=CCCCJJ+3:CCCJJC=CJJJJJJJ(split(Mid(CJCCCJJ(CCCJJJ,CCCCJC),3),CJJJJJCC("M"))):CCCCJC=CCCCJJ+10:CJCCCJJ(CCCJJJ,CCCCJC)=CCCJJC(0):response.Write formatnumber(CCCJJC(0),2,-1):Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  formatnumber(CCCJJC(1),2,-1):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):redim CCCJJC(ubound(CJCCCJJ),2):for CCCJJJ=0 to ubound(CJCCCJJ):CCCJJC(CCCJJJ,0)=CCCJJJ:CCCJJC(CCCJJJ,1)=CJCCCJJ(CCCJJJ,1):CCCJJC(CCCJJJ,2)=CJCCCJJ(CCCJJJ,16):next:CCCJJC=CJJJJJJC(CCCJJC,2):Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kAm") & vbCrLf):Response.Write(CJJJJJCC(" ,敯@低@耇@觻@，,")):Response.Write  CCCJJC(0,1):Response.Write(CJJJJJCC("癿@徾@琁@偠@庲@怶@低@惀@冰@盳@寴@轾@巩@，,诠@羟@低@圣@") & vbCrLf):Response.Write(CJJJJJCC(" ,")):CCCCJJ=CCCJJC(0,0):redim CCCJJC(5,2):for CCCJJJ=0 to 5:CCCCJC=CCCJJJ+10:CCCJJC(CCCJJJ,0)=CCCJJJ:CCCJJC(CCCJJJ,1)=CJCJCCC(CCCJJJ):CCCJJC(CCCJJJ,2)=CJCCCJJ(CCCCJJ,CCCCJC):next:CCCJJC=CJJJJJJC(CCCJJC,2)::Response.Write  CCCJJC(0,1):Response.Write(CJJJJJCC("、,")):Response.Write  CCCJJC(1,1):Response.Write(CJJJJJCC("筄@四@孋@丅@癿@徒@刁@轾@髓@，,误@昉@诠@羟@低@癿@亵@呓@曯@宴@明@叒@别@返@亖@闩@颓@癿@囫@扫@，,電@襼@釈@炴@兮@泣@咇@揋@侖@徾@琁@帩@劤@。,") & vbCrLf):Response.Write(CJJJJJCC(" ,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,k9bma] ,叿@卐@佈@四@孋@阮@怢@梻@凵@玂@k^9bm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\DEC:A65 ,2>\E23=6\9@G6C ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJJJCC(" ,k42AE:@?m衣@f ,叿@卐@佈@四@孋@阮@怢@梻@凵@玂@衣@k^42AE:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,C@HDA2?lQaQm卐@佈@^四@孋@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):for CCCJJJ=0 to 5:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4@=DA2?lQaQm")):Response.Write  CJCJCCC(CCCJJJ):Response.Write(CJJJJJCC("k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):for CCCJJJ=0 to 5:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m梻@凵@玂@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):for CCCJJJ=0 to ubound(CJCCCJJ):if CJCCCJJ(CCCJJJ,2)>0 then
Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  CJCCCJJ(CCCJJJ,1):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):for CCCCJJ=17 to 22:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  CJCCCJJ(CCCJJJ,CCCCJJ):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  formatpercent(CJCCCJJ(CCCJJJ,CCCCJJ)/CJCCCCJ,2,-1):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,k9am全@、,丈@吇@怢@刦@浆@诐@绎@林@k^9am") & vbCrLf):Response.Write(CJJJJJCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,k9bm`] ,丈@吇@怢@刦@徾@琁@偠@庲@徒@刁@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\DEC:A65 ,2>\E23=6\9@G6C ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJJJCC(" ,k42AE:@?m衣@g ,丈@吇@怢@刦@徾@琁@偠@庲@徒@刁@惀@冰@衣@k^42AE:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,C@HDA2?lQaQm四@孋@^怢@刦@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4@=DA2?lQaQm甲@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4@=DA2?lQaQm奮@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m坂@倷@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m坂@倷@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):for CCCJJJ=0 to 6:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  CJCJCCC(CCCJJJ):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):CCCCJC=CCCJJJ+2:for CCCCJJ=0 to 1:CCCJJC=CJJJJJJJ(split(Mid(CJCCCJC(CCCCJJ,CCCCJC),3),CJJJJJCC("M"))):CCCCJC=CCCJJJ+9:CJCCCJC(CCCCJJ,CCCCJC)=CCCJJC(0):Response.Write CJJJJJCC("kE5m") & formatnumber(CCCJJC(0),2,-1) & CJJJJJCC("k^E5m"):Response.Write CJJJJJCC("kE5m") & formatnumber(CCCJJC(1),2,-1) & CJJJJJCC("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):CJCCJCJ=CJJJJJCC(",V甲@V[V奮@V.")
for CCCJJJ=0 to 5:CCCCJC=CCCJJJ+9:CJCCJCJ=CJCCJCJ & CJJJJJCC("[,") & formatnumber(CJCCCJC(0,CCCCJC),2,-1) & CJJJJJCC("[") & formatnumber(CJCCCJC(1,CCCCJC),2,-1) & CJJJJJCC("."):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l4@=F>?U9lb__UIl無@蹼@祙@绊@痂@M歂@斪@庐@采@M粹@祙@刁@袽@M蹼@邼@痂@M抌@邼@痂@M祙@绊@责@UGl")):Response.Write  CJCCJCJ:Response.Write(CJJJJJCC("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):if CJCCCJC(0,15)>=CJCCCJC(1,15) then CCCJJC=Array(CJJJJJCC("甲@怢@"),CJJJJJCC("奮@怢@")) else CCCJJC=Array(CJJJJJCC("奮@怢@"),CJJJJJCC("甲@怢@"))
Response.Write CJJJJJCC("敯@低@耇@觻@，,") & CCCJJC(0) & CJJJJJCC("癿@徾@琁@偠@庲@犱@忼@盳@寴@轾@巩@，,圣@"):if CCCJJC(0)=CJJJJJCC("甲@怢@") then
for CCCJJJ=0 to 5:CCCCJC=CCCJJJ+9:if CJCCCJC(0,CCCCJC)>CJCCCJC(1,CCCCJC) then Response.Write CJJJJJCC("【,") & CJCJCCC(CCCJJJ) & CJJJJJCC("】,")
next
else
for CCCJJJ=0 to 5:CCCCJC=CCCJJJ+9:if CJCCCJC(1,CCCCJC)>CJCCCJC(0,CCCCJC) then Response.Write CJJJJJCC("【,") & CJCJCCC(CCCJJJ) & CJJJJJCC("】,")
next
end if:Response.Write CJJJJJCC("筄@四@孋@丅@癿@徒@刁@髓@争@") & CCCJJC(1) & CJJJJJCC("，,误@昉@") & CCCJJC(0) & CJJJJJCC("曯@宴@明@叒@别@返@亖@闩@颓@癿@囫@扫@，,電@襼@釈@炴@兮@泣@咇@揋@侖@徾@琁@帩@劤@。,"):Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,k9bma] ,丈@吇@怢@刦@叿@四@孋@阮@怢@梻@凵@玂@k^9bm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\DEC:A65 ,2>\E23=6\9@G6C ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJJJCC(" ,k42AE:@?m衣@h ,丈@吇@怢@刦@叿@四@孋@阮@怢@梻@凵@玂@k^42AE:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,C@HDA2?lQaQm四@孋@^怢@刦@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4@=DA2?lQaQm甲@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9 ,4@=DA2?lQaQm奮@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m梻@凵@玂@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE9m梻@凵@玂@k^E9m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJJCC(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):redim CCCJJC(5,1):for CCCJJJ=0 to 5:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kECm") & vbCrLf):Response.Write(CJJJJJCC(" ,kE5m")):Response.Write  CJCJCCC(CCCJJJ):Response.Write(CJJJJJCC("k^E5m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):CCCCJC=CCCJJJ+16:for CCCCJJ=0 to 1:CCCJJC(CCCJJJ,CCCCJJ)=CJCCCJC(CCCCJJ,CCCCJC)/CJCCCCJ*100:Response.Write CJJJJJCC("kE5m") & CJCCCJC(CCCCJJ,CCCCJC) & CJJJJJCC("k^E5m"):Response.Write CJJJJJCC("kE5m") & formatnumber(CCCJJC(CCCJJJ,CCCCJJ),2,-1) & CJJJJJCC("Tk^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJJCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJJCC(" ,")):CJCCJCJ=CJJJJJCC(",V甲@V[V奮@V.")
for CCCJJJ=0 to 5:CJCCJCJ=CJCCJCJ & CJJJJJCC("[,") & formatnumber(CCCJJC(CCCJJJ,0),2,-1) & CJJJJJCC("[") & formatnumber(CCCJJC(CCCJJJ,1),2,-1) & CJJJJJCC("."):next:Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l4@=F>?U9lb__UIl無@蹼@祙@绊@痂@M歂@斪@庐@采@M粹@祙@刁@袽@M蹼@邼@痂@M抌@邼@痂@M祙@绊@责@UGl")):Response.Write  CJCCJCJ:Response.Write(CJJJJJCC("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm") & vbCrLf):Response.Write(CJJJJJCC(" ,")):Response.Write CJJJJJCC("仉@丅@衣@只@仠@眆@凵@，,甲@怢@圣@"):for CCCJJJ=0 to 5:if CCCJJC(CCCJJJ,0)>CCCJJC(CCCJJJ,1) then Response.Write CJJJJJCC("【,") & CJCJCCC(CCCJJJ) & CJJJJJCC("】,")
next:Response.Write CJJJJJCC("筄@四@孋@丅@梻@凵@玂@轾@髓@，,奮@怢@圣@"):for CCCJJJ=0 to 5:if CCCJJC(CCCJJJ,1)>CCCJJC(CCCJJJ,0) then Response.Write CJJJJJCC("【,") & CJCJCCC(CCCJJJ) & CJJJJJCC("】,")
next:Response.Write CJJJJJCC("筄@四@孋@丅@梻@凵@玂@轾@髓@。,"):Response.Write(vbCrLf):Response.Write(CJJJJJCC(" ,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,k9am七,、,廵@让@三@寴@筑@k^9am") & vbCrLf):Response.Write(CJJJJJCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,k9bm（,一,）,卐@佈@斴@靝@k^9bm") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm`] ,宕@朚@迖@衇@徾@琁@徾@琁@偠@庲@访@伫@，,兮@泣@羟@低@徾@琁@偠@庲@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm卐@佈@只@钃@寴@戋@呓@朄@线@绂@癿@、,朄@讜@刍@癿@宕@朚@廻@屐@徾@琁@偠@庲@访@伫@巠@佗@，,迖@衇@一,亖@盳@兮@癿@徾@琁@课@柠@咇@浆@诐@，,叅@旱@、,凁@硩@癿@亁@觞@羟@低@癿@徾@琁@偠@庲@玫@犱@，,阭@悞@争@朥@焱@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAma] ,丵@徾@琁@偠@庲@犱@忼@丈@艪@癿@戋@呓@揋@侖@与@丕@癿@徾@琁@鉯@刦@三@诅@斨@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm钃@寴@策@逄@凵@杠@癿@徾@琁@偠@庲@犱@忼@丈@艪@癿@亵@呓@，,卐@佈@只@诲@与@丕@癿@徾@琁@咣@话@布@我@耀@徾@琁@沶@疒@布@偕@与@丕@癿@徾@琁@偠@庲@鉯@刦@三@诅@斨@，,掍@陟@严@刦@亵@呓@昪@晽@旱@癿@闩@颓@我@耀@昪@“,裀@痀@”,，,仠@硩@宕@昪@吡@眚@歞@癿@孓@圣@徾@琁@偠@庲@闩@颓@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAmb] ,迖@衇@徾@琁@偠@庲@实@伛@，,埴@其@羟@低@亵@呓@徾@琁@偠@庲@愊@证@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm判@産@夕@秈@彝@弊@寴@羟@低@亵@呓@迖@衇@徾@琁@偠@庲@实@伛@，,栌@竆@羟@低@亵@呓@寴@徾@琁@偠@庲@癿@歞@硩@讟@证@，,墙@張@羟@低@亵@呓@兮@泣@咇@绯@抟@徾@琁@偠@庲@癿@愊@证@，,亁@觞@徾@琁@偠@庲@癿@盳@兮@矠@证@，,矠@過@亻@乃@旱@倔@電@襼@徾@琁@帩@劤@，,哥@亖@透@彿@只@仠@莲@徒@徾@琁@帩@劤@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAmc] ,逕@迂@徾@琁@咣@话@、,囝@辀@、,训@庢@筄@夕@秈@彝@弊@，,丵@羟@低@亵@呓@揋@侖@朄@敃@癿@徾@琁@帩@劤@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm只@逕@迂@历@劖@箜@琁@、,挦@抓@序@寴@、,埴@其@秪@杼@惀@绥@筄@埴@讨@，,帩@劤@羟@低@亵@呓@掇@揜@揋@髓@徾@琁@紛@责@癿@埵@朧@斴@泐@，,墙@力@寴@徾@琁@闩@颓@癿@抰@抒@劖@。,歟@夑@，,迓@只@仠@宕@朚@遻@诲@徾@琁@与@宱@杠@卐@佈@廻@屐@徾@琁@训@庢@，,朄@钃@寴@怢@癿@帩@劤@戋@呓@觞@陟@徾@琁@历@劖@，,栌@竆@赲@秪@杼@癿@巠@佗@忼@庡@。,寴@朄@徾@琁@囫@扫@癿@亵@呓@耇@觻@，,只@逕@迂@徾@琁@咣@话@、,囝@低@辀@寷@筄@斴@弊@，,叅@旱@寴@共@迖@衇@帩@劤@咇@沶@疒@，,幱@劖@氽@帩@劤@羟@低@亵@呓@批@别@臥@巬@舍@缎@历@劖@三@丈@艪@惀@绥@，,揋@髓@徾@琁@偠@庲@氯@幮@癿@斴@泐@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAmd] ,丫@寇@卐@佈@斂@匑@洶@劣@，,萠@逛@艪@奸@巠@佗@玪@塾@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm萠@逛@艪@奸@癿@巠@佗@玪@塾@朄@劤@争@凊@轶@咇@涃@陟@羟@低@亵@呓@癿@聇@丕@徾@琁@历@劖@，,揋@髓@亵@呓@癿@聇@丕@宄@兣@愚@咇@巠@佗@舍@追@愚@。,只@仠@仉@牤@琁@玪@塾@咇@徾@琁@玪@塾@返@丟@斴@靝@兠@扆@，,一,斴@靝@，,攴@啿@巠@佗@玪@塾@，,尸@释@凊@尌@丈@艪@牤@琁@刵@澻@寴@亵@呓@徾@琁@偠@庲@癿@贚@靝@彬@哈@；,叡@一,斴@靝@，,逕@迂@囝@阚@廵@讹@、,亵@呓@聇@丕@甚@涪@覿@刍@筄@斴@泐@，,扎@逛@攪@拼@怢@癿@巠@佗@玪@塾@，,丫@寇@亵@呓@丕@佔@斂@低@洶@劣@，,刖@逛@艪@奸@癿@徾@琁@氖@囯@，,揋@髓@羟@低@亵@呓@癿@宄@兣@愚@咇@彍@屙@愚@，,揋@侖@艪@奸@癿@透@彿@佺@戋@呓@胸@多@舍@缎@历@劖@咇@丈@艪@惀@绥@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,k9bm（,亇@）,严@亵@斴@靝@k^9bm") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm`] ,惀@绥@箜@琁@k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm惀@绥@圣@徾@琁@叓@匑@丨@赲@栳@徾@佗@産@，,丈@艪@惀@绥@丈@叅@旱@我@朥@仠@追@彎@癿@斴@弊@徒@别@实@沿@昪@弐@赲@徾@琁@闩@颓@癿@釈@襼@四@紛@乆@一,，,吇@旱@乚@伕@绔@严@低@甚@琁@斴@靝@帡@杠@丈@艪@癿@彬@哈@。,四@歟@，,幮@夈@、,種@宕@惀@绥@昪@觞@冮@徾@琁@闩@颓@癿@埵@砻@咇@朄@敃@透@彿@乆@一,。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm戻@仠@圣@惀@绥@箜@琁@返@一,斴@靝@，,揋@凵@仠@丆@凛@炴@廵@让@i ,孡@乛@好@佐@恫@彎@圫@壿@琁@臥@巬@癿@贚@怢@惀@绥@；,孡@乛@圣@无@帳@甚@洶@丨@好@佐@俘@拼@艪@奸@徾@塾@；,孡@乛@叿@秈@改@杹@扻@未@，,好@肇@肄@改@杹@、,冠@惮@改@杹@筄@；,襼@讟@证@别@衇@劣@昪@缎@觞@無@虌@癿@艪@荪@，,靝@寴@闩@颓@襼@秪@杼@衇@劣@；,孡@伕@琁@觞@、,掠@叒@仑@亵@，,悡@纮@臥@巬@，,揋@髓@寴@玪@塾@癿@追@序@胸@劖@；,秪@杼@迋@劣@，,圣@朄@愊@乄@癿@洶@劣@丨@实@沿@丈@艪@惀@绥@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAma] ,宇@啿@礹@伕@攪@拼@糶@绚@k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm礹@伕@攪@拼@糶@绚@昪@朄@劤@争@严@低@觞@冮@一,舧@徾@琁@闩@颓@、,摁@脬@无@帳@徾@琁@囫@扫@癿@釈@襼@攪@柬@乆@一,。,好@林@返@一,糶@绚@沜@朄@赲@别@徃@奸@癿@佗@産@，,刔@伕@佺@严@低@徾@琁@闩@颓@力@剢@。,徾@琁@礹@伕@轧@叓@樜@弊@讟@丵@，,圣@徾@琁@幭@顿@丨@襼@鼎@劬@氽@劤@耀@帩@劤@圣@无@帳@甚@洶@丨@硩@宙@電@襼@帩@劤@癿@亵@，,釈@见@宱@屙@癿@徾@琁@宱@庨@戋@呓@攪@拼@癿@釈@襼@怢@，,遂@别@闩@颓@秪@杼@课@劣@礹@伕@攪@拼@糶@绚@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,kAm栴@捩@返@一,琁@讵@樜@弊@，,揋@凵@仠@丆@凛@炴@廵@让@：,囙@别@宙@陀@甚@洶@丨@，,帩@劤@電@襼@帩@劤@癿@亵@，,低@骇@冀@徾@愚@叒@；,尘@诐@三@仑@亵@廵@竆@只@靛@、,種@宕@癿@亵@陀@兮@糶@；,釈@斫@讟@证@、,覽@寚@宱@亵@、,朆@叆@，,亁@觞@仑@仧@癿@惮@泐@，,釈@见@三@宱@亵@癿@沚@逕@；,；,秪@杼@锶@炷@、,夕@厽@力@洶@劣@，,尸@只@胸@俘@拼@秪@杼@癿@甚@洶@犱@忼@，,缎@冭@贚@怢@惀@绥@；,只@封@彎@剈@癿@徾@琁@闩@颓@同@俜@赑@癿@宱@亵@我@朆@叆@倹@迫@，,寶@氽@琁@觞@三@掠@纮@。,k^Am") & vbCrLf):Response.Write(CJJJJJCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJJCC("k^2CE:4=6m") & vbCrLf):Response.Write(CJJJJJCC("k7@@E6C ,4=2DDlQ2>\47Qm") & vbCrLf):Response.Write(CJJJJJCC(" ,k5:G ,4=2DDlQ2>\7= ,2>\9:56\D>\@?=JQmk: ,4=2DDlQ2>\:4@?\7:=6\E6IEQmk^:m ,")):Response.Write  CJCJCCJ:Response.Write(CJJJJJCC(" ,U>:55@Ej ,")):Response.Write  CCJCCJC:Response.Write(CJJJJJCC("浆@诐@绎@林@抠@呅@k^5:Gm") & vbCrLf):Response.Write(CJJJJJCC(" ,k5:G ,4=2DDlQ2>\7CQm") & vbCrLf):Response.Write(CJJJJJCC(" ,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(CJJJJJCC(" ,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(CJJJJJCC(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\3E?\AC:>2CJ ,2>\3E?\9@==@H ,2>\3E?\IDQ ,:5lQ3E?\2FE@4Qmk: ,4=2DDlQ2>\:4@?\=:DE\F=Qmk^:m ,盩@彐@k^3FEE@?m") & vbCrLf):Response.Write(CJJJJJCC(" ,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(CJJJJJCC(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJJCC("k^7@@E6Cm") & vbCrLf):Response.Write(CJJJJJCC("kD4C:AE ,DC4lQ^$4C:AED^2>2K6F:\36E2^;D^2>2K6F:]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJJCC("kD4C:AE ,DC4lQ^$4C:AED^2FE@4;D^2FE@4]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJJCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]9E>=a5@4I];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJJCC("kD4C:AEm") & vbCrLf):Response.Write(CJJJJJCC("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJJJCC(" ,SWVR3E?\AC:?EVX]@?WV4=:4<V[7F?4E:@?WXLH:?5@H]AC:?EWXNX") & vbCrLf):Response.Write(CJJJJJCC(" ,SWVR3E?\H@C5VX]@?WV4=:4<V[7F?4E:@?WXLSWV2CE:4=6VX]9E>=a5@4IWXNX") & vbCrLf):Response.Write(CJJJJJCC(" ,SWVR3E?\2FE@4VX]@?WV4=:4<V[7F?4E:@?WXL2FE@4]D9@HWXNX") & vbCrLf):Response.Write(CJJJJJCC(" ,^^ ,甚@戋@盩@彐@") & vbCrLf):Response.Write(CJJJJJCC(" ,G2C ,2FE@4l?6H ,pFE@4yDWL") & vbCrLf):Response.Write(CJJJJJCC(" ,2CE:4=6iV2CE:4=6V[") & vbCrLf):Response.Write(CJJJJJCC(" ,D6=64E@CiV9a[9b[9c[9d[9eV[") & vbCrLf):Response.Write(CJJJJJCC(" ,E:E=6iV盩@ ,彐@V[") & vbCrLf):Response.Write(CJJJJJCC(" ,:Dv6?6C2E6~FE=:?6r92AE6Cr@56i72=D6[") & vbCrLf):Response.Write(CJJJJJCC(" ,:Dv6?6C2E6w625:?8p?49@Ci72=D6") & vbCrLf):Response.Write(CJJJJJCC(" ,NX") & vbCrLf):Response.Write(CJJJJJCC("NX") & vbCrLf):Response.Write(CJJJJJCC("k^D4C:AEm") & vbCrLf)::Function CJJJJJJJ(ByVal CJJCJCJC):Dim CCCJJJ, CCJJCCC, CCJCJJJ, CCJCJJC, CCJCJCJ, CCJJCJC:CCJJCCC = UBound(CJJCJCJC) + 1:if CCJJCCC=0 then
CJJJJJJJ = Array(0, 0)
else
CCJCJJJ = 0:For CCCJJJ = 0 To CCJJCCC - 1:CJJCJCJC(CCCJJJ) = CDbl(CJJCJCJC(CCCJJJ)):CCJCJJJ = CCJCJJJ + CJJCJCJC(CCCJJJ):Next:CCJCJJC = CCJCJJJ / CCJJCCC:CCJCJCJ = 0:For CCCJJJ = 0 To CCJJCCC - 1:CCJCJCJ = CCJCJCJ + (CJJCJCJC(CCCJJJ) - CCJCJJC) ^ 2:Next:CCJJCJC = Sqr(CCJCJCJ / CCJJCCC):CJJJJJJJ = Array(CCJCJJC, CCJJCJC)
end if:End Function:Function CJJJJJJC(byval CJJJCCJJ,CCCCCJ):dim CCCJJJ,CCCCJJ,CCCCJC,CJJJJCC,CJJJCJJ,CCCJJC(),CJCCCCC:on error resume next:CJJJJCC=ubound(CJJJCCJJ):CJJJCJJ=ubound(CJJJCCJJ,2):on error goto 0:if err.number<>0 then
err.clear:for CCCJJJ=1 to CJJJJCC:for CCCCJJ=CJJJJCC to CCCJJJ step -1:if CJJJCCJJ(CCCCJJ)>CJJJCCJJ(CCCCJJ-1) then
CJCCCCC=CJJJCCJJ(CCCCJJ):CJJJCCJJ(CCCCJJ)=CJJJCCJJ(CCCCJJ-1):CJJJCCJJ(CCCCJJ-1)=CJCCCCC
end if:next:next
else
redim CCCJJC(CJJJCJJ):for CCCJJJ=1 to CJJJJCC:for CCCCJJ=CJJJJCC to CCCJJJ step -1:if CJJJCCJJ(CCCCJJ,CCCCCJ)>CJJJCCJJ(CCCCJJ-1,CCCCCJ) then
for CCCCJC=0 to CJJJCJJ:CCCJJC(CCCCJC)=CJJJCCJJ(CCCCJJ,CCCCJC):CJJJCCJJ(CCCCJJ,CCCCJC)=CJJJCCJJ(CCCCJJ-1,CCCCJC):CJJJCCJJ(CCCCJJ-1,CCCCJC)=CCCJJC(CCCCJC):next
end if:next:next
end if:CJJJJJJC=CJJJCCJJ:End Function:Response.Write(vbCrLf):Response.Write(CJJJJJCC("k^3@5Jm") & vbCrLf):Response.Write(CJJJJJCC("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJJCJC=nothing:set CCCJJJC=nothing:set CCCJJCJ=nothing:set CCCJJCC=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 CJJJJJCC(ByVal CJJJJJCJ)
Dim CJCCJCJ, CCCJJJ, CCCCCJ
CJJJJJCJ = Replace(CJJJJJCJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CCCJJJ = 1 To Len(CJJJJJCJ)
If CCCJJJ <> CCCCCJ Then
CJCCJCJ = AscW(Mid(CJJJJJCJ, CCCJJJ, 1))
If CJCCJCJ >= 33 And CJCCJCJ <= 79 Then
CJJJJJCC = CJJJJJCC & Chr(CJCCJCJ + 47)
ElseIf CJCCJCJ >= 80 And CJCCJCJ <= 126 Then
CJJJJJCC = CJJJJJCC & Chr(CJCCJCJ - 47)
Else
CCCCCJ = CCCJJJ + 1
If Mid(CJJJJJCJ, CCCCCJ, 1) = Chr(64) Then CJJJJJCC = CJJJJJCC & ChrW(CJCCJCJ + 5) Else CJJJJJCC = CJJJJJCC & Mid(CJJJJJCJ, CCCJJJ, 1)
End If
End If
Next
End Function
%>