<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CJJCCJ, CJJCCC,CJCJJJ, CJCJJC, CJCJCJ:Set CJJCCJ = server.CreateObject(CJJJJCJJ("ps~sq]r@??64E:@?")):CJJCCJ.open Application(CJJJJCJJ("r@??64E:@?$EC:?8")):Set CJJCCC=CJJCCJ::Dim CJCJCC,CJCCJJ,CJCCJC,CJCCCJ,CJCCCC,CCJJJJ,CCJJJC,CCJJCJ,CCJJCC:Dim CCJCJJ,CCJCJC,CCJCCJ,CCJCCC,CCCJJJ,CCCJJC:Dim CCCJCJ,CCCJCC,CCCCJJ:Dim CCCCJC:CCCCJC=Trim(Request.Cookies(CJJJJCJJ("!$*|t|qt#"))):if CCCCJC="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CJCJCC>0 then
CJCJCJ=CJJJJCJJ("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") & CJCCJJ & CJJJJCJJ("V ,2?5 ,:5l") & CJCJCC
set CJCJJJ=CJJCCJ.execute(CJCJCJ):If CJCJJJ.EOF Then
Call ClearMemberCookie
Else
CJCCJC=CJCJJJ(2) & "":CJCCCJ=CJCJJJ(3):CJCCCC=CJCJJJ(5):CCJJJJ=CJCJJJ(6):CCJJJC=CJCJJJ(9):CCJJCJ=CJCJJJ(15):CCJCJJ=CJCJJJ(0):CCCJCC=CJCJJJ(1):CCCJCJ=CJCJJJ(11) & "":CCJCJC=CJCJJJ(10) & "":CCJJCC=CJCJJJ(12):CCJCCJ=CJCJJJ(14):CCJCCC=CJCJJJ(13):CCCJJJ=CJCJJJ(7) & "":CCCJJC=CJCJJJ(4):CCCCJJ=CJCJJJ(8):if isnull(CCJJCJ) then CCJJCJ=0
if isnull(CCJJJC) or CCJJJC=0 then CCJJJC=CJCCCJ
if isnull(CCCJJC) then CCCJJC=0
if isnull(CJCCCC) then CJCCCC=0
if instr(CJJJJCJJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CJCCJJ)>0 then Call RedirectMessage(CJJJJCJJ("弬@寁@矼@，,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,"))
Call SetMemberCookie(CJCJCC,CJCCJJ)
End IF
end if:Sub CheckRight(CJJJJCJC):dim CCCCCJ,CCCCCC:if CJCJCC=0 then
Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJJJJCJJ("癶@彐@俜@恪@夬@敃@，,诲@釈@斫@癶@彐@。,"))
elseIf not CCCJJJJ(CJJJJCJC) then
Call RedirectMessage(CJJJJCJJ("朾@陋@W") & CJJJJCJC & CJJJJCJJ("X袦@祼@歝@，,诲@三@糶@绚@箜@琁@呓@聏@糶@。,"))
end if:End Sub:Function CCCJJJJ(CJJJJCJC):dim CCCCCJ,CCCCCC:CCCCCC=split(CJJJJCJC,CJJJJCJJ("[")):CCCJJJJ=False:for CCCCCJ=0 to ubound(CCCCCC):If Mid(CJCCJC,CCCCCC(CCCCCJ),1)="1" then
CCCJJJJ=True:exit function
end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CJJJJCJJ("!$*|t|qt#"))="":CJCJCC=0:CCJJJJ=0:CJCCJJ=Empty:CJCCCC=0:CCJJCJ=0:CCJJJC=0:CJCCCJ=0:CCJCJJ=False:CCCJCC=False:CCCCJJ=Empty:End Sub:Sub CheckMemberCookie():dim CJJJJJJ,CJJJJJC,CCCCCJ,CJJJJCJ,CJJJJCC:CJJJJJJ=split(CCCCJC,CJJJJCJJ("]")):if ubound(CJJJJJJ)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CJJJJJJ(0)) or len(CJJJJJJ(1))<>32 or len(CJJJJJJ(2))<>32 then
Call ClearMemberCookie
else
CJJJJJC=CJJJJJJ(1):for CCCCCJ=1 to len(CJJJJJC):CJJJJCJ=mid(CJJJJJC,CCCCCJ,1):if isnumeric(CJJJJCJ) then CJJJJCC=CJJJJCC & CJJJJCJ
if len(CJJJJCC)=7 then exit for
next:CJJJJJC=CJJJJJJ(2):if CJJJJCC<>mid(CJJJJJC,6,7) then
Call ClearMemberCookie
else
CJJJJCJ=mid(CJJJJJC,18,10)/2:if CJJJJCJ<DateDiff(CJJJJCJJ("D"), CJJJJCJJ("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CJCJCC=Clng(CJJJJJJ(0)):CJCCJJ=CJJJJJJ(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CCCCJJJ,CJJJJCCJ):dim CCCCCJ,CJJJJCJ,CJJJJCC:for CCCCCJ=1 to len(CJJJJCCJ):CJJJJCJ=mid(CJJJJCCJ,CCCCCJ,1):if isnumeric(CJJJJCJ) then CJJJJCC=CJJJJCC & CJJJJCJ
if len(CJJJJCC)=7 then exit for
next:CJJJJCC=CCCCJJJ & CJJJJCJJ("]") & CJJJJCCJ & CJJJJCJJ("]") & Fix(10000*(Rnd+1)) & CJJJJCC & Fix(10000*(Rnd+1)) & DateDiff(CJJJJCJJ("D"), CJJJJCJJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJJJJCJJ("!$*|t|qt#"))=CJJJJCC:End Sub::::Const CCJCCJC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::Sub Debug(str):response.Charset=CJJJJCJJ("FE7\g"):dim CCCCCJ,CJJJJCJ,CJJJCJJ:if isarray(str) then
on error resume next:CCCCCJ=ubound(str,2):CJJJCJJ=err.number:err.clear:on error goto 0:if CJJJCJJ<>0 then
for CCCCCJ=0 to ubound(str):if CCCCCJ>0 then response.Write CJJJJCJJ("k3C ,^m")
response.Write CCCCCJ & CJJJJCJJ("i ,") & str(CCCCCJ):next
else
response.Write CJJJJCJJ("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m")
for CCCCCJ=0 to ubound(str,2):response.Write CJJJJCJJ("kE9 ,2=:8?lV=67EVm") & CCCCCJ & CJJJJCJJ("k^E9m")
next:response.Write CJJJJCJJ("k^ECm"):for CCCCCJ=0 to ubound(str):response.Write CJJJJCJJ("kECmkE9m") & CCCCCJ & CJJJJCJJ("k^E9m"):for CJJJJCJ=0 to ubound(str,2):response.Write CJJJJCJJ("kE5m") & str(CCCCCJ,CJJJJCJ) & CJJJJCJJ("k^E5m"):next:response.Write CJJJJCJJ("k^ECm"):next:response.Write CJJJJCJJ("k^E23=6m")
end if
elseif isnull(str) then
response.Write CJJJJCJJ(",}F==.")
else
Response.Write replace(str,vbcrlf,CJJJJCJJ("k3Cm"))
end if:Call ConnClose:Response.End:End Sub::Sub SetHttpOnlyCookie(CJJJJCCC,CJJJCJJJ):dim CJJJJJJ:CJJJJJJ=CJJJJCCC & CJJJJCJJ("l") & CJJJCJJJ & CJJJJCJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJJJJCJJ("$6E\r@@<:6"),CJJJJJJ):End Sub::::::sub ShowMessage(CJJJCJJC):response.Charset="utf-8":Response.Write CJJJJCJJ("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") & CJJJCJJC & CJJJJCJJ("k^5:Gmk^5:Gmk3Cm")
end sub:Function CCCJJJC(CJJJCJJ):if isnull(CJJJCJJ) or trim(CJJJCJJ)="" or not isnumeric(CJJJCJJ) then
CCCJJJC=false
else
Dim CJJJCJC:Set CJJJCJC = New RegExp:CJJJCJC.Pattern = CJJJJCJJ("/-5ZS"):CJJJCJC.IgnoreCase = True:CCCJJJC = CJJJCJC.test(CJJJCJJ):set CJJJCJC=nothing
end if:End Function:Function CCCJJCJ(CJJJCJCJ):dim CJJJCCJ,CJJJCCC:CJJJCCJ=CJJJJCJJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CJJJCJCJ & CJJJJCJJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJJJCCC=CJJCCJ.execute(CJJJCCJ):CCCJJCJ = CJJJCCC(0):if isnull(CCCJJCJ) then CCCJJCJ=1
CJJJCCC.close : set CJJJCCC=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CJJCJCC=nothing:set CCCJJCC=nothing:set CCCJCJJ=nothing:set CCCJCJC=nothing:CJJJCCC.close : set CJJJCCC=nothing:CJCJJC.Close : Set CJCJJC=Nothing:CJCJJJ.Close : Set CJCJJJ=Nothing:CCCJCCJ.Close : Set CCCJCCJ = Nothing:CJJCCJ.Close : Set CJJCCJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJJJCJJC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJJJJCJJ("!$*0|6DD286"),server.URLEncode(CJJJCJJC)):Response.Redirect CJJJJCJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::::::::Sub CheckQueryTime(CJJJCJCC,CJJJCCJJ):dim str,CJJJCJJ:str=CJJJJCJJ("!$*0") & Ucase(CJJJCJCC):if Session(str)<>"" then
CJJJCJJ=DateDiff(CJJJJCJJ("D"),Session(str),Time):if CJJJCJJ<CJJJCCJJ and CJJJCJJ>0 then
Call ConnClose:Call ShowMessage(CJJJJCJJ("柠@话@闯@随@忀@顶@夢@争@ ,") & CJJJCCJJ & CJJJJCJJ(" ,种@，,迓@剤@ ,") & CJJJCCJJ-CJJJCJJ & CJJJJCJJ(" ,种@！,")):response.End()
else
Session.Contents.Remove(str)
end if
end if:Session(str)=Time:End Sub:::::::Sub ArrayInit(CJJJCCJC):dim CCCCCJ,CJJJJCJ,CJJCJJC,CJJCJCJ:on error resume next:CJJCJJC=ubound(CJJJCCJC):CJJCJCJ=ubound(CJJJCCJC,2):if err.number<>0 then
err.clear:for CCCCCJ=0 to CJJCJJC:CJJJCCJC(CCCCCJ)=0:next
else
for CCCCCJ=0 to CJJCJJC:for CJJJJCJ=0 to CJJCJCJ:CJJJCCJC(CCCCCJ,CJJJJCJ)=0:next:next
end if:End Sub:::Sub ClearCache(CJJJCCCJ):Application.Contents.Remove CJJJCCCJ
End Sub::Class jTree:Private CJCJCJ, CJJCJCC, CJJCCJJ, CJJCCJC,CJJCCCJ,CJJCCCC,CJCJJJJ,CJCJJJC:Private Sub Class_Initialize():CJJCCJJ = 0:CJJCCJC = 0:CJCJJJC=10:End Sub:Public Property Let Table(CJJJCCCC):if CJJJCCCC="" then Call RedirectMessage(CJJJJCJJ("寴@丈@赲@，,;%C66籶@宙@來@匑@旱@沜@朄@讹@罩@忀@襼@癿@屙@怢@！,"))
CJJCCCJ=CJJJCCCC:CJJCCCC=CJJJJCJJ("!$*0") & UCase(CJJCCCJ):Call GetTreeArray:End Property:Public Property Get Table():Table=CJJCCCJ:End Property:::Private Sub GetTreeArray():Dim CCCCCJ, CJJJJCJ, CJCJJCJ,CJCJJCC:CJJCJCC = Application(CJJCCCC):If Not IsArray(CJJCJCC) Then
CJCJCJ = CJJJJCJJ("D6=64E ,4@F?EW:5X ,7C@> ,") & CJJCCCJ:if CJCJJJJ<>"" then CJCJCJ=CJCJCJ & CJJJJCJJ(" ,H96C6 ,") & CJCJJJJ
set CJCJJCJ=CJJCCJ.execute(CJCJCJ):CJCJJCC=CJCJJCJ(0):if CJCJJCC=0 then Call RedirectMessage(CJJJJCJJ("柠@话@W") & CJJCCCJ & CJJJJCJJ("^") & CJCJJJJ & CJJJJCJJ("X沜@朄@绎@林@敫@捩@"))
CJJCCJC=CJCJJCC+CJCJJJC:ReDim CJJCJCC(CJJCCJC, 4):CJCJCJ = CJJJJCJJ("D6=64E ,:5[A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCCCJ & CJJJJCJJ(" ,H:E9 ,W?@=@4<X"):if CJCJJJJ<>"" then CJCJCJ=CJCJCJ & CJJJJCJJ(" ,H96C6 ,") & CJCJJJJ
CJCJCJ=CJCJCJ & CJJJJCJJ(" ,@C56C ,3J ,D@CE[:5"):set CJCJJCJ=CJJCCJ.execute(CJCJCJ):For CCCCCJ = 1 To CJCJJCC:For CJJJJCJ = 0 To 4:CJJCJCC(CCCCCJ, CJJJJCJ) = CJCJJCJ(CJJJJCJ):if IsNull(CJJCJCC(CCCCCJ,4)) then CJJCJCC(CCCCCJ,4)=0
If CJJCJCC(CCCCCJ,2)="" then CJJCJCC(CCCCCJ,2)=CJJJJCJJ(",穵@.")
Next:CJCJJCJ.MoveNext:Next:CJCJJCJ.Close: Set CJCJJCJ = Nothing:for CCCCCJ=CJJCCJC-(CJCJJJC-1) to CJJCCJC:CJJCJCC(CCCCCJ,0)=CCCCCJ:next:Application.Lock():Application(CJJCCCC) = CJJCJCC:Application.UnLock()
else
CJJCCJC=Ubound(CJJCJCC)
End If:End Sub::::Public Function GetChild(CCCCJJJ):Dim CCCCCJ, Str:CCCCJJJ=CLng(CCCCJJJ):For CCCCCJ = 1 To CJJCCJC:If CJJCJCC(CCCCCJ, 1) = CCCCJJJ Then Str = Str & CJJJJCJJ("M") & CJJCJCC(CCCCCJ, 0) & CJJJJCJJ("M") & CJJCJCC(CCCCCJ,2)
Next:If Str <> "" Then Str = Mid(Str, 2)
GetChild = Split(str,CJJJJCJJ("M")):End Function:Private Function CCCCJCJ(CCCCJJJ):dim CCCCCJ,CJCJCJJ:CCCCJCJ=0:CJCJCJJ=CStr(CCCCJJJ):if CJCJCJJ<>"0" then
for CCCCCJ=1 to CJJCCJC:If CStr(CJJCJCC(CCCCCJ, 0))=CJCJCJJ Then
CCCCJCJ = CCCCCJ:Exit For
End If:Next
end if:End Function:Public Function GetCurName(CCCCJJJ):if Cstr(CCCCJJJ)="0" then
GetCurName=CJJJJCJJ("栴@")
else
Dim CCCCCJ,CJCJJCJ:CCCCCJ=CCCCJCJ(CCCCJJJ):if CCCCCJ>0 then
GetCurName=CJJCJCC(CCCCCJ,2):if GetCurName="" then
set CJCJJCJ=CJJCCJ.execute(CJJJJCJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCCCJ & CJJJJCJJ(" ,H96C6 ,:5l") & CCCCJJJ):if CJCJJCJ.eof then Call RedirectMessage(CJJJJCJJ("xs（,") & CCCCJJJ & CJJJJCJJ("）,朥@批@别@"))
GetCurName=CJCJJCJ(1):Call UpdateCache(CCCCJJJ,CJCJJCJ(0),GetCurName,CJCJJCJ(2),CJCJJCJ(3)):CJCJJCJ.Close: Set CJCJJCJ = Nothing
end if
else
set CJCJJCJ=CJJCCJ.execute(CJJJJCJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCCCJ & CJJJJCJJ(" ,H96C6 ,:5l") & CCCCJJJ):if CJCJJCJ.eof then Call RedirectMessage(CJJJJCJJ("xs（,") & CCCCJJJ & CJJJJCJJ("）,朥@批@别@"))
GetCurName=CJCJJCJ(1):Call UpdateCache(CCCCJJJ,CJCJJCJ(0),GetCurName,CJCJJCJ(2),CJCJJCJ(3)):CJCJJCJ.Close: Set CJCJJCJ = Nothing
end if
end if:End Function:::Public Function CCCCCJJ(CCCCJJJ):Dim CCCCCJ,CJCJCJC:CCCCCJ=CCCCJCJ(CCCCJJJ):if CCCCCJ=0 then
CJCJCJC=CCCCCJC(CCCCJJJ)
else
CJCJCJC=CJJCJCC(CCCCCJ,3):if isnull(CJCJCJC) or CJCJCJC="" then
CJCJCJC=CCCCCJC(CCCCJJJ)
elseif Mid(CJCJCJC,instrrev(CJCJCJC,CJJJJCJJ("["))+1)<>CStr(CCCCJJJ) then
CJCJCJC=CCCCCJC(CCCCJJJ)
elseif Left(CJCJCJC,1)=CJJJJCJJ("[") then
CJCJCJC=CCCCCJC(CCCCJJJ)
end if
end if:CCCCCJJ=CJCJCJC:End Function:Private Function CCCCCJC(CCCCJJJ):dim CJCJCJJ:CJCJCJJ=CStr(CCCCJJJ):if CJCJCJJ="0" then
CCCCCJC=""
else
dim CJCJJCJ:set CJCJJCJ=CJJCCJ.execute(CJJJJCJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCCCJ & CJJJJCJJ(" ,H96C6 ,:5l") & CCCCJJJ):if CJCJJCJ.eof then
Call UpdateCache(CCCCJJJ,"","","",""):Call RedirectMessage(CJJJJCJJ("顴@盩@（,xs：,") & CCCCJJJ & CJJJJCJJ("）,丈@孓@圣@，,诲@患@迏@囙@吉@釈@斫@擈@佗@。,"))
else
if CJCJJCJ(0)=0 then
CCCCCJC="0," & CCCCJJJ
else
CCCCCJC=CCCCCJJ(CJCJJCJ(0)) & CJJJJCJJ("[") & CCCCJJJ
end if:if CJCJJCJ(2)<>CCCCCJC then
CJJCCJ.execute CJJJJCJJ("FA52E6 ,") & CJJCCCJ & CJJJJCJJ(" ,D6E ,A2E9lV") & CCCCCJC & CJJJJCJJ("V ,H96C6 ,:5l") & CCCCJJJ
else
CCCCCJC=CJCJJCJ(2)
end if
end if:Call UpdateCache(CCCCJJJ,CJCJJCJ(0),CJCJJCJ(1),CCCCCJC,CJCJJCJ(3)):CJCJJCJ.Close: Set CJCJJCJ = Nothing
end if:End Function::::Public Function IsParent(CJJCJJJJ, CJJCJJJC):IsParent=InStr(CCCCCJJ(CJJCJJJC) & CJJJJCJJ("["), CJJJJCJJ("[") & CJJCJJJJ & CJJJJCJJ("[")) > 0:End Function::::::::Public Function Sql_GetChildren(CCCCJJJ):dim CJCJCJC:CJCJCJC=CCCCCJJ(CCCCJJJ):Sql_GetChildren = CJJCCCJ & CJJJJCJJ("0A2E9ZV[V ,=:<6 ,V") & CJCJCJC & CJJJJCJJ("[TV")
End Function::::::::::Public Sub ClearCache():Application.Contents.Remove CJJCCCC
End Sub:Public Sub UpdateCache(CCCCJJJ,CJJCJJCJ,CJJCJJCC,CJCJCJC,CJJCJCJJ):dim CCCCCJ,CJJJJCJ:CCCCJJJ=CLng(CCCCJJJ):CCCCCJ=CCCCJCJ(CCCCJJJ):if CJJCJJCJ="" and CJJCJJCC="" and CJCJCJC="" and CJJCJCJJ="" then
if CCCCCJ>0 then
for CJJJJCJ=1 to 4:CJJCJCC(CCCCCJ,CJJJJCJ)=Null:next
end if
else
if CCCCCJ=0 then
for CJJJJCJ=1 to CJJCCJC:if CJJCJCC(CJJJJCJ,1) & ""="" then
CCCCCJ=CJJJJCJ:exit for
end if:next
end if:if CCCCCJ=0 then
Call ClearCache
else
CJJCJCC(CCCCCJ,0)=CLng(CCCCJJJ):if CJJCJJCJ<>"" then CJJCJCC(CCCCCJ,1)=CLng(CJJCJJCJ)
if CJJCJJCC<>"" then CJJCJCC(CCCCCJ,2)=CJJCJJCC
if CJCJCJC<>"" then CJJCJCC(CCCCCJ,3)=CJCJCJC
if CJJCJCJJ<>"" then CJJCJCC(CCCCCJ,4)=CLng(CJJCJCJJ)
end if
end if:if CCCCCJ>0 then
Application.Lock():Application(CJJCCCC) = CJJCJCC:Application.UnLock()
end if:End Sub:Private Sub Debug(CJJJCJJC):Call ConnClose:Response.Write CJJJCJJC:Response.End:End Sub:Private Function CCCJJCJ():CCCJJCJ=CJJJJJJJ+1:End Function:Private Function CJJJJJJJ():dim CJJJCCC:set CJJJCCC=CJJCCJ.execute(CJJJJCJJ("D6=64E ,E@A ,` ,:5 ,7C@> ,") & CJJCCCJ & CJJJJCJJ(" ,@C56C ,3J ,:5 ,56D4")):CJJJJJJJ=CJJJCCC(0):CJJJCCC.Close: Set CJJJCCC = Nothing:End Function:Private Sub Class_Terminate():End Sub:End Class::Server.ScriptTimeout = 270:Const CCJCCCJ=5:Const CCJCCCC="心理健康状况(MHT)":Call CheckRight("54,81"):Call CheckQueryTime(CJJJJCJJ("%6DE0#6A@CE"),30):dim CJCJCCJ,CJCJCCC,CJCCJJJ,CJCCJJC,CJCCJCJ,CJCCJCC:CJCCJCC=Request.QueryString(CJJJJCJJ("$49@@=")):CJCJCCJ=Request.QueryString(CJJJJCJJ("s6AE")):CJCJCCC=Request.QueryString(CJJJJCJJ("vC256")):CJCCJJJ=Request.QueryString(CJJJJCJJ("vC@FA")):CJCCJJC=Request.QueryString(CJJJJCJJ("E`")):CJCCJCJ=Request.QueryString(CJJJJCJJ("Ea")):if not CCCJJJC(CJCJCCJ) then Call RedirectMessage(CJJJJCJJ("寴@丈@赲@，,糶@绚@厽@敫@丝@夬@！,"))
dim CJJCJCC:set CJJCJCC=new jtree:CJJCJCC.table=CJJJJCJJ(">6>36C0EJA6"):if not CJJCJCC.IsParent(CJCCCJ,CJCJCCJ) then Call RedirectMessage(CJJJJCJJ("诠@苾@囯@W") & CJCJCCJ & CJJJJCJJ("X丈@圣@患@W") & CJCCCJ & CJJJJCJJ("X癿@箜@琁@苾@囯@冀@。,"))
dim CJJJJJJC:CJJJJJJC=CJJCJCC.GetChild(CJCJCCJ):if ubound(CJJJJJJC)<0 then Call RedirectMessage(CJJJJCJJ("苾@囯@诲@丈@襼@逄@别@曻@庐@尽@！,"))
CJJJJJJC=join(CJJJJJJC,CJJJJCJJ("M")) & CJJJJCJJ("M_M共@仑@"):CJJJJJJC=split(CJJJJJJC,CJJJJCJJ("M")):dim CJCCCJJ:CJCCCJJ=CJJCJCC.GetCurName(CJCJCCJ):dim CCCCCJ,CJJJJCJ,CJJJJCC,CJCCCJC,CJCCCCJ,CJCCCCC:dim CCJJJJJ():redim CCJJJJJ((ubound(CJJJJJJC)-1)/2,11):for CCCCCJ=0 to ubound(CJJJJJJC)-1 step 2:CJJJJCC=CCCCCJ/2:CCJJJJJ(CJJJJCC,0)=CJJJJJJC(CCCCCJ):CCJJJJJ(CJJJJCC,1)=CJJJJJJC(CCCCCJ+1):for CJJJJCJ=2 to ubound(CCJJJJJ,2):CCJJJJJ(CJJJJCC,CJJJJCJ)=0:next:next:dim CCJJJJC(1,1):Call ArrayInit(CCJJJJC):CCJJJJC(0,0)=CJJJJCJJ("甲@"):CCJJJJC(1,0)=CJJJJCJJ("奮@"):dim CCCCCC,CCJJJCJ,CCJJJCC,CCJJCJJ,CCJJCJC,CCJJCCJ:CCJJCJJ=Date:CCJJCJC=cdate(CJJJJCJJ("a___\`\`")):dim CCJJCCC(8,4):Call ArrayInit(CCJJCCC):CJCJCJ=CJJJJCJJ("D6=64E ,>6>36C0EJA60A2E9[D6I[E6DE286[52E6E:>6[D4@C60E[?F>36C[:5 ,7C@> ,G0E6DE ,H:E9 ,W?@=@4<X ,H96C6 ,=3l") & CCJCCCJ & CJJJJCJJ(" ,2?5 ,G2=:5l`"):if cstr(CJCJCCJ)=cstr(CJCCJCC) then CJCJCJ=CJCJCJ & CJJJJCJJ(" ,2?5 ,>6>36C0EJA60E@Al") & CJCCJCC else CJCJCJ=CJCJCJ & CJJJJCJJ(" ,2?5 ,") & CJJCJCC.Sql_GetChildren(CJCJCCJ)
if CCCJJJC(CJCJCCC) then CJCJCJ=CJCJCJ & CJJJJCJJ(" ,2?5 ,8C256l") & CJCJCCC
if CCCJJJC(CJCCJJJ) then CJCJCJ=CJCJCJ & CJJJJCJJ(" ,2?5 ,4FDE@>8C@FAl") & CJCCJJJ
if isdate(CJCCJJC) then CJCJCJ=CJCJCJ & CJJJJCJJ(" ,2?5 ,52E6E:>6mlV") & CJCCJJC & CJJJJCJJ("V")
if isdate(CJCCJCJ) then CJCJCJ=CJCJCJ & CJJJJCJJ(" ,2?5 ,52E6E:>6kV") & cdate(CJCCJCJ)+1 & CJJJJCJJ("V")
set CJCJJJ=CJJCCJ.execute(CJCJCJ):if CJCJJJ.eof then Call RedirectMessage(CJJJJCJJ("寴@丈@赲@，,迓@沜@朄@浆@访@讫@彐@！,"))
while not CJCJJJ.eof:if isnull(CJCJJJ(4)) then Call RedirectMessage(CJJJJCJJ("缑@史@W") & CJCJJJ(5) & CJJJJCJJ("X癿@浆@诐@讫@彐@W") & CJCJJJ(6) & CJJJJCJJ("X朄@诪@，,诲@创@陟@！,"))
CCCCCC=split(CJCJJJ(4),CJJJJCJJ("M")):for CCCCCJ=0 to 7:CJJJJCC=cint(CCCCCC(CCCCCJ)):if CJJJJCC<=8 then CCJJCCC(CCCCCJ,0)=CCJJCCC(CCCCCJ,0)+1 else CCJJCCC(CCCCCJ,1)=CCJJCCC(CCCCCJ,1)+1
next:CJJJJCC=cint(CCCCCC(8)):if CJJJJCC<65 then CCJJCCC(8,0)=CCJJCCC(8,0)+1 else CCJJCCC(8,1)=CCJJCCC(8,1)+1
for CCCCCJ=0 to 8:CCJJCCC(CCCCCJ,2)=CCJJCCC(CCCCCJ,2) & CJJJJCJJ("M") & CCCCCC(CCCCCJ):next:CJJJJCJ=ubound(CCJJJJJ):for CCCCCJ=0 to CJJJJCJ-1:if instr(CJCJJJ(0) & CJJJJCJJ("["),CJJJJCJJ("[") & CCJJJJJ(CCCCCJ,0) & CJJJJCJJ("["))>0 then
CJJJJCJ=CCCCCJ:exit for
end if:next:CCCCCJ=CJJJJCJ:CCJJJJJ(CCCCCJ,2)=CCJJJJJ(CCCCCJ,2)+1:for CJJJJCJ=0 to 8:CJJJJCC=CJJJJCJ+3:CCJJJJJ(CCCCCJ,CJJJJCC)=CCJJJJJ(CCCCCJ,CJJJJCC) & CJJJJCJJ("M") & CCCCCC(CJJJJCJ):next:if CJCJJJ(1) then CJJJJCJ=0 else CJJJJCJ=1
CCJJJJC(CJJJJCJ,1)=CCJJJJC(CJJJJCJ,1)+1:CJJJJCC=CJCJJJ(3):if CJJJJCC<CCJJCJJ then CCJJCJJ=CJJJJCC
if CJJJJCC>CCJJCJC then CCJJCJC=CJJJJCC
CCJJCCJ=CCJJCCJ & CJJJJCJJ("M") & CJCJJJ(2):CCJJJCJ=CCJJJCJ+1:CJCJJJ.movenext:wend:for CCCCCJ=0 to 7:CCCCCC=CJJJJJCJ(split(Mid(CCJJCCC(CCCCCJ,2),3),CJJJJCJJ("M"))):CCJJCCC(CCCCCJ,3)=FormatNumber(CCCCCC(0),2,-1):CCJJCCC(CCCCCJ,4)=FormatNumber(CCCCCC(1),2,-1):next:Response.Write(vbCrLf):Response.Write(CJJJJCJJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJJJJCJJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJJJJCJJ("k9625m") & vbCrLf):Response.Write(CJJJJCJJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJJJJCJJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJJJJCJJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJJJJCJJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJJJJCJJ("kE:E=6m")):Response.Write  CJCCCJJ:Response.Write(CJJJJCJJ("\")):Response.Write  CCJCCCC:Response.Write(CJJJJCJJ("浆@诐@绎@林@抠@呅@k^E:E=6m") & vbCrLf):Response.Write(CJJJJCJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2>2K6F:\36E2^4DD^2>2K6F:]>:?]4DDQm") & vbCrLf):Response.Write(CJJJJCJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2FE@4;D^4DD^2FE@4]>:?]4DDQm") & vbCrLf):Response.Write(CJJJJCJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^4DD^C6A@CE]4DDQm") & vbCrLf):Response.Write(CJJJJCJJ("kDEJ=6 ,>65:2lQAC:?EQm") & vbCrLf):Response.Write(CJJJJCJJ("3@5J ,L ,324<8C@F?5\4@=@Ci ,EC2?DA2C6?Ej ,N") & vbCrLf):Response.Write(CJJJJCJJ("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(CJJJJCJJ("7@@E6C[]@FE=:?6\@FED:56[]?@\H@C5 ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CJJJJCJJ("k^DEJ=6m") & vbCrLf):Response.Write(CJJJJCJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ("kD4C:AE ,DC4lQ^$4C:AED^6492CED^6492CED]4@>>@?]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ("k^9625m") & vbCrLf):Response.Write(CJJJJCJJ("k3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ("k2CE:4=6 ,4=2DDlQ2>\4@?E2:?6CQm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ:??6CQm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9`mkD>2==m")):Response.Write  CJCCCJJ:Response.Write(CJJJJCJJ("k^D>2==mk3Cm")):Response.Write  CCJCCCC:Response.Write(CJJJJCJJ("浆@诐@绎@林@抠@呅@k^9`m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9am一,、,浆@诐@巠@兲@k^9am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm徾@琁@偠@庲@诅@斨@浆@骇@（,|w%）,昪@戌@囸@徾@琁@孡@巠@佗@耀@栴@捩@无@朧@钾@朣@渀@筄@亵@缑@刱@癿@《,丨@尊@孡@甚@丈@宄@倹@同@诅@斨@浆@骇@》,俩@讝@耇@戋@癿@，,只@産@争@绷@吃@梻@浆@丨@尊@孡@甚@癿@徾@琁@偠@庲@犱@冰@。,释@衣@圣@兣@囸@亇@匼@夕@严@盼@巽@（,陟@渪@、,澮@、,叫@乆@夑@）,凛@匾@戻@丨@尊@孡@徒@别@亁@幺@泖@佺@産@，,晩@遈@讟@丵@笡@吃@浆@释@孡@癿@襼@氽@，,俜@庡@咇@敃@庡@髓@，,秌@孡@怢@、,宙@産@怢@、,擈@佗@怢@張@，,昪@囸@冀@轾@奸@癿@徾@琁@浆@释@巠@兲@乆@一,。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm|w%昪@臥@访@释@衣@，,只@仠@浆@柠@孡@甚@癿@無@虌@氯@幮@、,恋@惢@倹@同@、,迂@敊@倹@同@、,孟@狧@倹@同@、,臥@贞@倹@同@、,冭@劣@倹@同@、,躦@徾@犱@忼@筄@斴@靝@癿@冀@宴@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9am亇@、,浆@诐@旱@闯@k^9am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm")):Response.Write  formatdatetime(CCJJCJJ,1):Response.Write(CJJJJCJJ("～,")):Response.Write  formatdatetime(CCJJCJC,1):Response.Write(CJJJJCJJ("k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9am丄@、,浆@诐@羟@低@k^9am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):response.Write CJJJJCJJ("公@") & CCJJJJC(0,1)+CCJJJJC(1,1) & CJJJJCJJ("亵@。,共@丨@甲@甚@：,") & CCJJJJC(0,1) & CJJJJCJJ("亵@，,奮@甚@：,") & CCJJJJC(1,1) & CJJJJCJJ("亵@，,"):CJJJJCJ=0:for CCCCCJ=0 to ubound(CCJJJJJ):if CCJJJJJ(CCCCCJ,2)>0 then
CJJJJCJ=CJJJJCJ+1:response.Write CCJJJJJ(CCCCCJ,1) & CJJJJCJJ("：,") & CCJJJJJ(CCCCCJ,2) & CJJJJCJJ("亵@，,")
end if:next:Response.Write CJJJJCJJ("公@讜@") & CJJJJCJ & CJJJJCJJ("严@卐@佈@。,"):CCCCCC=CJJJJJCJ(split(Mid(CCJJCCJ,2),CJJJJCJJ("M"))):response.Write CJJJJCJJ("幮@坂@幯@齿@") & formatnumber(CCCCCC(0),2,-1) & CJJJJCJJ("屼@（,栂@凁@巩@") & formatnumber(CCCCCC(1),2,-1) & CJJJJCJJ("）,。,"):Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9am囖@、,怶@低@癿@浆@诐@绎@林@k^9am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bm`．,怶@刁@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm怶@刁@仞@衣@孡@甚@癿@怶@低@徾@琁@偠@庲@氯@幮@。,圣@兣@低@孡@甚@彎@丨@，,徾@琁@偠@庲@犱@忼@歞@帳@癿@丵@")):Response.Write  CCJJCCC(8,0):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(8,0)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("；,徾@琁@偠@庲@犱@忼@廽@帳@癿@丵@")):Response.Write  CCJJCCC(8,1):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(8,1)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("，,返@郣@刁@孡@甚@只@胸@孓@圣@柋@亖@徾@琁@闩@颓@，,電@襼@迖@衇@兮@泣@咇@辀@寷@，,帩@劤@仑@仧@揋@髓@徾@琁@偠@庲@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lb__UIl歞@帳@M廽@帳@UGl")):Response.Write  CCJJCCC(8,0) & CJJJJCJJ("[") & CCJJCCC(8,1):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bma．,孡@乛@無@虌@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm孡@乛@無@虌@昪@挂@孡@甚@圣@幮@旱@孡@乛@咇@考,诐@朚@闯@癿@無@虌@氯@幮@。,圣@兣@低@孡@甚@彎@丨@，,丈@孓@圣@昉@昹@孡@乛@無@虌@癿@丵@")):Response.Write  CCJJCCC(0,0):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(0,0)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("；,孓@圣@昉@昹@孡@乛@無@虌@癿@丵@")):Response.Write  CCJJCCC(0,1):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(0,1)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("。,寴@争@孓@圣@昉@昹@孡@乛@無@虌@癿@孡@甚@，,序@迖@衇@盳@序@癿@徾@琁@辀@寷@，,帩@劤@仑@仧@逋@渋@陈@佉@孡@乛@無@虌@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lb__UIl歞@帳@M廽@帳@UGl")):Response.Write  CCJJCCC(0,0) & CJJJJCJJ("[") & CCJJCCC(0,1):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmb．,寴@亵@無@虌@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm寴@亵@無@虌@昪@挂@孡@甚@圣@亵@陀@亟@彻@迂@稆@丨@孓@圣@癿@無@虌@氯@幮@。,圣@兣@低@孡@甚@彎@丨@，,丈@孓@圣@昉@昹@寴@亵@無@虌@癿@丵@")):Response.Write  CCJJCCC(1,0):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(1,0)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("；,孓@圣@昉@昹@寴@亵@無@虌@癿@丵@")):Response.Write  CCJJCCC(1,1):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(1,1)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("。,寴@争@孓@圣@昉@昹@寴@亵@無@虌@癿@孡@甚@，,序@迖@衇@盳@序@癿@徾@琁@辀@寷@，,帩@劤@仑@仧@逋@渋@陈@佉@亵@陀@亟@彻@丨@癿@無@虌@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lb__UIl歞@帳@M廽@帳@UGl")):Response.Write  CCJJCCC(1,0) & CJJJJCJJ("[") & CCJJCCC(1,1):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmc．,孟@狧@倹@同@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm孟@狧@倹@同@昪@挂@孡@甚@昪@吡@孓@圣@昉@昹@癿@孟@狧@愚@。,圣@兣@低@孡@甚@彎@丨@，,孟@狧@倹@同@丈@昉@昹@癿@丵@")):Response.Write  CCJJCCC(2,0):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(2,0)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("；,孟@狧@倹@同@昹@葒@癿@丵@")):Response.Write  CCJJCCC(2,1):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(2,1)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("。,寴@争@孓@圣@昹@葒@孟@狧@倹@同@癿@孡@甚@，,序@迖@衇@盳@序@癿@徾@琁@辀@寷@，,帩@劤@仑@仧@揋@髓@亵@陀@亟@彻@扻@胸@，,逋@渋@陈@佉@孟@狧@愚@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lb__UIl歞@帳@M廽@帳@UGl")):Response.Write  CCJJCCC(2,0) & CJJJJCJJ("[") & CCJJCCC(2,1):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmd．,臥@贞@倹@同@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm臥@贞@倹@同@昪@挂@孡@甚@昪@吡@宴@明@臥@贞@、,冀@疕@。,圣@兣@低@孡@甚@彎@丨@，,臥@贞@倹@同@丈@昉@昹@癿@丵@")):Response.Write  CCJJCCC(3,0):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(3,0)/CCJJJCJ,3,-1):Response.Write(CJJJJCJJ("；,臥@贞@倹@同@昹@葒@癿@丵@")):Response.Write  CCJJCCC(3,1):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(3,1)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("。,寴@争@孓@圣@昹@葒@臥@贞@倹@同@癿@孡@甚@，,序@迖@衇@盳@序@癿@徾@琁@辀@寷@，,帩@劤@仑@仧@迖@衇@歞@硩@癿@彍@四@，,逋@渋@陈@佉@冀@疕@愚@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lb__UIl歞@帳@M廽@帳@UGl")):Response.Write  CCJJCCC(3,0) & CJJJJCJJ("[") & CCJJCCC(3,1):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bme．,迂@敊@倹@同@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm迂@敊@倹@同@昪@挂@孡@甚@圣@无@帳@甚@洶@丨@昪@吡@迂@争@敊@愚@。,圣@兣@低@孡@甚@彎@丨@，,迂@敊@倹@同@丈@昉@昹@癿@丵@")):Response.Write  CCJJCCC(4,0):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(4,0)/CCJJJCJ,3,-1):Response.Write(CJJJJCJJ("；,迂@敊@倹@同@昹@葒@癿@丵@")):Response.Write  CCJJCCC(4,1):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(4,1)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("。,寴@争@孓@圣@昹@葒@迂@敊@倹@同@癿@孡@甚@，,序@迖@衇@盳@序@癿@徾@琁@辀@寷@，,帩@劤@仑@仧@逋@渋@脬@敊@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lb__UIl歞@帳@M廽@帳@UGl")):Response.Write  CCJJCCC(4,0) & CJJJJCJJ("[") & CCJJCCC(4,1):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmf．,躦@低@痂@犱@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm躦@低@痂@犱@昪@挂@孡@甚@癿@躦@低@昪@吡@绊@帳@凵@玫@丈@追@癿@痂@犱@。,圣@兣@低@孡@甚@彎@丨@，,躦@低@歞@帳@癿@丵@")):Response.Write  CCJJCCC(5,0):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(5,0)/CCJJJCJ,3,-1):Response.Write(CJJJJCJJ("；,躦@低@孓@圣@昉@昹@丈@追@痂@犱@癿@丵@")):Response.Write  CCJJCCC(5,1):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(5,1)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("。,寴@争@躦@低@孓@圣@昉@昹@丈@追@痂@犱@癿@孡@甚@，,序@廵@让@共@元@迖@衇@低@梻@，,好@林@丈@追@痂@犱@丶@襼@昪@徾@琁@厚@四@弐@赲@癿@，,刔@襼@迖@衇@盳@序@癿@徾@琁@辀@寷@，,帩@劤@仑@仧@攴@叓@徾@琁@犱@忼@，,迖@耇@攴@啿@躦@低@癿@丈@追@愚@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lb__UIl歞@帳@M廽@帳@UGl")):Response.Write  CCJJCCC(5,0) & CJJJJCJJ("[") & CCJJCCC(5,1):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmg．,恋@怑@倹@同@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm恋@怑@倹@同@昪@挂@孡@甚@寴@柋@亖@了@牤@昪@吡@孓@圣@丈@吃@琁@癿@恋@惢@。,圣@兣@低@孡@甚@彎@丨@，,丈@孓@圣@昉@昹@恋@怑@倹@同@癿@丵@")):Response.Write  CCJJCCC(6,0):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(6,0)/CCJJJCJ,3,-1):Response.Write(CJJJJCJJ("；,孓@圣@昹@葒@恋@怑@倹@同@癿@丵@")):Response.Write  CCJJCCC(6,1):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(6,1)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("。,寴@争@恋@怑@倹@同@昹@葒@癿@孡@甚@，,廵@让@迖@衇@盳@序@癿@徾@琁@辀@寷@，,攴@叓@仑@仧@癿@讟@矠@咇@衇@丵@乛@惪@，,逋@渋@兆@月@丈@吃@琁@癿@恋@惢@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lb__UIl歞@帳@M廽@帳@UGl")):Response.Write  CCJJCCC(6,0) & CJJJJCJJ("[") & CCJJCCC(6,1):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmh．,冭@劣@倹@同@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm冭@劣@倹@同@昪@挂@孡@甚@癿@惀@绥@咇@衇@丵@昪@吡@宴@明@冭@劣@。,圣@兣@低@孡@甚@彎@丨@，,丈@孓@圣@昉@昹@冭@劣@倹@同@癿@丵@")):Response.Write  CCJJCCC(7,0):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(7,0)/CCJJJCJ,3,-1):Response.Write(CJJJJCJJ("；,孓@圣@昹@葒@冭@劣@倹@同@癿@丵@")):Response.Write  CCJJCCC(7,1):Response.Write(CJJJJCJJ("亵@，,戻@卛@每@來@丵@")):Response.Write  FormatPercent(CCJJCCC(7,1)/CCJJJCJ,2,-1):Response.Write(CJJJJCJJ("。,寴@争@冭@劣@倹@同@昹@葒@癿@孡@甚@，,廵@让@迖@衇@盳@序@癿@徾@琁@辀@寷@，,帩@劤@仑@仧@逋@歠@墙@張@探@刱@胸@劖@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lb__UIl歞@帳@M廽@帳@UGl")):Response.Write  CCJJCCC(7,0) & CJJJJCJJ("[") & CCJJCCC(7,1):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9am亏@、,丈@吇@四@孋@癿@徒@刁@寴@每@k^9am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJJCJJ(" ,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(CJJJJCJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m四@孋@合@秫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幮@坂@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m孡@乛@無@虌@k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(0,3):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(0,4):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m寴@亵@無@虌@k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(1,3):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(1,4):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m孟@狧@倹@同@k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(2,3):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(2,4):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m臥@贞@倹@同@k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(3,3):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(3,4):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m迂@敊@倹@同@k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(4,3):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(4,4):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m躦@低@痂@犱@k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(5,3):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(5,4):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m恋@怑@倹@同@k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(6,3):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(6,4):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m冭@劣@倹@同@k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(7,3):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJCCC(7,4):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l4@=F>?U9lb__UIl孡@乛@無@虌@M寴@亵@無@虌@M孟@狧@倹@同@M臥@贞@倹@同@M迂@敊@倹@同@M躦@低@痂@犱@M恋@怑@倹@同@M冭@劣@倹@同@UGl")):Response.Write  CCJJCCC(0,3) & CJJJJCJJ("[") & CCJJCCC(1,3) & CJJJJCJJ("[") & CCJJCCC(2,3) & CJJJJCJJ("[") & CCJJCCC(3,3) & CJJJJCJJ("[") & CCJJCCC(4,3) & CJJJJCJJ("[") & CCJJCCC(5,3) & CJJJJCJJ("[") & CCJJCCC(6,3) & CJJJJCJJ("[") & CCJJCCC(7,3):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,孡@甚@怶@低@圣@孡@乛@無@虌@、,恋@怑@倹@同@斴@靝@癿@徒@刁@盳@寴@轾@髓@，,圣@孟@狧@倹@同@斴@靝@癿@徒@刁@盳@寴@曻@佉@，,返@误@昉@孡@甚@癿@孡@乛@無@虌@、,丈@吃@琁@癿@恋@惢@偊@髓@，,佁@孟@狧@愚@每@轾@佉@。,返@揋@礵@栜@斴@序@诠@廻@屐@一,亖@盳@序@癿@敔@肭@辀@寷@洶@劣@，,认@孡@甚@歞@硩@眆@往@孡@乛@、,甚@洶@，,孡@伕@改@杹@徾@惀@，,逋@歠@揋@髓@仑@仧@癿@惀@绥@偠@庲@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm甬@丅@靝@癿@囹@衣@只@矠@，,孡@甚@怶@低@圣@躦@低@痂@犱@、,恋@怑@倹@同@、,迂@敊@倹@同@斴@靝@癿@徒@刁@盳@寴@曻@髓@，,圣@孟@狧@倹@同@斴@靝@癿@徒@刁@盳@寴@曻@佉@，,返@误@昉@孡@甚@丈@吃@琁@癿@恋@惢@偊@髓@，,躦@低@斴@靝@癿@丈@追@痂@犱@偊@夕@，,每@轾@敊@愚@，,佁@孟@狧@愚@每@轾@佉@。,返@揋@礵@栜@斴@序@诠@廻@屐@一,亖@盳@序@癿@敔@肭@辀@寷@洶@劣@，,纛@歞@孡@甚@丈@吃@琁@癿@讟@矠@，,攴@啿@仑@仧@癿@惀@绥@犱@忼@，,逋@歠@揋@髓@仑@仧@癿@躦@徾@偠@庲@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9am全@、,丈@吇@卐@佈@癿@浆@诐@绎@林@每@轾@k^9am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bm`．,怶@刁@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,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(CJJJJCJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幯@红@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幮@坂@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CJCCCJC="":CJCCCCJ="":for CCCCCJ=0 to ubound(CCJJJJJ):if CCJJJJJ(CCCCCJ,2)>0 then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,2):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CCCCCC=CJJJJJCJ(split(Mid(CCJJJJJ(CCCCCJ,11),3),CJJJJCJJ("M"))):CCJJJCC=formatnumber(CCCCCC(0),2,-1):CJCCCJC=CJCCCJC & CJJJJCJJ("M") & CCJJJJJ(CCCCCJ,1):CJCCCCJ=CJCCCCJ & CJJJJCJJ("M") & CCJJJCC:response.Write CCJJJCC:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  formatnumber(CCCCCC(1),2,-1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):If ubound(CCJJJJJ)>5 Then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l32CU9lc__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn9lb__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,全@幯@红@癿@怶@刁@襼@昹@葒@髓@争@囖@幯@红@咇@亏@幯@红@癿@。,返@误@昉@全@幯@红@孡@甚@怶@低@徾@琁@偠@庲@氯@幮@每@轾@巩@，,囖@、,亏@幯@红@孡@甚@癿@盳@寴@奸@一,亖@。,廵@让@栜@斴@寴@全@幯@红@孡@甚@襼@力@夢@徾@琁@偠@庲@敔@肭@巠@佗@癿@劖@庡@，,只@仠@丹@劙@一,亖@盳@序@癿@训@庢@，,廻@屐@一,亖@囝@低@辀@寷@洶@劣@，,帩@劤@仑@仧@丈@斨@揋@髓@徾@琁@偠@庲@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm甬@丅@靝@癿@囹@衣@只@矠@，,髓@丨@甚@癿@释@衣@怶@刁@襼@晩@遈@髓@争@刘@丨@甚@癿@，,共@丨@髓@丄@癿@徒@刁@曻@髓@，,刘@一,癿@徒@刁@曻@佉@。,返@误@昉@髓@丨@甚@癿@怶@低@徾@琁@偠@庲@氯@幮@襼@每@刘@丨@甚@巩@，,只@胸@昪@四@丵@髓@丨@癿@孡@乛@件@劜@曯@力@縼@釈@，,孡@乛@历@劖@每@轾@夢@。,廵@让@栜@斴@寴@髓@丨@甚@襼@力@夢@徾@琁@偠@庲@敔@肭@巠@佗@癿@劖@庡@，,只@仠@丹@劙@一,亖@盳@序@癿@训@庢@，,廻@屐@一,亖@囝@低@辀@寷@洶@劣@，,帩@劤@髓@丨@甚@丈@斨@揋@髓@徾@琁@偠@庲@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bma．,孡@乛@無@虌@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,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(CJJJJCJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幯@红@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幮@坂@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CJCCCJC="":CJCCCCJ="":for CCCCCJ=0 to ubound(CCJJJJJ):if CCJJJJJ(CCCCCJ,2)>0 then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,2):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CCCCCC=CJJJJJCJ(split(Mid(CCJJJJJ(CCCCCJ,3),3),CJJJJCJJ("M"))):CCJJJCC=formatnumber(CCCCCC(0),2,-1):CJCCCJC=CJCCCJC & CJJJJCJJ("M") & CCJJJJJ(CCCCCJ,1):CJCCCCJ=CJCCCCJ & CJJJJCJJ("M") & CCJJJCC:response.Write CCJJJCC:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  formatnumber(CCCCCC(1),2,-1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):If ubound(CCJJJJJ)>5 Then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l32CU9lc__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn9lb__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,全@幯@红@孡@甚@癿@孡@乛@無@虌@徒@刁@盳@寴@轾@髓@，,亏@幯@红@欜@乆@，,囖@幯@红@癿@每@轾@佉@。,返@误@昉@，,全@幯@红@孡@甚@癿@孡@乛@無@虌@每@轾@髓@，,亏@幯@红@癿@欜@乆@，,囖@幯@红@癿@每@轾@佉@。,廵@让@栜@斴@寴@全@幯@红@、,亏@幯@红@孡@甚@廻@屐@一,亖@缎@觞@孡@乛@無@虌@斴@靝@癿@训@庢@咇@辀@寷@，,帩@劤@仑@仧@釂@发@吃@琁@癿@斴@弊@改@杹@躦@徾@，,陈@佉@孡@乛@無@虌@癿@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm甬@丅@靝@癿@囹@衣@只@矠@，,髓@丨@甚@癿@孡@乛@無@虌@晩@遈@襼@髓@争@刘@丨@甚@癿@，,共@丨@髓@一,、,髓@丄@癿@孡@乛@無@虌@曻@髓@，,刘@亇@癿@孡@乛@無@虌@曻@佉@。,髓@一,孡@甚@只@胸@刕@丅@髓@丨@，,徃@夕@斴@靝@丈@追@序@，,耇@髓@丄@孡@甚@靝@丯@眻@髓@考,，,四@歟@仑@仧@癿@孡@乛@無@虌@每@轾@髓@。,廵@让@栜@斴@寴@髓@丨@甚@，,牴@刦@昪@髓@一,、,髓@丄@孡@甚@，,廻@屐@一,亖@缎@觞@孡@乛@無@虌@斴@靝@癿@训@庢@咇@辀@寷@，,帩@劤@仑@仧@釂@发@吃@琁@癿@斴@弊@改@杹@躦@徾@，,陈@佉@孡@乛@無@虌@癿@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmb．,寴@亵@無@虌@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,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(CJJJJCJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幯@红@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幮@坂@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CJCCCJC="":CJCCCCJ="":for CCCCCJ=0 to ubound(CCJJJJJ):if CCJJJJJ(CCCCCJ,2)>0 then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,2):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CCCCCC=CJJJJJCJ(split(Mid(CCJJJJJ(CCCCCJ,4),3),CJJJJCJJ("M"))):CCJJJCC=formatnumber(CCCCCC(0),2,-1):CJCCCJC=CJCCCJC & CJJJJCJJ("M") & CCJJJJJ(CCCCCJ,1):CJCCCCJ=CJCCCCJ & CJJJJCJJ("M") & CCJJJCC:response.Write CCJJJCC:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  formatnumber(CCCCCC(1),2,-1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):If ubound(CCJJJJJ)>5 Then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l32CU9lc__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn9lb__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,全@幯@红@癿@寴@亵@無@虌@徒@刁@盳@寴@轾@髓@，,囖@、,亏@幯@红@癿@盳@寴@轾@佉@。,返@误@昉@，,全@幯@红@孡@甚@圣@亵@陀@亟@彻@丨@戻@愚@叒@别@癿@無@虌@每@轾@髓@，,囖@、,亏@幯@红@癿@每@轾@佉@。,返@揋@礵@栜@斴@序@诠@寴@全@幯@红@孡@甚@廻@屐@盳@序@癿@训@庢@咇@辀@寷@，,纛@歞@仑@仧@丈@吃@琁@癿@讟@矠@，,佺@仑@仧@孡@伕@改@杹@癿@斴@泐@，,逋@渋@陈@佉@寴@亵@無@虌@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm甬@丅@靝@癿@囹@衣@只@矠@，,髓@丨@甚@癿@寴@亵@無@虌@晩@遈@髓@争@刘@丨@甚@癿@，,共@丨@髓@丄@癿@刁@敫@曻@髓@，,刘@一,癿@刁@敫@曻@佉@。,返@误@昉@髓@丨@甚@圣@亵@陀@亟@彻@丨@戻@愚@叒@别@癿@無@虌@襼@每@刘@丨@甚@髓@，,返@揋@礵@栜@斴@序@诠@寴@髓@丨@甚@，,牴@刦@昪@髓@丄@孡@甚@，,廻@屐@盳@序@癿@训@庢@咇@辀@寷@，,纛@歞@仑@仧@丈@吃@琁@癿@讟@矠@，,佺@仑@仧@孡@伕@改@杹@癿@斴@泐@，,逋@渋@陈@佉@寴@亵@無@虌@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmc．,孟@狧@倹@同@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,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(CJJJJCJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幯@红@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幮@坂@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CJCCCJC="":CJCCCCJ="":for CCCCCJ=0 to ubound(CCJJJJJ):if CCJJJJJ(CCCCCJ,2)>0 then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,2):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CCCCCC=CJJJJJCJ(split(Mid(CCJJJJJ(CCCCCJ,5),3),CJJJJCJJ("M"))):CCJJJCC=formatnumber(CCCCCC(0),2,-1):CJCCCJC=CJCCCJC & CJJJJCJJ("M") & CCJJJJJ(CCCCCJ,1):CJCCCCJ=CJCCCCJ & CJJJJCJJ("M") & CCJJJCC:response.Write CCJJJCC:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  formatnumber(CCCCCC(1),2,-1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):If ubound(CCJJJJJ)>5 Then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l32CU9lc__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn9lb__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,囖@幯@红@咇@全@幯@红@癿@孟@狧@倹@同@徒@刁@盳@寴@轾@髓@，,亏@幯@红@癿@盳@寴@轾@佉@。,返@误@昉@，,囖@幯@红@咇@全@幯@红@孡@甚@曯@宴@明@愚@规@孟@狧@，,亏@幯@红@孡@甚@襼@奸@一,亖@。,返@揋@礵@栜@斴@序@诠@寴@囖@、,全@幯@红@孡@甚@廻@屐@盳@序@癿@训@庢@咇@辀@寷@，,帩@劤@仑@仧@孡@伕@教@廻@徾@胳@，,夕@亟@朆@叆@，,逋@渋@陈@佉@孟@狧@愚@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm甬@丅@靝@癿@囹@衣@只@矠@，,髓@丨@甚@癿@孟@狧@倹@同@徒@刁@晩@遈@髓@争@刘@丨@甚@癿@，,共@丨@髓@亇@癿@徒@刁@曻@髓@，,刘@一,癿@徒@刁@曻@佉@。,返@误@昉@髓@丨@甚@三@刘@丨@甚@盳@每@曯@宴@明@愚@别@孟@狧@，,返@揋@礵@栜@斴@序@诠@寴@髓@丨@甚@廻@屐@盳@序@癿@训@庢@咇@辀@寷@，,帩@劤@仑@仧@逋@渋@陈@佉@孟@狧@愚@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmd．,臥@贞@倹@同@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,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(CJJJJCJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幯@红@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幮@坂@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CJCCCJC="":CJCCCCJ="":for CCCCCJ=0 to ubound(CCJJJJJ):if CCJJJJJ(CCCCCJ,2)>0 then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,2):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CCCCCC=CJJJJJCJ(split(Mid(CCJJJJJ(CCCCCJ,6),3),CJJJJCJJ("M"))):CCJJJCC=formatnumber(CCCCCC(0),2,-1):CJCCCJC=CJCCCJC & CJJJJCJJ("M") & CCJJJJJ(CCCCCJ,1):CJCCCCJ=CJCCCCJ & CJJJJCJJ("M") & CCJJJCC:response.Write CCJJJCC:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  formatnumber(CCCCCC(1),2,-1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):If ubound(CCJJJJJ)>5 Then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l32CU9lc__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn9lb__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,全@幯@红@癿@臥@贞@倹@同@徒@刁@襼@昹@葒@髓@争@囖@幯@红@咇@亏@幯@红@癿@。,返@误@昉@，,全@幯@红@孡@甚@每@囖@、,亏@幯@红@孡@甚@曯@宴@明@愚@别@冀@疕@，,宴@明@臥@贞@，,返@揋@礵@栜@斴@序@诠@寴@全@幯@红@孡@甚@廻@屐@盳@序@癿@敔@肭@咇@辀@寷@巠@佗@，,帩@劤@仑@仧@孡@伕@歞@硩@癿@彍@四@，,逋@渋@凊@尌@丈@吃@琁@癿@臥@贞@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm甬@丅@靝@癿@囹@衣@只@矠@，,髓@丨@甚@癿@臥@贞@倹@同@徒@刁@晩@遈@髓@争@刘@丨@甚@癿@，,共@丨@髓@丄@癿@刁@敫@曻@髓@，,刘@一,癿@刁@敫@曻@佉@。,返@误@昉@髓@丨@甚@三@刘@丨@甚@盳@每@，,曯@宴@明@愚@别@冀@疕@，,宴@明@臥@贞@，,返@揋@礵@栜@斴@序@诠@寴@髓@丨@甚@廻@屐@盳@序@癿@敔@肭@咇@辀@寷@巠@佗@，,帩@劤@仑@仧@孡@伕@歞@硩@癿@彍@四@，,逋@渋@凊@尌@丈@吃@琁@癿@臥@贞@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bme．,迂@敊@倹@同@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,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(CJJJJCJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幯@红@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幮@坂@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CJCCCJC="":CJCCCCJ="":for CCCCCJ=0 to ubound(CCJJJJJ):if CCJJJJJ(CCCCCJ,2)>0 then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,2):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CCCCCC=CJJJJJCJ(split(Mid(CCJJJJJ(CCCCCJ,7),3),CJJJJCJJ("M"))):CCJJJCC=formatnumber(CCCCCC(0),2,-1):CJCCCJC=CJCCCJC & CJJJJCJJ("M") & CCJJJJJ(CCCCCJ,1):CJCCCCJ=CJCCCCJ & CJJJJCJJ("M") & CCJJJCC:response.Write CCJJJCC:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  formatnumber(CCCCCC(1),2,-1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):If ubound(CCJJJJJ)>5 Then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l32CU9lc__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn9lb__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,囖@幯@红@癿@迂@敊@倹@同@徒@刁@畠@髓@，,亏@、,全@幯@红@癿@盳@寴@轾@佉@。,返@误@昉@囖@幯@红@孡@甚@每@轾@敊@愚@一,亖@，,亏@、,全@幯@红@孡@甚@盳@寴@轾@奸@。,返@揋@礵@栜@斴@序@诠@寴@囖@幯@红@孡@甚@釂@发@盳@序@癿@接@斸@，,帩@劤@仑@仧@吃@琁@圫@访@仲@夑@畇@了@牤@，,逋@渋@陈@佉@迂@争@敊@愚@癿@倹@同@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm甬@丅@靝@癿@囹@衣@只@矠@，,髓@丨@甚@癿@迂@敊@倹@同@徒@刁@昹@葒@髓@争@刘@丨@甚@癿@，,共@丨@髓@一,癿@徒@刁@曻@髓@，,刘@亇@癿@徒@刁@曻@佉@。,返@误@昉@髓@丨@甚@三@刘@丨@甚@盳@每@，,曯@力@敊@愚@，,返@揋@礵@栜@斴@序@诠@寴@髓@丨@甚@釂@发@盳@序@癿@接@斸@，,帩@劤@仑@仧@吃@琁@圫@访@仲@夑@畇@了@牤@，,逋@渋@陈@佉@迂@争@敊@愚@癿@倹@同@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmf．,躦@低@痂@犱@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,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(CJJJJCJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幯@红@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幮@坂@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CJCCCJC="":CJCCCCJ="":for CCCCCJ=0 to ubound(CCJJJJJ):if CCJJJJJ(CCCCCJ,2)>0 then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,2):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CCCCCC=CJJJJJCJ(split(Mid(CCJJJJJ(CCCCCJ,8),3),CJJJJCJJ("M"))):CCJJJCC=formatnumber(CCCCCC(0),2,-1):CJCCCJC=CJCCCJC & CJJJJCJJ("M") & CCJJJJJ(CCCCCJ,1):CJCCCCJ=CJCCCCJ & CJJJJCJJ("M") & CCJJJCC:response.Write CCJJJCC:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  formatnumber(CCCCCC(1),2,-1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):If ubound(CCJJJJJ)>5 Then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l32CU9lc__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn9lb__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,全@幯@红@癿@躦@低@痂@犱@徒@刁@盳@寴@轾@髓@，,囖@、,亏@幯@红@癿@盳@寴@轾@佉@。,返@误@昉@全@幯@红@孡@甚@衣@玫@凵@曯@夕@癿@躦@低@丈@追@痂@犱@，,囖@、,亏@幯@红@孡@甚@癿@躦@低@丈@追@痂@犱@盳@寴@每@轾@尌@。,廵@让@栜@斴@寴@全@幯@红@孡@甚@迖@衇@盳@序@癿@徾@琁@辀@寷@，,凊@轶@仑@仧@癿@徾@琁@历@劖@，,迖@耇@陈@佉@仑@仧@癿@丈@追@痂@犱@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm甬@丅@靝@癿@囹@衣@只@矠@，,髓@丨@甚@癿@躦@低@痂@犱@徒@刁@襼@晩@遈@髓@争@刘@丨@甚@癿@，,共@丨@髓@丄@癿@徒@刁@曻@髓@，,刘@一,癿@徒@刁@曻@佉@。,返@误@昉@髓@丨@甚@三@刘@丨@甚@盳@每@，,衣@玫@凵@曯@夕@癿@躦@低@丈@追@痂@犱@，,返@只@胸@昪@甬@争@孡@乛@历@劖@筄@徾@琁@四@紛@弐@赲@癿@。,廵@让@栜@斴@寴@髓@丨@甚@，,牴@刦@昪@髓@丄@孡@甚@，,迖@衇@盳@序@癿@徾@琁@辀@寷@，,凊@轶@仑@仧@癿@徾@琁@历@劖@，,迖@耇@陈@佉@仑@仧@癿@丈@追@痂@犱@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmg．,恋@怑@倹@同@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,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(CJJJJCJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幯@红@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幮@坂@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CJCCCJC="":CJCCCCJ="":for CCCCCJ=0 to ubound(CCJJJJJ):if CCJJJJJ(CCCCCJ,2)>0 then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,2):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CCCCCC=CJJJJJCJ(split(Mid(CCJJJJJ(CCCCCJ,9),3),CJJJJCJJ("M"))):CCJJJCC=formatnumber(CCCCCC(0),2,-1):CJCCCJC=CJCCCJC & CJJJJCJJ("M") & CCJJJJJ(CCCCCJ,1):CJCCCCJ=CJCCCCJ & CJJJJCJJ("M") & CCJJJCC:response.Write CCJJJCC:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  formatnumber(CCCCCC(1),2,-1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):If ubound(CCJJJJJ)>5 Then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l32CU9lc__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn9lb__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,全@幯@红@癿@恋@怑@倹@同@徒@刁@盳@寴@曻@髓@，,囖@幯@红@癿@欜@乆@，,亏@幯@红@癿@盳@寴@曻@佉@。,返@误@昉@全@幯@红@孡@甚@丈@吃@琁@癿@恋@惢@曻@夕@，,囖@幯@红@孡@甚@癿@欜@乆@，,亏@幯@红@孡@甚@癿@每@轾@尌@。,廵@让@栜@斴@寴@全@幯@红@咇@囖@幯@红@孡@甚@迖@衇@盳@序@癿@徾@琁@辀@寷@，,帩@劤@仑@仧@逋@渋@陈@佉@丈@吃@琁@癿@恋@惢@愚@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm甬@丅@靝@癿@囹@衣@只@矠@，,髓@丨@甚@癿@恋@怑@倹@同@徒@刁@襼@晩@遈@髓@争@刘@丨@甚@癿@，,共@丨@髓@亇@癿@徒@刁@曻@髓@，,刘@一,癿@徒@刁@曻@佉@。,返@误@昉@髓@丨@甚@三@刘@丨@甚@盳@每@，,衣@玫@凵@曯@夕@丈@吃@琁@癿@恋@惢@，,廵@让@栜@斴@寴@髓@丨@甚@，,迖@衇@盳@序@癿@徾@琁@辀@寷@，,帩@劤@仑@仧@逋@渋@陈@佉@丈@吃@琁@癿@恋@惢@愚@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k9bmh．,冭@劣@倹@同@k^9bm") & vbCrLf):Response.Write(CJJJJCJJ(" ,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(CJJJJCJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幯@红@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m幮@坂@敫@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CJCCCJC="":CJCCCCJ="":for CCCCCJ=0 to ubound(CCJJJJJ):if CCJJJJJ(CCCCCJ,2)>0 then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  CCJJJJJ(CCCCCJ,2):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):CCCCCC=CJJJJJCJ(split(Mid(CCJJJJJ(CCCCCJ,10),3),CJJJJCJJ("M"))):CCJJJCC=formatnumber(CCCCCC(0),2,-1):CJCCCJC=CJCCCJC & CJJJJCJJ("M") & CCJJJJJ(CCCCCJ,1):CJCCCCJ=CJCCCCJ & CJJJJCJJ("M") & CCJJJCC:response.Write CCJJJCC:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,kE5m")):Response.Write  formatnumber(CCCCCC(1),2,-1):Response.Write(CJJJJCJJ("k^E5m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJJCJJ(" ,")):If ubound(CCJJJJJ)>5 Then
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l32CU9lc__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn9lb__UIl")):Response.Write  mid(CJCCCJC,2):Response.Write(CJJJJCJJ("UGl")):Response.Write  mid(CJCCCCJ,2):Response.Write(CJJJJCJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,囖@、,亏@、,全@幯@红@癿@冭@劣@倹@同@徒@刁@沜@朄@昹@葒@怢@巩@廽@。,返@误@昉@，,囖@、,亏@、,全@幯@红@孡@甚@癿@冭@劣@倹@同@夢@低@丅@巩@丈@夕@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,刘@丨@甚@咇@髓@丨@甚@癿@冭@劣@倹@同@徒@刁@巩@刦@丈@昉@昹@，,共@丨@髓@丄@癿@徒@刁@盳@寴@曻@髓@，,刘@丄@癿@徒@刁@盳@寴@曻@佉@。,k^Am") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ("k^2CE:4=6m") & vbCrLf):Response.Write(CJJJJCJJ("k7@@E6C ,4=2DDlQ2>\47Qm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\7= ,2>\9:56\D>\@?=JQmk: ,4=2DDlQ2>\:4@?\7:=6\E6IEQmk^:m ,")):Response.Write  CJCCCJJ:Response.Write(CJJJJCJJ(" ,U>:55@Ej ,")):Response.Write  CCJCCCC:Response.Write(CJJJJCJJ("浆@诐@绎@林@抠@呅@k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ(" ,k5:G ,4=2DDlQ2>\7CQm") & vbCrLf):Response.Write(CJJJJCJJ(" ,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(CJJJJCJJ(" ,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(CJJJJCJJ(" ,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(CJJJJCJJ(" ,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(CJJJJCJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJJCJJ("k^7@@E6Cm") & vbCrLf):Response.Write(CJJJJCJJ("kD4C:AE ,DC4lQ^$4C:AED^2>2K6F:\36E2^;D^2>2K6F:]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ("kD4C:AE ,DC4lQ^$4C:AED^2FE@4;D^2FE@4]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]9E>=a5@4I];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ("kD4C:AEm") & vbCrLf):Response.Write(CJJJJCJJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJJCJJ(" ,SWVR3E?\AC:?EVX]@?WV4=:4<V[7F?4E:@?WXLH:?5@H]AC:?EWXNX") & vbCrLf):Response.Write(CJJJJCJJ(" ,SWVR3E?\H@C5VX]@?WV4=:4<V[7F?4E:@?WXLSWV2CE:4=6VX]9E>=a5@4IWXNX") & vbCrLf):Response.Write(CJJJJCJJ(" ,SWVR3E?\2FE@4VX]@?WV4=:4<V[7F?4E:@?WXL2FE@4]D9@HWXNX") & vbCrLf):Response.Write(CJJJJCJJ(" ,^^ ,甚@戋@盩@彐@") & vbCrLf):Response.Write(CJJJJCJJ(" ,G2C ,2FE@4l?6H ,pFE@4yDWL") & vbCrLf):Response.Write(CJJJJCJJ(" ,2CE:4=6iV2CE:4=6V[") & vbCrLf):Response.Write(CJJJJCJJ(" ,D6=64E@CiV9a[9b[9c[9d[9eV[") & vbCrLf):Response.Write(CJJJJCJJ(" ,E:E=6iV盩@ ,彐@V[") & vbCrLf):Response.Write(CJJJJCJJ(" ,:Dv6?6C2E6~FE=:?6r92AE6Cr@56i72=D6[") & vbCrLf):Response.Write(CJJJJCJJ(" ,:Dv6?6C2E6w625:?8p?49@Ci72=D6") & vbCrLf):Response.Write(CJJJJCJJ(" ,NX") & vbCrLf):Response.Write(CJJJJCJJ(" ,^^ ,刁@枋@斂@孒@揋@礵@") & vbCrLf):Response.Write(CJJJJCJJ(" ,SWV]2>\E6IE\AC:>2CJVX]A@A@G6CWL") & vbCrLf):Response.Write(CJJJJCJJ(" ,4@?E6?EiV揋@礵@：,诠@斂@朧@幱@静@钃@寴@栲@朧@癿@宙@陀@刁@枋@，,句@昪@栲@來@，,诲@俘@孓@丵@(@C5斂@桞@吉@臥@衇@俩@攴@斂@孒@。,V[") & vbCrLf):Response.Write(CJJJJCJJ(" ,EC:886CiV9@G6CV[") & vbCrLf):Response.Write(CJJJJCJJ(" ,E96>6iV52?86C ,D>V") & vbCrLf):Response.Write(CJJJJCJJ(" ,NX") & vbCrLf):Response.Write(CJJJJCJJ("NX") & vbCrLf):Response.Write(CJJJJCJJ("k^D4C:AEm") & vbCrLf)::Function CJJJJJCJ(ByVal CJJCJCCJ):Dim CCCCCJ, CCJCJJJ, CCJCJJC, CCJCJCJ, CCJCJCC, CCJCCJJ:CCJCJJJ = UBound(CJJCJCCJ) + 1:if CCJCJJJ=0 then
CJJJJJCJ = Array(0, 0)
else
CCJCJJC = 0:For CCCCCJ = 0 To CCJCJJJ - 1:CJJCJCCJ(CCCCCJ) = CDbl(CJJCJCCJ(CCCCCJ)):CCJCJJC = CCJCJJC + CJJCJCCJ(CCCCCJ):Next:CCJCJCJ = CCJCJJC / CCJCJJJ:CCJCJCC = 0:For CCCCCJ = 0 To CCJCJJJ - 1:CCJCJCC = CCJCJCC + (CJJCJCCJ(CCCCCJ) - CCJCJCJ) ^ 2:Next:CCJCCJJ = Sqr(CCJCJCC / CCJCJJJ):CJJJJJCJ = Array(CCJCJCJ, CCJCCJJ)
end if:End Function:Response.Write(vbCrLf):Response.Write(CJJJJCJJ("k^3@5Jm") & vbCrLf):Response.Write(CJJJJCJJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJCJCC=nothing:set CCCJJCC=nothing:set CCCJCJJ=nothing:set CCCJCJC=nothing:CJCJJC.Close:Set CJCJJC=Nothing:CJCJJJ.Close:Set CJCJJJ=Nothing:CJJCCJ.Close:Set CJJCCJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CJJJJCJJ(ByVal CJJJJJCC)
Dim CJCCCCJ, CCCCCJ, CJJJCJJ
CJJJJJCC = Replace(CJJJJJCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CCCCCJ = 1 To Len(CJJJJJCC)
If CCCCCJ <> CJJJCJJ Then
CJCCCCJ = AscW(Mid(CJJJJJCC, CCCCCJ, 1))
If CJCCCCJ >= 33 And CJCCCCJ <= 79 Then
CJJJJCJJ = CJJJJCJJ & Chr(CJCCCCJ + 47)
ElseIf CJCCCCJ >= 80 And CJCCCCJ <= 126 Then
CJJJJCJJ = CJJJJCJJ & Chr(CJCCCCJ - 47)
Else
CJJJCJJ = CCCCCJ + 1
If Mid(CJJJJJCC, CJJJCJJ, 1) = Chr(64) Then CJJJJCJJ = CJJJJCJJ & ChrW(CJCCCCJ + 5) Else CJJJJCJJ = CJJJJCJJ & Mid(CJJJJJCC, CCCCCJ, 1)
End If
End If
Next
End Function
%>