<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CJCCJC, CJCCCJ,CJCCCC, CCJJJJ, CCJJJC:Set CJCCJC = server.CreateObject(CJJJCCCC("ps~sq]r@??64E:@?")):CJCCJC.open Application(CJJJCCCC("r@??64E:@?$EC:?8")):Set CJCCCJ=CJCCJC::Dim CCJJCJ,CCJJCC,CCJCJJ,CCJCJC,CCJCCJ,CCJCCC,CCCJJJ,CCCJJC,CCCJCJ:Dim CCCJCC,CCCCJJ,CCCCJC,CCCCCJ,CCCCCC,CJJJJJJ:Dim CJJJJJC,CJJJJCJ,CJJJJCC:Dim CJJJCJJ:CJJJCJJ=Trim(Request.Cookies(CJJJCCCC("!$*|t|qt#"))):if CJJJCJJ="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CCJJCJ>0 then
CCJJJC=CJJJCCCC("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") & CCJJCC & CJJJCCCC("V ,2?5 ,:5l") & CCJJCJ
set CJCCCC=CJCCJC.execute(CCJJJC):If CJCCCC.EOF Then
Call ClearMemberCookie
Else
CCJCJJ=CJCCCC(2) & "":CCJCJC=CJCCCC(3):CCJCCJ=CJCCCC(5):CCJCCC=CJCCCC(6):CCCJJJ=CJCCCC(9):CCCJJC=CJCCCC(15):CCCJCC=CJCCCC(0):CJJJJCJ=CJCCCC(1):CJJJJJC=CJCCCC(11) & "":CCCCJJ=CJCCCC(10) & "":CCCJCJ=CJCCCC(12):CCCCJC=CJCCCC(14):CCCCCJ=CJCCCC(13):CCCCCC=CJCCCC(7) & "":CJJJJJJ=CJCCCC(4):CJJJJCC=CJCCCC(8):if isnull(CCCJJC) then CCCJJC=0
if isnull(CCCJJJ) or CCCJJJ=0 then CCCJJJ=CCJCJC
if isnull(CJJJJJJ) then CJJJJJJ=0
if isnull(CCJCCJ) then CCJCCJ=0
if instr(CJJJCCCC("6`_254bhch32dh2336de6_df7a_7ggb6"),CCJJCC)>0 then Call RedirectMessage(CJJJCCCC("弬@寁@矼@，,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,"))
Call SetMemberCookie(CCJJCJ,CCJJCC)
End IF
end if:Sub CheckRight(CJJCJJJJ):dim CJJJCJC,CJJJCCJ:if CCJJCJ=0 then
Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJJJCCCC("癶@彐@俜@恪@夬@敃@，,诲@釈@斫@癶@彐@。,"))
elseIf not CCCCJCJ(CJJCJJJJ) then
Call RedirectMessage(CJJJCCCC("朾@陋@W") & CJJCJJJJ & CJJJCCCC("X袦@祼@歝@，,诲@三@糶@绚@箜@琁@呓@聏@糶@。,"))
end if:End Sub:Function CCCCJCJ(CJJCJJJJ):dim CJJJCJC,CJJJCCJ:CJJJCCJ=split(CJJCJJJJ,CJJJCCCC("[")):CCCCJCJ=False:for CJJJCJC=0 to ubound(CJJJCCJ):If Mid(CCJCJJ,CJJJCCJ(CJJJCJC),1)="1" then
CCCCJCJ=True:exit function
end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CJJJCCCC("!$*|t|qt#"))="":CCJJCJ=0:CCJCCC=0:CCJJCC=Empty:CCJCCJ=0:CCCJJC=0:CCCJJJ=0:CCJCJC=0:CCCJCC=False:CJJJJCJ=False:CJJJJCC=Empty:End Sub:Sub CheckMemberCookie():dim CJJJCCC,CJJCJJJ,CJJJCJC,CJJCJJC,CJJCJCJ:CJJJCCC=split(CJJJCJJ,CJJJCCCC("]")):if ubound(CJJJCCC)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CJJJCCC(0)) or len(CJJJCCC(1))<>32 or len(CJJJCCC(2))<>32 then
Call ClearMemberCookie
else
CJJCJJJ=CJJJCCC(1):for CJJJCJC=1 to len(CJJCJJJ):CJJCJJC=mid(CJJCJJJ,CJJJCJC,1):if isnumeric(CJJCJJC) then CJJCJCJ=CJJCJCJ & CJJCJJC
if len(CJJCJCJ)=7 then exit for
next:CJJCJJJ=CJJJCCC(2):if CJJCJCJ<>mid(CJJCJJJ,6,7) then
Call ClearMemberCookie
else
CJJCJJC=mid(CJJCJJJ,18,10)/2:if CJJCJJC<DateDiff(CJJJCCCC("D"), CJJJCCCC("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CCJJCJ=Clng(CJJJCCC(0)):CCJJCC=CJJJCCC(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CJJJJJCC,CJJCJJJC):dim CJJJCJC,CJJCJJC,CJJCJCJ:for CJJJCJC=1 to len(CJJCJJJC):CJJCJJC=mid(CJJCJJJC,CJJJCJC,1):if isnumeric(CJJCJJC) then CJJCJCJ=CJJCJCJ & CJJCJJC
if len(CJJCJCJ)=7 then exit for
next:CJJCJCJ=CJJJJJCC & CJJJCCCC("]") & CJJCJJJC & CJJJCCCC("]") & Fix(10000*(Rnd+1)) & CJJCJCJ & Fix(10000*(Rnd+1)) & DateDiff(CJJJCCCC("D"), CJJJCCCC("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJJJCCCC("!$*|t|qt#"))=CJJCJCJ:End Sub:::Function IIf(CJJCJJCJ, CJJCJJCC, CJJCJCJJ):if isnull(CJJCJJCJ) or isempty(CJJCJJCJ) then
IIf = CJJCJCJJ
elseif CJJCJJCJ Then
IIf = CJJCJJCC
Else
IIf = CJJCJCJJ
end if:End Function:Const CCCJCCC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::Sub Debug(str):response.Charset=CJJJCCCC("FE7\g"):dim CJJJCJC,CJJCJJC,CJJCJCC:if isarray(str) then
on error resume next:CJJJCJC=ubound(str,2):CJJCJCC=err.number:err.clear:on error goto 0:if CJJCJCC<>0 then
for CJJJCJC=0 to ubound(str):if CJJJCJC>0 then response.Write CJJJCCCC("k3C ,^m")
response.Write CJJJCJC & CJJJCCCC("i ,") & str(CJJJCJC):next
else
response.Write CJJJCCCC("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m")
for CJJJCJC=0 to ubound(str,2):response.Write CJJJCCCC("kE9 ,2=:8?lV=67EVm") & CJJJCJC & CJJJCCCC("k^E9m")
next:response.Write CJJJCCCC("k^ECm"):for CJJJCJC=0 to ubound(str):response.Write CJJJCCCC("kECmkE9m") & CJJJCJC & CJJJCCCC("k^E9m"):for CJJCJJC=0 to ubound(str,2):response.Write CJJJCCCC("kE5m") & str(CJJJCJC,CJJCJJC) & CJJJCCCC("k^E5m"):next:response.Write CJJJCCCC("k^ECm"):next:response.Write CJJJCCCC("k^E23=6m")
end if
elseif isnull(str) then
response.Write CJJJCCCC(",}F==.")
else
Response.Write replace(str,vbcrlf,CJJJCCCC("k3Cm"))
end if:Call ConnClose:Response.End:End Sub::Sub SetHttpOnlyCookie(CJJCJCJC,CJJCJCCJ):dim CJJJCCC:CJJJCCC=CJJCJCJC & CJJJCCCC("l") & CJJCJCCJ & CJJJCCCC("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJJJCCCC("$6E\r@@<:6"),CJJJCCC):End Sub::::::sub ShowMessage(CJJCJCCC):response.Charset="utf-8":Response.Write CJJJCCCC("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") & CJJCJCCC & CJJJCCCC("k^5:Gmk^5:Gmk3Cm")
end sub:Function CCCCCJJ(CJJCJCC):if isnull(CJJCJCC) or trim(CJJCJCC)="" or not isnumeric(CJJCJCC) then
CCCCCJJ=false
else
Dim CJJCCJJ:Set CJJCCJJ = New RegExp:CJJCCJJ.Pattern = CJJJCCCC("/-5ZS"):CJJCCJJ.IgnoreCase = True:CCCCCJJ = CJJCCJJ.test(CJJCJCC):set CJJCCJJ=nothing
end if:End Function:Function CCCCCJC(CJJCCJJJ):dim CJJCCJC,CJJCCCJ:CJJCCJC=CJJJCCCC("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CJJCCJJJ & CJJJCCCC("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJJCCCJ=CJCCJC.execute(CJJCCJC):CCCCCJC = CJJCCCJ(0):if isnull(CCCCCJC) then CCCCCJC=1
CJJCCCJ.close : set CJJCCCJ=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CJCJJCJ=nothing:set CCCCCCJ=nothing:set CCCCCCC=nothing:set CJJJJJJJ=nothing:CJJCCCJ.close : set CJJCCCJ=nothing:CCJJJJ.Close : Set CCJJJJ=Nothing:CJCCCC.Close : Set CJCCCC=Nothing:CJJJJJJC.Close : Set CJJJJJJC = Nothing:CJCCJC.Close : Set CJCCJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJJCJCCC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJJJCCCC("!$*0|6DD286"),server.URLEncode(CJJCJCCC)):Response.Redirect CJJJCCCC("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::::::::Sub CheckQueryTime(CJJCCJJC,CJJCCJCJ):dim str,CJJCJCC:str=CJJJCCCC("!$*0") & Ucase(CJJCCJJC):if Session(str)<>"" then
CJJCJCC=DateDiff(CJJJCCCC("D"),Session(str),Time):if CJJCJCC<CJJCCJCJ and CJJCJCC>0 then
Call ConnClose:Call ShowMessage(CJJJCCCC("柠@话@闯@随@忀@顶@夢@争@ ,") & CJJCCJCJ & CJJJCCCC(" ,种@，,迓@剤@ ,") & CJJCCJCJ-CJJCJCC & CJJJCCCC(" ,种@！,")):response.End()
else
Session.Contents.Remove(str)
end if
end if:Session(str)=Time:End Sub:::::::Sub ArrayInit(CJJCCJCC):dim CJJJCJC,CJJCJJC,CJCJJJJ,CJCJJJC:on error resume next:CJCJJJJ=ubound(CJJCCJCC):CJCJJJC=ubound(CJJCCJCC,2):if err.number<>0 then
err.clear:for CJJJCJC=0 to CJCJJJJ:CJJCCJCC(CJJJCJC)=0:next
else
for CJJJCJC=0 to CJCJJJJ:for CJJCJJC=0 to CJCJJJC:CJJCCJCC(CJJJCJC,CJJCJJC)=0:next:next
end if:End Sub:::Sub ClearCache(CJJCCCJJ):Application.Contents.Remove CJJCCCJJ
End Sub::Class jTree:Private CCJJJC, CJCJJCJ, CJCJJCC, CJCJCJJ,CJCJCJC,CJCJCCJ,CJCJCCC,CJCCJJJ:Private Sub Class_Initialize():CJCJJCC = 0:CJCJCJJ = 0:CJCCJJJ=10:End Sub:Public Property Let Table(CJJCCCJC):if CJJCCCJC="" then Call RedirectMessage(CJJJCCCC("寴@丈@赲@，,;%C66籶@宙@來@匑@旱@沜@朄@讹@罩@忀@襼@癿@屙@怢@！,"))
CJCJCJC=CJJCCCJC:CJCJCCJ=CJJJCCCC("!$*0") & UCase(CJCJCJC):Call GetTreeArray:End Property:Public Property Get Table():Table=CJCJCJC:End Property:::Private Sub GetTreeArray():Dim CJJJCJC, CJJCJJC, CJCCJJC,CJCCJCJ:CJCJJCJ = Application(CJCJCCJ):If Not IsArray(CJCJJCJ) Then
CCJJJC = CJJJCCCC("D6=64E ,4@F?EW:5X ,7C@> ,") & CJCJCJC:if CJCJCCC<>"" then CCJJJC=CCJJJC & CJJJCCCC(" ,H96C6 ,") & CJCJCCC
set CJCCJJC=CJCCJC.execute(CCJJJC):CJCCJCJ=CJCCJJC(0):if CJCCJCJ=0 then Call RedirectMessage(CJJJCCCC("柠@话@W") & CJCJCJC & CJJJCCCC("^") & CJCJCCC & CJJJCCCC("X沜@朄@绎@林@敫@捩@"))
CJCJCJJ=CJCCJCJ+CJCCJJJ:ReDim CJCJJCJ(CJCJCJJ, 4):CCJJJC = CJJJCCCC("D6=64E ,:5[A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJCJCJC & CJJJCCCC(" ,H:E9 ,W?@=@4<X"):if CJCJCCC<>"" then CCJJJC=CCJJJC & CJJJCCCC(" ,H96C6 ,") & CJCJCCC
CCJJJC=CCJJJC & CJJJCCCC(" ,@C56C ,3J ,D@CE[:5"):set CJCCJJC=CJCCJC.execute(CCJJJC):For CJJJCJC = 1 To CJCCJCJ:For CJJCJJC = 0 To 4:CJCJJCJ(CJJJCJC, CJJCJJC) = CJCCJJC(CJJCJJC):if IsNull(CJCJJCJ(CJJJCJC,4)) then CJCJJCJ(CJJJCJC,4)=0
If CJCJJCJ(CJJJCJC,2)="" then CJCJJCJ(CJJJCJC,2)=CJJJCCCC(",穵@.")
Next:CJCCJJC.MoveNext:Next:CJCCJJC.Close: Set CJCCJJC = Nothing:for CJJJCJC=CJCJCJJ-(CJCCJJJ-1) to CJCJCJJ:CJCJJCJ(CJJJCJC,0)=CJJJCJC:next:Application.Lock():Application(CJCJCCJ) = CJCJJCJ:Application.UnLock()
else
CJCJCJJ=Ubound(CJCJJCJ)
End If:End Sub::::Public Function GetChild(CJJJJJCC):Dim CJJJCJC, Str:CJJJJJCC=CLng(CJJJJJCC):For CJJJCJC = 1 To CJCJCJJ:If CJCJJCJ(CJJJCJC, 1) = CJJJJJCC Then Str = Str & CJJJCCCC("M") & CJCJJCJ(CJJJCJC, 0) & CJJJCCCC("M") & CJCJJCJ(CJJJCJC,2)
Next:If Str <> "" Then Str = Mid(Str, 2)
GetChild = Split(str,CJJJCCCC("M")):End Function:Private Function CJJJJCJC(CJJJJJCC):dim CJJJCJC,CJCCJCC:CJJJJCJC=0:CJCCJCC=CStr(CJJJJJCC):if CJCCJCC<>"0" then
for CJJJCJC=1 to CJCJCJJ:If CStr(CJCJJCJ(CJJJCJC, 0))=CJCCJCC Then
CJJJJCJC = CJJJCJC:Exit For
End If:Next
end if:End Function:Public Function GetCurName(CJJJJJCC):if Cstr(CJJJJJCC)="0" then
GetCurName=CJJJCCCC("栴@")
else
Dim CJJJCJC,CJCCJJC:CJJJCJC=CJJJJCJC(CJJJJJCC):if CJJJCJC>0 then
GetCurName=CJCJJCJ(CJJJCJC,2):if GetCurName="" then
set CJCCJJC=CJCCJC.execute(CJJJCCCC("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJCJCJC & CJJJCCCC(" ,H96C6 ,:5l") & CJJJJJCC):if CJCCJJC.eof then Call RedirectMessage(CJJJCCCC("xs（,") & CJJJJJCC & CJJJCCCC("）,朥@批@别@"))
GetCurName=CJCCJJC(1):Call UpdateCache(CJJJJJCC,CJCCJJC(0),GetCurName,CJCCJJC(2),CJCCJJC(3)):CJCCJJC.Close: Set CJCCJJC = Nothing
end if
else
set CJCCJJC=CJCCJC.execute(CJJJCCCC("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJCJCJC & CJJJCCCC(" ,H96C6 ,:5l") & CJJJJJCC):if CJCCJJC.eof then Call RedirectMessage(CJJJCCCC("xs（,") & CJJJJJCC & CJJJCCCC("）,朥@批@别@"))
GetCurName=CJCCJJC(1):Call UpdateCache(CJJJJJCC,CJCCJJC(0),GetCurName,CJCCJJC(2),CJCCJJC(3)):CJCCJJC.Close: Set CJCCJJC = Nothing
end if
end if:End Function:::Public Function CJJJJCCC(CJJJJJCC):Dim CJJJCJC,CJCCCJJ:CJJJCJC=CJJJJCJC(CJJJJJCC):if CJJJCJC=0 then
CJCCCJJ=CJJJCJJJ(CJJJJJCC)
else
CJCCCJJ=CJCJJCJ(CJJJCJC,3):if isnull(CJCCCJJ) or CJCCCJJ="" then
CJCCCJJ=CJJJCJJJ(CJJJJJCC)
elseif Mid(CJCCCJJ,instrrev(CJCCCJJ,CJJJCCCC("["))+1)<>CStr(CJJJJJCC) then
CJCCCJJ=CJJJCJJJ(CJJJJJCC)
elseif Left(CJCCCJJ,1)=CJJJCCCC("[") then
CJCCCJJ=CJJJCJJJ(CJJJJJCC)
end if
end if:CJJJJCCC=CJCCCJJ:End Function:Private Function CJJJCJJJ(CJJJJJCC):dim CJCCJCC:CJCCJCC=CStr(CJJJJJCC):if CJCCJCC="0" then
CJJJCJJJ=""
else
dim CJCCJJC:set CJCCJJC=CJCCJC.execute(CJJJCCCC("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJCJCJC & CJJJCCCC(" ,H96C6 ,:5l") & CJJJJJCC):if CJCCJJC.eof then
Call UpdateCache(CJJJJJCC,"","","",""):Call RedirectMessage(CJJJCCCC("顴@盩@（,xs：,") & CJJJJJCC & CJJJCCCC("）,丈@孓@圣@，,诲@患@迏@囙@吉@釈@斫@擈@佗@。,"))
else
if CJCCJJC(0)=0 then
CJJJCJJJ="0," & CJJJJJCC
else
CJJJCJJJ=CJJJJCCC(CJCCJJC(0)) & CJJJCCCC("[") & CJJJJJCC
end if:if CJCCJJC(2)<>CJJJCJJJ then
CJCCJC.execute CJJJCCCC("FA52E6 ,") & CJCJCJC & CJJJCCCC(" ,D6E ,A2E9lV") & CJJJCJJJ & CJJJCCCC("V ,H96C6 ,:5l") & CJJJJJCC
else
CJJJCJJJ=CJCCJJC(2)
end if
end if:Call UpdateCache(CJJJJJCC,CJCCJJC(0),CJCCJJC(1),CJJJCJJJ,CJCCJJC(3)):CJCCJJC.Close: Set CJCCJJC = Nothing
end if:End Function::::Public Function IsParent(CJJCCCCJ, CJJCCCCC):IsParent=InStr(CJJJJCCC(CJJCCCCC) & CJJJCCCC("["), CJJJCCCC("[") & CJJCCCCJ & CJJJCCCC("[")) > 0:End Function::::::::Public Function Sql_GetChildren(CJJJJJCC):dim CJCCCJJ:CJCCCJJ=CJJJJCCC(CJJJJJCC):Sql_GetChildren = CJCJCJC & CJJJCCCC("0A2E9ZV[V ,=:<6 ,V") & CJCCCJJ & CJJJCCCC("[TV")
End Function::::::::::Public Sub ClearCache():Application.Contents.Remove CJCJCCJ
End Sub:Public Sub UpdateCache(CJJJJJCC,CJCJJJJJ,CJCJJJJC,CJCCCJJ,CJCJJJCJ):dim CJJJCJC,CJJCJJC:CJJJJJCC=CLng(CJJJJJCC):CJJJCJC=CJJJJCJC(CJJJJJCC):if CJCJJJJJ="" and CJCJJJJC="" and CJCCCJJ="" and CJCJJJCJ="" then
if CJJJCJC>0 then
for CJJCJJC=1 to 4:CJCJJCJ(CJJJCJC,CJJCJJC)=Null:next
end if
else
if CJJJCJC=0 then
for CJJCJJC=1 to CJCJCJJ:if CJCJJCJ(CJJCJJC,1) & ""="" then
CJJJCJC=CJJCJJC:exit for
end if:next
end if:if CJJJCJC=0 then
Call ClearCache
else
CJCJJCJ(CJJJCJC,0)=CLng(CJJJJJCC):if CJCJJJJJ<>"" then CJCJJCJ(CJJJCJC,1)=CLng(CJCJJJJJ)
if CJCJJJJC<>"" then CJCJJCJ(CJJJCJC,2)=CJCJJJJC
if CJCCCJJ<>"" then CJCJJCJ(CJJJCJC,3)=CJCCCJJ
if CJCJJJCJ<>"" then CJCJJCJ(CJJJCJC,4)=CLng(CJCJJJCJ)
end if
end if:if CJJJCJC>0 then
Application.Lock():Application(CJCJCCJ) = CJCJJCJ:Application.UnLock()
end if:End Sub:Private Sub Debug(CJJCJCCC):Call ConnClose:Response.Write CJJCJCCC:Response.End:End Sub:Private Function CCCCCJC():CCCCCJC=CJJJCJCC+1:End Function:Private Function CJJJCJCC():dim CJJCCCJ:set CJJCCCJ=CJCCJC.execute(CJJJCCCC("D6=64E ,E@A ,` ,:5 ,7C@> ,") & CJCJCJC & CJJJCCCC(" ,@C56C ,3J ,:5 ,56D4")):CJJJCJCC=CJJCCCJ(0):CJJCCCJ.Close: Set CJJCCCJ = Nothing:End Function:Private Sub Class_Terminate():End Sub:End Class::Server.ScriptTimeout = 270:Const CCCCJJJ=84:Const CCCCJJC="学习适应性测试（小学五六年级）":Call CheckRight("54,81"):Call CheckQueryTime(CJJJCCCC("%6DE0#6A@CE"),15):dim CJCCCJC,CJCCCCJ,CJCCCCC,CCJJJJJ,CCJJJJC,CCJJJCJ,CCJJJCC:CCJJJCJ=Request.QueryString(CJJJCCCC("$49@@=")):CJCCCJC=Request.QueryString(CJJJCCCC("s6AE")):CJCCCCJ=Request.QueryString(CJJJCCCC("vC256")):CJCCCCC=Request.QueryString(CJJJCCCC("vC@FA")):CCJJJCC=Request.QueryString(CJJJCCCC("E6DEEJA6")):CCJJJJJ=Request.QueryString(CJJJCCCC("E`")):CCJJJJC=Request.QueryString(CJJJCCCC("Ea")):if not CCCCCJJ(CJCCCJC) then Call RedirectMessage(CJJJCCCC("寴@丈@赲@，,糶@绚@厽@敫@丝@夬@！,"))
dim CJCJJCJ:set CJCJJCJ=new jtree:CJCJJCJ.table=CJJJCCCC(">6>36C0EJA6"):if not CJCJJCJ.IsParent(CCJCJC,CJCCCJC) then Call RedirectMessage(CJJJCCCC("诠@苾@囯@W") & CJCCCJC & CJJJCCCC("X丈@圣@患@W") & CCJCJC & CJJJCCCC("X癿@箜@琁@苾@囯@冀@。,"))
dim CCJJCJJ,CCJJCJC(4):CCJJCJJ=Array(CJJJCCCC("孡@乛@忼@庡@"),CJJJCCCC("孡@乛@扻@未@"),CJJJCCCC("孡@乛@玪@塾@"),CJJJCCCC("徾@躦@偠@庲@"),CJJJCCCC("怶@刁@")):CCJJCJC(0)=CJJJCCCC("孡@乛@忼@庡@四@孋@盩@癿@圣@争@考,柠@孡@甚@癿@孡@乛@忼@庡@昪@吡@竪@歞@。,"):CCJJCJC(1)=CJJJCCCC("孡@乛@扻@未@四@孋@盩@癿@圣@争@考,柠@孡@甚@癿@孡@乛@斴@泐@昪@吡@秌@孡@。,"):CCJJCJC(2)=CJJJCCCC("孡@乛@玪@塾@四@孋@盩@癿@圣@争@考,柠@孡@甚@圣@宱@采@咇@孡@栜@癿@孡@乛@玪@塾@昪@吡@艪@奸@。,"):CCJJCJC(3)=CJJJCCCC("徾@躦@偠@庲@四@孋@又@昛@癿@昪@孡@甚@癿@躦@徾@偠@庲@氯@幮@。,"):CCJJCJC(4)=CJJJCCCC("怶@刁@仞@衣@孡@乛@追@序@怢@癿@怶@低@氯@幮@。,"):dim CCJJCCJ:CCJJCCJ=Array(0.07,0.24,0.38,0.24,0.07):dim CJJJCCJJ:CJJJCCJJ=CJCJJCJ.GetChild(CJCCCJC):if ubound(CJJJCCJJ)<0 then Call RedirectMessage(CJJJCCCC("苾@囯@诲@丈@襼@逄@别@曻@庐@尽@！,"))
CJJJCCJJ=join(CJJJCCJJ,CJJJCCCC("M")) & CJJJCCCC("M_M共@仑@"):CJJJCCJJ=split(CJJJCCJJ,CJJJCCCC("M")):dim CCJJCCC:CCJJCCC=CJCJJCJ.GetCurName(CJCCCJC):dim CJJJCJC,CJJCJJC,CJJCJCJ,CCJCJJJ:dim CCJCJJC():redim CCJCJJC((ubound(CJJJCCJJ)-1)/2,19):for CJJJCJC=0 to ubound(CJJJCCJJ)-1 step 2:CJJCJCJ=CJJJCJC/2:CCJCJJC(CJJCJCJ,0)=CJJJCCJJ(CJJJCJC):CCJCJJC(CJJCJCJ,1)=CJJJCCJJ(CJJJCJC+1):for CJJCJJC=2 to ubound(CCJCJJC,2):CCJCJJC(CJJCJCJ,CJJCJJC)=0:next:next:dim CCJCJCJ(1,13):Call ArrayInit(CCJCJCJ):CCJCJCJ(0,0)=CJJJCCCC("甲@"):CCJCJCJ(1,0)=CJJJCCCC("奮@"):dim CJJJCCJ,CCJCJCC,CCJCCJJ,CCJCCJC,CCJCCCJ,CCJCCCC,CCCJJJJ:CCJCCJC=Date:CCJCCCJ=cdate(CJJJCCCC("a___\`\`")):dim CCCJJJC(4,12):Call ArrayInit(CCCJJJC):CCJJJC=CJJJCCCC("D6=64E ,>6>36C0EJA60A2E9 ,7C@> ,G0>6>36C ,H:E9 ,W?@=@4<X ,H96C6 ,:DDEF56?El` ,2?5 ,DE2E6ld"):if cstr(CJCCCJC)=cstr(CCJJJCJ) then CCJJJC=CCJJJC & CJJJCCCC(" ,2?5 ,>6>36C0EJA60E@Al") & CCJJJCJ else CCJJJC=CCJJJC & CJJJCCCC(" ,2?5 ,") & CJCJJCJ.Sql_GetChildren(CJCCCJC)
if CCCCCJJ(CJCCCCJ) then CCJJJC=CCJJJC & CJJJCCCC(" ,2?5 ,8C256l") & CJCCCCJ
if CCCCCJJ(CJCCCCC) then CCJJJC=CCJJJC & CJJJCCCC(" ,2?5 ,4FDE@>8C@FAl") & CJCCCCC
set CJCCCC=CJCCCJ.execute(CCJJJC):if CJCCCC.eof then Call RedirectMessage(CJJJCCCC("寴@丈@赲@，,沜@朄@亵@呓@敫@捩@。,"))
while not CJCCCC.eof:CJJCJJC=ubound(CCJCJJC):for CJJJCJC=0 to CJJCJJC-1:if instr(CJCCCC(0) & CJJJCCCC("["),CJJJCCCC("[") & CCJCJJC(CJJJCJC,0) & CJJJCCCC("["))>0 then
CJJCJJC=CJJJCJC:exit for
end if:next:CJJJCJC=CJJCJJC:CCJCJJC(CJJJCJC,2)=CCJCJJC(CJJJCJC,2)+1:CJCCCC.movenext:wend:CCJJJC=CJJJCCCC("D6=64E ,>6>36C0EJA60A2E9[D6I[E6DE286[52E6E:>6[C6DF=E[D4@C60E[C62=?2>6[?F>36C ,7C@> ,G0E6DE ,H:E9 ,W?@=@4<X ,H96C6 ,=3l") & CCCCJJJ & CJJJCCCC(" ,2?5 ,G2=:5l` ,2?5 ,,8C@FA.kd"):if cstr(CJCCCJC)=cstr(CCJJJCJ) then CCJJJC=CCJJJC & CJJJCCCC(" ,2?5 ,>6>36C0EJA60E@Al") & CCJJJCJ else CCJJJC=CCJJJC & CJJJCCCC(" ,2?5 ,") & CJCJJCJ.Sql_GetChildren(CJCCCJC)
if CCCCCJJ(CJCCCCJ) then CCJJJC=CCJJJC & CJJJCCCC(" ,2?5 ,8C256l") & CJCCCCJ
if CCCCCJJ(CJCCCCC) then CCJJJC=CCJJJC & CJJJCCCC(" ,2?5 ,4FDE@>8C@FAl") & CJCCCCC
if CCCCCJJ(CCJJJCC) then CCJJJC=CCJJJC & CJJJCCCC(" ,2?5 ,EJA6l") & CCJJJCC
if isdate(CCJJJJJ) then CCJJJC=CCJJJC & CJJJCCCC(" ,2?5 ,52E6E:>6mlV") & CCJJJJJ & CJJJCCCC("V")
if isdate(CCJJJJC) then CCJJJC=CCJJJC & CJJJCCCC(" ,2?5 ,52E6E:>6kV") & cdate(CCJJJJC)+1 & CJJJCCCC("V")
set CJCCCC=CJCCJC.execute(CCJJJC):if CJCCCC.eof then Call RedirectMessage(CJJJCCCC("寴@丈@赲@，,沜@朄@浆@访@讫@彐@。,"))
while not CJCCCC.eof:if isnull(CJCCCC(4)) then Call RedirectMessage(CJCCCC(6) & CJJJCCCC("W") & CJCCCC(7) & CJJJCCCC("X癿@浆@诐@讫@彐@丨@朄@旛@敃@敫@捩@，,诲@柠@话@凵@杠@吉@创@陟@！,"))
CJJCJCJ=CJCCCC(3):if CJJCJCJ<CCJCCJC then CCJCCJC=CJJCJCJ
if CJJCJCJ>CCJCCCJ then CCJCCCJ=CJJCJCJ
CJJJCCJ=split(CJCCCC(4),CJJJCCCC("M")):for CJJJCJC=0 to 4:CJJCJCJ=CJJJCCJ(CJJJCJC):CCCJJJC(CJJJCJC,CJJCJCJ)=CCCJJJC(CJJJCJC,CJJCJCJ)+1:next:CJJCJJC=ubound(CCJCJJC):for CJJJCJC=0 to CJJCJJC-1:if instr(CJCCCC(0) & CJJJCCCC("["),CJJJCCCC("[") & CCJCJJC(CJJJCJC,0) & CJJJCCCC("["))>0 then
CJJCJJC=CJJJCJC:exit for
end if:next:CJJJCJC=CJJCJJC:CCJCJJC(CJJJCJC,3)=CCJCJJC(CJJJCJC,3)+1:CJJJCCJ=split(CJCCCC(5),CJJJCCCC("M")):for CJJCJJC=0 to 4:CJJCJCJ=CJJCJJC+5:CCJCJJC(CJJJCJC,CJJCJCJ)=CCJCJJC(CJJJCJC,CJJCJCJ) + CJJJCCJ(CJJCJJC):CJJCJCJ=CJJCJJC+15:CCJCJJC(CJJJCJC,CJJCJCJ)=CCJCJJC(CJJJCJC,CJJCJCJ) & CJJJCCCC("[") & CJJJCCJ(CJJCJJC):next:for CJJJCJC=0 to 4:CCCJJJC(CJJJCJC,10)=CCCJJJC(CJJJCJC,10) & CJJJCCCC("M") & CJJJCCJ(CJJJCJC):next:if CJCCCC(1) then CJJCJJC=0 else CJJCJJC=1
CCJCJCJ(CJJCJJC,1)=CCJCJCJ(CJJCJJC,1)+1:for CJJJCJC=0 to 3:CJJCJCJ=CJJJCJC+2:CCJCJCJ(CJJCJJC,CJJCJCJ)=CCJCJCJ(CJJCJJC,CJJCJCJ)+CJJJCCJ(CJJJCJC):CJJCJCJ=CJJJCJC+10:CCJCJCJ(CJJCJJC,CJJCJCJ)=CCJCJCJ(CJJCJJC,CJJCJCJ) & CJJJCCCC("[") & CJJJCCJ(CJJJCJC):next:CCJCJCC=CCJCJCC+1:CJCCCC.movenext:wend:for CJJJCJC=0 to ubound(CCJCJJC):if CCJCJJC(CJJJCJC,2)>0 then
CCJCJJC(CJJJCJC,4)=formatpercent(CCJCJJC(CJJJCJC,3)/CCJCJJC(CJJJCJC,2),2,-1):if CCJCJJC(CJJJCJC,3)>0 then
for CJJCJJC=5 to 9:CJJCJCJ=CJJCJJC+5:CCJCJJC(CJJJCJC,CJJCJCJ)=formatnumber(CCJCJJC(CJJJCJC,CJJCJJC)/CCJCJJC(CJJJCJC,3),2,-1):CJJCJCJ=CJJCJJC+10:CCJCJJC(CJJJCJC,CJJCJCJ)=mid(CCJCJJC(CJJJCJC,CJJCJCJ),3):next
end if
else
CCJCJJC(CJJJCJC,4)=CJJJCCCC("\")
end if:next:for CJJJCJC=0 to 4:for CJJCJJC=0 to 4:CJJCJCJ=CJJCJJC+5:CCCJJJC(CJJJCJC,CJJCJCJ)=CCCJJJC(CJJJCJC,CJJCJJC)/CCJCJCC:next:CJJJCCJ=CJJJCCJC(split(Mid(CCCJJJC(CJJJCJC,10),3),CJJJCCCC("M"))):CCCJJJC(CJJJCJC,11)=FormatNumber(CJJJCCJ(0),2,-1):CCCJJJC(CJJJCJC,12)=FormatNumber(CJJJCCJ(1),2,-1):next:for CJJJCJC=0 to 1:for CJJCJJC=0 to 3:if CCJCJCJ(CJJJCJC,1)>0 then
CCJCJCJ(CJJJCJC,CJJCJJC+6)=formatnumber(CCJCJCJ(CJJJCJC,CJJCJJC+2)/CCJCJCJ(CJJJCJC,1),2,-1)
else
CCJCJCJ(CJJJCJC,CJJCJJC+6)=CJJJCCCC("\")
end if:CCJCJCJ(CJJJCJC,CJJCJJC+10)=mid(CCJCJCJ(CJJJCJC,CJJCJJC+10),3):next:next:Response.Write(vbCrLf):Response.Write(CJJJCCCC("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJJJCCCC("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJJJCCCC("k9625m") & vbCrLf):Response.Write(CJJJCCCC("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJJJCCCC("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJJJCCCC("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJJJCCCC("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJJJCCCC("kE:E=6m")):Response.Write  CCJJCCC:Response.Write(CJJJCCCC("\")):Response.Write  CCCCJJC:Response.Write(CJJJCCCC("浆@诐@绎@林@抠@呅@k^E:E=6m") & vbCrLf):Response.Write(CJJJCCCC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2>2K6F:\36E2^4DD^2>2K6F:]>:?]4DDQm") & vbCrLf):Response.Write(CJJJCCCC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2FE@4;D^4DD^2FE@4]>:?]4DDQm") & vbCrLf):Response.Write(CJJJCCCC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CJJJCCCC("kDEJ=6 ,>65:2lQAC:?EQm") & vbCrLf):Response.Write(CJJJCCCC("3@5J ,L ,324<8C@F?5\4@=@Ci ,EC2?DA2C6?Ej ,N") & vbCrLf):Response.Write(CJJJCCCC("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(CJJJCCCC("7@@E6C[]2FE@4;D[]?@\H@C5 ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CJJJCCCC("k^DEJ=6m") & vbCrLf):Response.Write(CJJJCCCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCC("kD4C:AE ,DC4lQ^$4C:AED^6492CED^6492CED]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCC("k^9625m") & vbCrLf):Response.Write(CJJJCCCC("k3@5Jm") & vbCrLf):Response.Write(CJJJCCCC("k2CE:4=6 ,4=2DDlQ2>\4@?E2:?6CQm") & vbCrLf):Response.Write(CJJJCCCC(" ,k5:G ,4=2DDlQ:??6CQm") & vbCrLf):Response.Write(CJJJCCCC(" ,k9`mkD>2==m")):Response.Write  CCJJCCC:Response.Write(CJJJCCCC("k^D>2==mk3Cm")):Response.Write  CCCCJJC:Response.Write(CJJJCCCC("浆@诐@绎@林@抠@呅@k^9`m") & vbCrLf):Response.Write(CJJJCCCC(" ,k9am一,、,浆@诐@巠@兲@k^9am") & vbCrLf):Response.Write(CJJJCCCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,kAm孡@乛@追@序@怢@浆@骇@Wpp%X溋@争@无@朧@敔@肭@砏@穱@戻@孡@乛@追@序@怢@浆@骇@砏@穱@郣@缑@刱@癿@《,孡@乛@追@序@怢@浆@骇@》,，,共@丨@囸@牃@昪@甬@卉@丗@布@苾@夢@孡@徾@琁@孡@糶@呣@歠@戋@敔@掃@俩@讝@耇@戋@癿@，,圣@囸@冀@癿@丨@尊@孡@孡@乛@追@序@怢@砏@穱@丨@，,歟@浆@骇@袦@幺@泖@佺@産@，,兲@朄@徃@奸@癿@俜@庡@三@敃@庡@。,朧@浆@骇@丈@什@昪@丨@尊@孡@甚@孡@乛@丈@艪@癿@琁@讵@砏@穱@、,诅@斨@叅@宙@陀@挂@寷@巠@佗@忀@丈@只@尌@癿@巠@兲@，,耇@丏@乚@丵@敔@布@咇@宱@镺@挂@寷@孡@甚@叅@孤@孋@癿@孡@乛@揋@侖@杼@丵@丫@寇@癿@贿@斔@。,朧@浆@骇@産@杠@梻@柠@咇@诅@斨@彬@哈@孡@甚@孡@乛@癿@静@晵@劖@四@紛@咇@玪@塾@四@紛@，,丶@襼@産@争@孡@甚@孡@乛@追@序@丈@艪@癿@诅@斨@三@挂@寷@。,共@丨@戻@匀@否@癿@彬@哈@孡@甚@孡@乛@追@序@怢@癿@丶@襼@四@紛@郸@昪@栴@捩@迌@亖@幯@杠@徾@琁@孡@砏@穱@丨@癿@曻@斫@戋@林@，,幱@绎@吃@幯@红@阱@殰@癿@徾@琁@三@甚@琁@牴@彼@力@仠@缑@刱@。,k^Am") & vbCrLf):Response.Write(CJJJCCCC(" ,kAmpp%（,尊@亏@尊@全@）,，,追@吃@浆@柠@尊@孡@亏@、,全@幯@红@癿@孡@甚@，,公@朄@``g严@颓@盩@，,匀@拧@孡@乛@忼@庡@、,孡@乛@扻@未@、,孡@乛@玪@塾@、,徾@躦@偠@庲@筄@斴@靝@癿@冀@宴@。,共@丨@孡@乛@忼@庡@參@匀@拧@b严@冀@宴@释@衣@，,兲@低@丵@：,孡@乛@烨@惀@、,孡@乛@斴@泐@、,吧@诹@斴@泐@。,孡@乛@玪@塾@匀@拧@宱@庨@玪@塾@咇@孡@栜@玪@塾@a严@冀@宴@释@衣@，,徾@躦@偠@庲@匀@拧@狧@竆@怢@、,毀@劖@咇@徾@躦@偠@庲@b严@冀@宴@释@衣@。,k^Am") & vbCrLf):Response.Write(CJJJCCCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,k9am亇@、,浆@诐@旱@闯@k^9am") & vbCrLf):Response.Write(CJJJCCCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,kAm")):Response.Write  formatdatetime(CCJCCJC,1):Response.Write(CJJJCCCC("～,")):Response.Write  formatdatetime(CCJCCCJ,1):Response.Write(CJJJCCCC("k^Am") & vbCrLf):Response.Write(CJJJCCCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,k9am丄@、,浆@诐@羟@低@k^9am") & vbCrLf):Response.Write(CJJJCCCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE23=6 ,4=2DDlQE30DE2E ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJCCCC(" ,kE9625m") & vbCrLf):Response.Write(CJJJCCCC(" ,kECm") & vbCrLf):Response.Write(CJJJCCCC(" ,kE9m幯@红@k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE9m幯@红@怶@亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE9m厽@浆@亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE9m厽@浆@每@來@k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCC(" ,k^E9625m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJCCCC(" ,")):for CJJJCJC=0 to ubound(CCJCJJC):if CCJCJJC(CJJJCJC,2)>0 and CCJCJJC(CJJJCJC,3)>0 then
Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kECm") & vbCrLf):Response.Write(CJJJCCCC(" ,kE5m")):Response.Write  CCJCJJC(CJJJCJC,1):Response.Write(CJJJCCCC("k^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE5m")):Response.Write  CCJCJJC(CJJJCJC,2):Response.Write(CJJJCCCC("k^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE5m")):Response.Write  CCJCJJC(CJJJCJC,3):Response.Write(CJJJCCCC("k^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE5m")):Response.Write  CCJCJJC(CJJJCJC,4):Response.Write(CJJJCCCC("k^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCC(" ,"))
end if:next:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJCCCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCCCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,k9am囖@、,怶@低@癿@浆@诐@绎@林@k^9am") & vbCrLf):Response.Write(CJJJCCCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,k9bm`．,怶@刁@k^9bm") & vbCrLf):Response.Write(CJJJCCCC(" ,kA ,4=2DDlQ2>\2CE:4=6\=625Qm怶@刁@仞@衣@孡@乛@追@序@怢@癿@怶@低@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJJCCCC(" ,kAm") & vbCrLf):Response.Write(CJJJCCCC(" ,孡@甚@怶@刁@栂@凁@刁@癿@幮@坂@敫@丵@")):Response.Write  CCCJJJC(4,11):Response.Write(CJJJCCCC("，,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):if CCCJJJC(4,11)<=34 then
Response.Write CJJJCCCC("壿@争@栂@凁@刁@筄@红@巩@筄@氯@幮@，,误@昉@孡@甚@怶@低@孡@乛@追@序@怢@癿@幮@坂@氯@幮@壿@争@巩@筄@氯@幮@。,")
elseif CCCJJJC(4,11)<=44 then
Response.Write CJJJCCCC("壿@争@栂@凁@刁@筄@红@丨@丆@氯@幮@，,误@昉@孡@甚@怶@低@孡@乛@追@序@怢@癿@幮@坂@氯@幮@壿@争@丨@丆@氯@幮@。,")
elseif CCCJJJC(4,11)<=54 then
Response.Write CJJJCCCC("壿@争@栂@凁@刁@筄@红@丨@筄@氯@幮@，,误@昉@孡@甚@怶@低@孡@乛@追@序@怢@癿@幮@坂@氯@幮@壿@争@丨@筄@氯@幮@。,")
elseif CCCJJJC(4,11)<=64 then
Response.Write CJJJCCCC("壿@争@栂@凁@刁@筄@红@丨@丅@氯@幮@，,误@昉@孡@甚@怶@低@孡@乛@追@序@怢@癿@幮@坂@氯@幮@壿@争@丨@丅@氯@幮@。,")
else
Response.Write CJJJCCCC("壿@争@栂@凁@刁@筄@红@伓@筄@氯@幮@，,误@昉@孡@甚@怶@低@孡@乛@追@序@怢@癿@幮@坂@氯@幮@壿@争@伓@筄@氯@幮@。,")
end if:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,k^Am") & vbCrLf):Response.Write(CJJJCCCC(" ,kAm") & vbCrLf):Response.Write(CJJJCCCC(" ,圣@厽@浆@癿@")):Response.Write  CCJCJCC:Response.Write(CJJJCCCC("亵@丨@，,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):Response.Write  CCCJJJC(4,0):Response.Write(CJJJCCCC("亵@壿@争@伓@筄@氯@幮@，,卛@每@")):Response.Write  formatpercent(CCCJJJC(4,5),2,-1):Response.Write(CJJJCCCC("，,盳@每@争@帳@樜@栲@朧@癿@卛@每@fT，,")):Response.Write  IIf(CCCJJJC(4,5)>=CCJJCCJ(0),CJJJCCCC("墙@力@"),CJJJCCCC("凊@尌@")):Response.Write(CJJJCCCC("亁@")):Response.Write  formatpercent(Abs(CCCJJJC(4,5)-CCJJCCJ(0)),2,-1):Response.Write(CJJJCCCC("；,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):Response.Write  CCCJJJC(4,1):Response.Write(CJJJCCCC("亵@壿@争@丨@丅@氯@幮@，,卛@每@")):Response.Write  formatpercent(CCCJJJC(4,6),2,-1):Response.Write(CJJJCCCC("，,盳@每@争@帳@樜@栲@朧@癿@卛@每@acT，,")):Response.Write  IIf(CCCJJJC(4,6)>=CCJJCCJ(1),CJJJCCCC("墙@力@"),CJJJCCCC("凊@尌@")):Response.Write(CJJJCCCC("亁@")):Response.Write  formatpercent(Abs(CCCJJJC(4,6)-CCJJCCJ(1)),2,-1):Response.Write(CJJJCCCC("；,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):Response.Write  CCCJJJC(4,2):Response.Write(CJJJCCCC("亵@壿@争@丨@筄@氯@幮@，,卛@每@")):Response.Write  formatpercent(CCCJJJC(4,7),2,-1):Response.Write(CJJJCCCC("，,盳@每@争@帳@樜@氯@幮@bgT，,")):Response.Write  IIf(CCCJJJC(4,7)>=CCJJCCJ(2),CJJJCCCC("墙@力@"),CJJJCCCC("凊@尌@")):Response.Write(CJJJCCCC("亁@")):Response.Write  formatpercent(Abs(CCCJJJC(4,7)-CCJJCCJ(2)),2,-1):Response.Write(CJJJCCCC("；,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):Response.Write  CCCJJJC(4,3):Response.Write(CJJJCCCC("亵@壿@争@丨@丆@氯@幮@，,卛@每@")):Response.Write  formatpercent(CCCJJJC(4,8),2,-1):Response.Write(CJJJCCCC("，,盳@每@争@帳@樜@氯@幮@acT，,")):Response.Write  IIf(CCCJJJC(4,8)>=CCJJCCJ(3),CJJJCCCC("墙@力@"),CJJJCCCC("凊@尌@")):Response.Write(CJJJCCCC("亁@")):Response.Write  formatpercent(Abs(CCCJJJC(4,8)-CCJJCCJ(3)),2,-1):Response.Write(CJJJCCCC("；,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):Response.Write  CCCJJJC(4,4):Response.Write(CJJJCCCC("亵@壿@争@巩@筄@氯@幮@，,卛@每@")):Response.Write  formatpercent(CCCJJJC(4,9),2,-1):Response.Write(CJJJCCCC("，,盳@每@争@帳@樜@氯@幮@fT，,")):Response.Write  IIf(CCCJJJC(4,9)>=CCJJCCJ(4),CJJJCCCC("墙@力@"),CJJJCCCC("凊@尌@")):Response.Write(CJJJCCCC("亁@")):Response.Write  formatpercent(Abs(CCCJJJC(4,9)-CCJJCCJ(4)),2,-1):Response.Write(CJJJCCCC("。,") & vbCrLf):Response.Write(CJJJCCCC(" ,k^Am") & vbCrLf):Response.Write(CJJJCCCC(" ,kAm朧@欜@厽@浆@绎@林@癿@叿@严@筄@红@刁@巾@三@帳@樜@栲@朧@盳@每@好@丆@囹@戻@礵@。,k^Am") & vbCrLf):Response.Write(CJJJCCCC(" ,")):CCJCJJJ=CJJJCCCC(",V朧@栜@V[V帳@樜@栲@朧@V.")
for CJJJCJC=0 to 4:CJJCJCJ=CJJJCJC+5:CCJCJJJ=CCJCJJJ & CJJJCCCC("[,") & formatnumber(CCCJJJC(4,CJJCJCJ)*100,2,-1) & CJJJCCCC("[") & CCJJCCJ(CJJJCJC)*100 & CJJJCCCC("."):next:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l4@=F>?U?l癹@刁@每@U3ld_UIl伓@筄@M丨@丅@M丨@筄@M丨@丆@M巩@筄@UGl")):Response.Write  CCJCJJJ:Response.Write(CJJJCCCC("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCC(" ,")):for CJJJCJC=0 to 3:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,k9bm")):Response.Write  CJJJCJC+2 & CJJJCCCC("．,") & CCJJCJJ(CJJJCJC):Response.Write(CJJJCCCC("k^9bm") & vbCrLf):Response.Write(CJJJCCCC(" ,kA ,4=2DDlQ2>\2CE:4=6\=625Qm")):Response.Write  CCJJCJC(CJJJCJC):Response.Write(CJJJCCCC("k^Am") & vbCrLf):Response.Write(CJJJCCCC(" ,kAm") & vbCrLf):Response.Write(CJJJCCCC(" ,孡@甚@")):Response.Write  CCJJCJJ(CJJJCJC):Response.Write(CJJJCCCC("栂@凁@刁@癿@幮@坂@敫@丵@")):Response.Write  CCCJJJC(CJJJCJC,11):Response.Write(CJJJCCCC("，,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):if CCCJJJC(CJJJCJC,11)<=34 then
Response.Write CJJJCCCC("壿@争@栂@凁@刁@筄@红@巩@筄@氯@幮@，,误@昉@孡@甚@怶@低@") & CCJJCJJ(CJJJCJC) & CJJJCCCC("癿@幮@坂@氯@幮@壿@争@巩@筄@氯@幮@。,")
elseif CCCJJJC(CJJJCJC,11)<=44 then
Response.Write CJJJCCCC("壿@争@栂@凁@刁@筄@红@丨@丆@氯@幮@，,误@昉@孡@甚@怶@低@") & CCJJCJJ(CJJJCJC) & CJJJCCCC("癿@幮@坂@氯@幮@壿@争@丨@丆@氯@幮@。,")
elseif CCCJJJC(CJJJCJC,11)<=54 then
Response.Write CJJJCCCC("壿@争@栂@凁@刁@筄@红@丨@筄@氯@幮@，,误@昉@孡@甚@怶@低@") & CCJJCJJ(CJJJCJC) & CJJJCCCC("癿@幮@坂@氯@幮@壿@争@丨@筄@氯@幮@。,")
elseif CCCJJJC(CJJJCJC,11)<=64 then
Response.Write CJJJCCCC("壿@争@栂@凁@刁@筄@红@丨@丅@氯@幮@，,误@昉@孡@甚@怶@低@") & CCJJCJJ(CJJJCJC) & CJJJCCCC("癿@幮@坂@氯@幮@壿@争@丨@丅@氯@幮@。,")
else
Response.Write CJJJCCCC("壿@争@栂@凁@刁@筄@红@伓@筄@氯@幮@，,误@昉@孡@甚@怶@低@") & CCJJCJJ(CJJJCJC) & CJJJCCCC("癿@幮@坂@氯@幮@壿@争@伓@筄@氯@幮@。,")
end if:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,k^Am") & vbCrLf):Response.Write(CJJJCCCC(" ,kAm") & vbCrLf):Response.Write(CJJJCCCC(" ,圣@厽@浆@癿@")):Response.Write  CCJCJCC:Response.Write(CJJJCCCC("亵@丨@，,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):Response.Write  CCCJJJC(CJJJCJC,0):Response.Write(CJJJCCCC("亵@壿@争@伓@筄@氯@幮@，,卛@每@")):Response.Write  formatpercent(CCCJJJC(CJJJCJC,5),2,-1):Response.Write(CJJJCCCC("，,盳@每@争@帳@樜@栲@朧@癿@卛@每@fT，,")):Response.Write  IIf(CCCJJJC(CJJJCJC,5)>=CCJJCCJ(0),CJJJCCCC("墙@力@"),CJJJCCCC("凊@尌@")):Response.Write(CJJJCCCC("亁@")):Response.Write  formatpercent(Abs(CCCJJJC(CJJJCJC,5)-CCJJCCJ(0)),2,-1):Response.Write(CJJJCCCC("；,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):Response.Write  CCCJJJC(CJJJCJC,1):Response.Write(CJJJCCCC("亵@壿@争@丨@丅@氯@幮@，,卛@每@")):Response.Write  formatpercent(CCCJJJC(CJJJCJC,6),2,-1):Response.Write(CJJJCCCC("，,盳@每@争@帳@樜@栲@朧@癿@卛@每@acT，,")):Response.Write  IIf(CCCJJJC(CJJJCJC,6)>=CCJJCCJ(1),CJJJCCCC("墙@力@"),CJJJCCCC("凊@尌@")):Response.Write(CJJJCCCC("亁@")):Response.Write  formatpercent(Abs(CCCJJJC(CJJJCJC,6)-CCJJCCJ(1)),2,-1):Response.Write(CJJJCCCC("；,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):Response.Write  CCCJJJC(CJJJCJC,2):Response.Write(CJJJCCCC("亵@壿@争@丨@筄@氯@幮@，,卛@每@")):Response.Write  formatpercent(CCCJJJC(CJJJCJC,7),2,-1):Response.Write(CJJJCCCC("，,盳@每@争@帳@樜@氯@幮@bgT，,")):Response.Write  IIf(CCCJJJC(CJJJCJC,7)>=CCJJCCJ(2),CJJJCCCC("墙@力@"),CJJJCCCC("凊@尌@")):Response.Write(CJJJCCCC("亁@")):Response.Write  formatpercent(Abs(CCCJJJC(CJJJCJC,7)-CCJJCCJ(2)),2,-1):Response.Write(CJJJCCCC("；,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):Response.Write  CCCJJJC(CJJJCJC,3):Response.Write(CJJJCCCC("亵@壿@争@丨@丆@氯@幮@，,卛@每@")):Response.Write  formatpercent(CCCJJJC(CJJJCJC,8),2,-1):Response.Write(CJJJCCCC("，,盳@每@争@帳@樜@氯@幮@acT，,")):Response.Write  IIf(CCCJJJC(CJJJCJC,8)>=CCJJCCJ(3),CJJJCCCC("墙@力@"),CJJJCCCC("凊@尌@")):Response.Write(CJJJCCCC("亁@")):Response.Write  formatpercent(Abs(CCCJJJC(CJJJCJC,8)-CCJJCCJ(3)),2,-1):Response.Write(CJJJCCCC("；,") & vbCrLf):Response.Write(CJJJCCCC(" ,")):Response.Write  CCCJJJC(CJJJCJC,4):Response.Write(CJJJCCCC("亵@壿@争@巩@筄@氯@幮@，,卛@每@")):Response.Write  formatpercent(CCCJJJC(CJJJCJC,9),2,-1):Response.Write(CJJJCCCC("，,盳@每@争@帳@樜@氯@幮@fT，,")):Response.Write  IIf(CCCJJJC(CJJJCJC,9)>=CCJJCCJ(4),CJJJCCCC("墙@力@"),CJJJCCCC("凊@尌@")):Response.Write(CJJJCCCC("亁@")):Response.Write  formatpercent(Abs(CCCJJJC(CJJJCJC,9)-CCJJCCJ(4)),2,-1):Response.Write(CJJJCCCC("。,") & vbCrLf):Response.Write(CJJJCCCC(" ,k^Am") & vbCrLf):Response.Write(CJJJCCCC(" ,")):CCJCJJJ=CJJJCCCC(",V朧@栜@V[V帳@樜@栲@朧@V.")
for CJJCJJC=0 to 4:CJJCJCJ=CJJCJJC+5:CCJCJJJ=CCJCJJJ & CJJJCCCC("[,") & formatnumber(CCCJJJC(CJJJCJC,CJJCJCJ)*100,2,-1) & CJJJCCCC("[") & CCJJCCJ(CJJCJJC)*100 & CJJJCCCC("."):next:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l4@=F>?U?l癹@刁@每@UIl伓@筄@M丨@丅@M丨@筄@M丨@丆@M巩@筄@UGl")):Response.Write  CCJCJJJ:Response.Write(CJJJCCCC("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,k9am亏@、,丈@吇@四@孋@癿@徒@刁@寴@每@k^9am") & vbCrLf):Response.Write(CJJJCCCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE23=6 ,4=2DDlQE30DE2E ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJCCCC(" ,kECm") & vbCrLf):Response.Write(CJJJCCCC(" ,kE9m四@孋@合@秫@k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE9m幮@坂@敫@k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCC(" ,")):for CJJJCJC=0 to 3:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kECm") & vbCrLf):Response.Write(CJJJCCCC(" ,kE5m")):Response.Write  CCJJCJJ(CJJJCJC):Response.Write(CJJJCCCC("k^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE5m")):Response.Write  CCCJJJC(CJJJCJC,11):Response.Write(CJJJCCCC("k^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE5m")):Response.Write  CCCJJJC(CJJJCJC,12):Response.Write(CJJJCCCC("k^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCCCC(" ,")):CCJCJJJ=CJJJCCCC("LV|Vi,")
for CJJJCJC=0 to 3:if CJJJCJC>0 then CCJCJJJ=CCJCJJJ & CJJJCCCC("[")
CCJCJJJ=CCJCJJJ & CCCJJJC(CJJJCJC,11):next:CCJCJJJ=CCJCJJJ & CJJJCCCC(".[V$sVi,")
for CJJJCJC=0 to 3:if CJJJCJC>0 then CCJCJJJ=CCJCJJJ & CJJJCCCC("[")
CCJCJJJ=CCJCJJJ & CCCJJJC(CJJJCJC,12):next:CCJCJJJ=CCJCJJJ & CJJJCCCC(".N"):Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l6CC@C32CUIl孡@乛@忼@庡@[孡@乛@扻@未@[孡@乛@玪@塾@[徾@躦@偠@庲@UGl")):Response.Write  CCJCJJJ:Response.Write(CJJJCCCC("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,k9am全@、,丈@吇@幯@红@癿@浆@诐@绎@林@每@轾@k^9am") & vbCrLf):Response.Write(CJJJCCCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE23=6 ,4=2DDlQE30DE2E ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJCCCC(" ,kECm") & vbCrLf):Response.Write(CJJJCCCC(" ,kE9m四@孋@^幯@红@k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,")):CCJCJJJ=CJJJCCCC(","):CCCJJJJ="":for CJJJCJC=0 to ubound(CCJCJJC):if CCJCJJC(CJJJCJC,3)>0 then
Response.Write CJJJCCCC("kE9m") & CCJCJJC(CJJJCJC,1) & CJJJCCCC("（,") & CCJCJJC(CJJJCJC,3) & CJJJCCCC("亵@）,k^E9m"):CCCJJJJ=CCCJJJJ & CJJJCCCC("[V") & CCJCJJC(CJJJCJC,1) & CJJJCCCC("V")
end if:next:CCJCJJJ=CCJCJJJ & mid(CCCJJJJ,2) & CJJJCCCC("."):Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kE9m昪@吡@巩@廽@昹@葒@（,!k_]_d）,k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCC(" ,")):for CJJJCJC=0 to 4:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kECm") & vbCrLf):Response.Write(CJJJCCCC(" ,kE5m")):Response.Write  CCJJCJJ(CJJJCJC):Response.Write(CJJJCCCC("k^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,")):CCJCJJJ=CCJCJJJ & CJJJCCCC("[,"):CCCJJJJ="":for CJJCJJC=0 to ubound(CCJCJJC):if CCJCJJC(CJJCJJC,3)>0 then
Response.Write CJJJCCCC("kE5m") & CCJCJJC(CJJCJJC,CJJJCJC+10) & CJJJCCCC("k^E5m"):CCCJJJJ=CCCJJJJ & CJJJCCCC("[") & CCJCJJC(CJJCJJC,CJJJCJC+10)
end if:next:CCJCJJJ=CCJCJJJ & mid(CCCJJJJ,2) & CJJJCCCC("."):CCCJJJJ="":for CJJCJJC=0 to ubound(CCJCJJC):if CCJCJJC(CJJCJJC,3)>0 then
CCCJJJJ=CCCJJJJ & CJJJCCCC("M") & CCJCJJC(CJJCJJC,CJJJCJC+15)
end if:next:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kE5 ,4=2DDlQA\G2=F6Qmk:?AFE ,EJA6lQ9:556?Q ,G2=F6lQ")):Response.Write  mid(CCCJJJJ,2):Response.Write(CJJJCCCC("Qmk^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCCCC(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l4@=F>?UIl孡@乛@忼@庡@[孡@乛@扻@未@[孡@乛@玪@塾@[徾@躦@偠@庲@[怶@刁@UGl")):Response.Write  CCJCJJJ:Response.Write(CJJJCCCC("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,k9am七,、,丈@吇@怢@刦@癿@寴@每@k^9am") & vbCrLf):Response.Write(CJJJCCCC(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE23=6 ,4=2DDlQE30DE2E ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJCCCC(" ,kE9625m") & vbCrLf):Response.Write(CJJJCCCC(" ,kECm") & vbCrLf):Response.Write(CJJJCCCC(" ,kE9m四@孋@k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,")):CCJCCCC=true:for CJJJCJC=0 to 1:if CCJCJCJ(CJJJCJC,1)<2 then CCJCCCC=false
Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kE9m")):Response.Write  CCJCJCJ(CJJJCJC,0):Response.Write(CJJJCCCC("（,")):Response.Write  CCJCJCJ(CJJJCJC,1):Response.Write(CJJJCCCC("亵@）,k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kE9m昪@吡@巩@廽@昹@葒@（,!k_]_d）,k^E9m") & vbCrLf):Response.Write(CJJJCCCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCC(" ,k^E9625m") & vbCrLf):Response.Write(CJJJCCCC(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJCCCC(" ,")):for CJJJCJC=0 to 3:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kECm") & vbCrLf):Response.Write(CJJJCCCC(" ,kE5m")):Response.Write  CCJJCJJ(CJJJCJC):Response.Write(CJJJCCCC("k^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,")):for CJJCJJC=0 to 1:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kE5m")):Response.Write  CCJCJCJ(CJJCJJC,CJJJCJC+6):Response.Write(CJJJCCCC("k^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kE5 ,4=2DDlQA\G2=F6Q ,52E2\42=lQ")):Response.Write  CCJCCCC:Response.Write(CJJJCCCC("Qmk:?AFE ,EJA6lQ9:556?Q ,G2=F6lQ")):Response.Write  CCJCJCJ(0,CJJJCJC+10) & CJJJCCCC("M") & CCJCJCJ(1,CJJJCJC+10):Response.Write(CJJJCCCC("Qmk^E5m") & vbCrLf):Response.Write(CJJJCCCC(" ,k^ECm") & vbCrLf):Response.Write(CJJJCCCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJCCCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCCCC(" ,")):CCJCJJJ=CJJJCCCC(",V甲@V[V奮@V.")
for CJJJCJC=0 to 3:CCJCJJJ=CCJCJJJ & CJJJCCCC("[,") & CCJCJCJ(0,CJJJCJC+6) & CJJJCCCC("[") & CCJCJCJ(1,CJJJCJC+6) & CJJJCCCC("."):next:Response.Write(vbCrLf):Response.Write(CJJJCCCC(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];DnIl孡@乛@忼@庡@[孡@乛@扻@未@[孡@乛@玪@塾@[徾@躦@偠@庲@UGl")):Response.Write  CCJCJJJ:Response.Write(CJJJCCCC("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCC(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCCCC(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJCCCC("k^2CE:4=6m") & vbCrLf):Response.Write(CJJJCCCC("k7@@E6C ,4=2DDlQ2>\47Qm") & vbCrLf):Response.Write(CJJJCCCC(" ,k5:G ,4=2DDlQ2>\7= ,2>\9:56\D>\@?=JQmk: ,4=2DDlQ2>\:4@?\7:=6\E6IEQmk^:m ,")):Response.Write  CCJJCCC:Response.Write(CJJJCCCC(" ,U>:55@Ej ,")):Response.Write  CCCCJJC:Response.Write(CJJJCCCC("浆@诐@绎@林@抠@呅@k^5:Gm") & vbCrLf):Response.Write(CJJJCCCC(" ,k5:G ,4=2DDlQ2>\7CQm") & vbCrLf):Response.Write(CJJJCCCC(" ,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(CJJJCCCC(" ,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(CJJJCCCC(" ,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(CJJJCCCC(" ,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(CJJJCCCC(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJCCCC("k^7@@E6Cm") & vbCrLf):Response.Write(CJJJCCCC("kD4C:AE ,DC4lQ^$4C:AED^2>2K6F:\36E2^;D^2>2K6F:]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCC("kD4C:AE ,DC4lQ^$4C:AED^2FE@4;D^2FE@4]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]9E>=a5@4I];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCCCC("kD4C:AEm") & vbCrLf):Response.Write(CJJJCCCC("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCCCC(" ,SWVR3E?\AC:?EVX]@?WV4=:4<V[7F?4E:@?WXLH:?5@H]AC:?EWXNX") & vbCrLf):Response.Write(CJJJCCCC(" ,SWVR3E?\H@C5VX]@?WV4=:4<V[7F?4E:@?WXLSWV2CE:4=6VX]9E>=a5@4IWXNX") & vbCrLf):Response.Write(CJJJCCCC(" ,SWVR3E?\2FE@4VX]@?WV4=:4<V[7F?4E:@?WXL2FE@4]D9@HWXNX") & vbCrLf):Response.Write(CJJJCCCC(" ,^^ ,甚@戋@盩@彐@") & vbCrLf):Response.Write(CJJJCCCC(" ,G2C ,2FE@4l?6H ,pFE@4yDWL") & vbCrLf):Response.Write(CJJJCCCC(" ,2CE:4=6iV2CE:4=6V[") & vbCrLf):Response.Write(CJJJCCCC(" ,D6=64E@CiV9a[9b[9c[9d[9eV[") & vbCrLf):Response.Write(CJJJCCCC(" ,E:E=6iV盩@ ,彐@V[") & vbCrLf):Response.Write(CJJJCCCC(" ,:Dv6?6C2E6~FE=:?6r92AE6Cr@56i72=D6[") & vbCrLf):Response.Write(CJJJCCCC(" ,:Dv6?6C2E6w625:?8p?49@Ci72=D6") & vbCrLf):Response.Write(CJJJCCCC(" ,NX") & vbCrLf):Response.Write(CJJJCCCC(" ,^^ ,刁@枋@斂@孒@揋@礵@") & vbCrLf):Response.Write(CJJJCCCC(" ,SWV]2>\E6IE\AC:>2CJVX]A@A@G6CWL") & vbCrLf):Response.Write(CJJJCCCC(" ,4@?E6?EiV揋@礵@：,诠@斂@朧@幱@静@钃@寴@栲@朧@癿@宙@陀@刁@枋@，,句@昪@栲@來@，,诲@俘@孓@丵@(@C5斂@桞@吉@臥@衇@俩@攴@斂@孒@。,V[") & vbCrLf):Response.Write(CJJJCCCC(" ,EC:886CiV9@G6CV[") & vbCrLf):Response.Write(CJJJCCCC(" ,E96>6iV52?86C ,D>V") & vbCrLf):Response.Write(CJJJCCCC(" ,NX") & vbCrLf):Response.Write(CJJJCCCC(" ,^^ ,讜@箒@!倷@") & vbCrLf):Response.Write(CJJJCCCC(" ,G2C ,AC@8C6DD ,l ,S]p|&x]AC@8C6DD") & vbCrLf):Response.Write(CJJJCCCC(" ,SW5@4F>6?EX]2;2I$E2CEW7F?4E:@?WX ,LAC@8C6DD]DE2CEWXNX") & vbCrLf):Response.Write(CJJJCCCC(" ,SW5@4F>6?EX]2;2I$E@AW7F?4E:@?WX ,LAC@8C6DD]5@?6WXNX") & vbCrLf):Response.Write(CJJJCCCC(" ,SWVE5]A\G2=F6VX]92DWV:?AFEVX]6249W7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCCCC(" ,G2C ,SE5lSWE9:DX") & vbCrLf):Response.Write(CJJJCCCC(" ,:7WSE5]52E2WV42=VXlllVu2=D6VXLSE5]E6IEWV\VXN") & vbCrLf):Response.Write(CJJJCCCC(" ,6=D6L") & vbCrLf):Response.Write(CJJJCCCC(" ,G2C ,5lSE5]49:=5C6?WV:?AFEVX]G2=WX") & vbCrLf):Response.Write(CJJJCCCC(" ,S]A@DEWV^2A:^!0'2=F6]2D9IV[L5i5N[7F?4E:@?W;D@?XL") & vbCrLf):Response.Write(CJJJCCCC(" ,AC@8C6DD]:?4WX") & vbCrLf):Response.Write(CJJJCCCC(" ,:7W;D@?]4@56lll_XLSE5]E6IEW;D@?]52E2k_]_dnV昪@ViV吡@VXN") & vbCrLf):Response.Write(CJJJCCCC(" ,6=D6LSE5]E6IEWV\VXN") & vbCrLf):Response.Write(CJJJCCCC(" ,NX") & vbCrLf):Response.Write(CJJJCCCC(" ,N") & vbCrLf):Response.Write(CJJJCCCC(" ,NX") & vbCrLf):Response.Write(CJJJCCCC("NX") & vbCrLf):Response.Write(CJJJCCCC("k^D4C:AEm") & vbCrLf)::Function CJJJCCJC(ByVal CJCJJCJJ):Dim CJJJCJC, CCCJJCJ, CCCJJCC, CCCJCJJ, CCCJCJC, CCCJCCJ:CCCJJCJ = UBound(CJCJJCJJ) + 1:CCCJJCC = 0:For CJJJCJC = 0 To CCCJJCJ - 1:CJCJJCJJ(CJJJCJC) = CDbl(CJCJJCJJ(CJJJCJC)):CCCJJCC = CCCJJCC + CJCJJCJJ(CJJJCJC):Next:CCCJCJJ = CCCJJCC / CCCJJCJ:CCCJCJC = 0:For CJJJCJC = 0 To CCCJJCJ - 1:CCCJCJC = CCCJCJC + (CJCJJCJJ(CJJJCJC) - CCCJCJJ) ^ 2:Next:CCCJCCJ = Sqr(CCCJCJC / CCCJJCJ):CJJJCCJC = Array(CCCJCJJ, CCCJCCJ):End Function:Response.Write(vbCrLf):Response.Write(CJJJCCCC("k^3@5Jm") & vbCrLf):Response.Write(CJJJCCCC("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJCJJCJ=nothing:set CCCCCCJ=nothing:set CCCCCCC=nothing:set CJJJJJJJ=nothing:CCJJJJ.Close:Set CCJJJJ=Nothing:CJCCCC.Close:Set CJCCCC=Nothing:CJCCJC.Close:Set CJCCJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CJJJCCCC(ByVal CJJJCCCJ)
Dim CCJCJJJ, CJJJCJC, CJJCJCC
CJJJCCCJ = Replace(CJJJCCCJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CJJJCJC = 1 To Len(CJJJCCCJ)
If CJJJCJC <> CJJCJCC Then
CCJCJJJ = AscW(Mid(CJJJCCCJ, CJJJCJC, 1))
If CCJCJJJ >= 33 And CCJCJJJ <= 79 Then
CJJJCCCC = CJJJCCCC & Chr(CCJCJJJ + 47)
ElseIf CCJCJJJ >= 80 And CCJCJJJ <= 126 Then
CJJJCCCC = CJJJCCCC & Chr(CCJCJJJ - 47)
Else
CJJCJCC = CJJJCJC + 1
If Mid(CJJJCCCJ, CJJCJCC, 1) = Chr(64) Then CJJJCCCC = CJJJCCCC & ChrW(CCJCJJJ + 5) Else CJJJCCCC = CJJJCCCC & Mid(CJJJCCCJ, CJJJCJC, 1)
End If
End If
Next
End Function
%>