Edit D:\xinhaisoft\crisis_new\lb\report_dept\yqxljk.asp
??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCJCJ, CCJCC,CCCJJ, CCCJC, CCCCJ:Set CCJCJ = server.CreateObject(CJJCJJJJ("ps~sq]r@??64E:@?")):CCJCJ.open Application(CJJCJJJJ("r@??64E:@?$EC:?8")):Set CCJCC=CCJCJ::Dim CCCCC,CJJJJJ,CJJJJC,CJJJCJ,CJJJCC,CJJCJJ,CJJCJC,CJJCCJ,CJJCCC:Dim CJCJJJ,CJCJJC,CJCJCJ,CJCJCC,CJCCJJ,CJCCJC:Dim CJCCCJ,CJCCCC,CCJJJJ:Dim CCJJJC:CCJJJC=Trim(Request.Cookies(CJJCJJJJ("!$*|t|qt#"))):if CCJJJC="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CCCCC>0 then CCCCJ=CJJCJJJJ("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") & CJJJJJ & CJJCJJJJ("V ,2?5 ,:5l") & CCCCC set CCCJJ=CCJCJ.execute(CCCCJ):If CCCJJ.EOF Then Call ClearMemberCookie Else CJJJJC=CCCJJ(2) & "":CJJJCJ=CCCJJ(3):CJJJCC=CCCJJ(5):CJJCJJ=CCCJJ(6):CJJCJC=CCCJJ(9):CJJCCJ=CCCJJ(15):CJCJJJ=CCCJJ(0):CJCCCC=CCCJJ(1):CJCCCJ=CCCJJ(11) & "":CJCJJC=CCCJJ(10) & "":CJJCCC=CCCJJ(12):CJCJCJ=CCCJJ(14):CJCJCC=CCCJJ(13):CJCCJJ=CCCJJ(7) & "":CJCCJC=CCCJJ(4):CCJJJJ=CCCJJ(8):if isnull(CJJCCJ) then CJJCCJ=0 if isnull(CJJCJC) or CJJCJC=0 then CJJCJC=CJJJCJ if isnull(CJCCJC) then CJCCJC=0 if isnull(CJJJCC) then CJJJCC=0 if instr(CJJCJJJJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CJJJJJ)>0 then Call RedirectMessage(CJJCJJJJ("????????,????????????????????????????????,")) Call SetMemberCookie(CCCCC,CJJJJJ) End IF end if:Sub CheckRight(CJJCJCC):dim CCJJCJ,CCJJCC:if CCCCC=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJJCJJJJ("??????????????,????????????,")) elseIf not CCCCJJJ(CJJCJCC) then Call RedirectMessage(CJJCJJJJ("????W") & CJJCJCC & CJJCJJJJ("X????????,????????????????????,")) end if:End Sub:Function CCCCJJJ(CJJCJCC):dim CCJJCJ,CCJJCC:CCJJCC=split(CJJCJCC,CJJCJJJJ("[")):CCCCJJJ=False:for CCJJCJ=0 to ubound(CCJJCC):If Mid(CJJJJC,CCJJCC(CCJJCJ),1)="1" then CCCCJJJ=True:exit function end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CJJCJJJJ("!$*|t|qt#"))="":CCCCC=0:CJJCJJ=0:CJJJJJ=Empty:CJJJCC=0:CJJCCJ=0:CJJCJC=0:CJJJCJ=0:CJCJJJ=False:CJCCCC=False:CCJJJJ=Empty:End Sub:Sub CheckMemberCookie():dim CCJCJJ,CCJCJC,CCJJCJ,CCJCCJ,CCJCCC:CCJCJJ=split(CCJJJC,CJJCJJJJ("]")):if ubound(CCJCJJ)<>2 then Call ClearMemberCookie elseif not isnumeric(CCJCJJ(0)) or len(CCJCJJ(1))<>32 or len(CCJCJJ(2))<>32 then Call ClearMemberCookie else CCJCJC=CCJCJJ(1):for CCJJCJ=1 to len(CCJCJC):CCJCCJ=mid(CCJCJC,CCJJCJ,1):if isnumeric(CCJCCJ) then CCJCCC=CCJCCC & CCJCCJ if len(CCJCCC)=7 then exit for next:CCJCJC=CCJCJJ(2):if CCJCCC<>mid(CCJCJC,6,7) then Call ClearMemberCookie else CCJCCJ=mid(CCJCJC,18,10)/2:if CCJCCJ<DateDiff(CJJCJJJJ("D"), CJJCJJJJ("`hf_\`\` ,gi__i__"), Now)-28800 then Call ClearMemberCookie else CCCCC=Clng(CCJCJJ(0)):CJJJJJ=CCJCJJ(1) end if end if end if:End Sub:Sub SetMemberCookie(CJJJJJJC,CJJCJJJC):dim CCJJCJ,CCJCCJ,CCJCCC:for CCJJCJ=1 to len(CJJCJJJC):CCJCCJ=mid(CJJCJJJC,CCJJCJ,1):if isnumeric(CCJCCJ) then CCJCCC=CCJCCC & CCJCCJ if len(CCJCCC)=7 then exit for next:CCJCCC=CJJJJJJC & CJJCJJJJ("]") & CJJCJJJC & CJJCJJJJ("]") & Fix(10000*(Rnd+1)) & CCJCCC & Fix(10000*(Rnd+1)) & DateDiff(CJJCJJJJ("D"), CJJCJJJJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJJCJJJJ("!$*|t|qt#"))=CCJCCC: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 CCCJCJC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::Sub Debug(str):response.Charset=CJJCJJJJ("FE7\g"):dim CCJJCJ,CCJCCJ,CCCJJJ:if isarray(str) then on error resume next:CCJJCJ=ubound(str,2):CCCJJJ=err.number:err.clear:on error goto 0:if CCCJJJ<>0 then for CCJJCJ=0 to ubound(str):if CCJJCJ>0 then response.Write CJJCJJJJ("k3C ,^m") response.Write CCJJCJ & CJJCJJJJ("i ,") & str(CCJJCJ):next else response.Write CJJCJJJJ("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m") for CCJJCJ=0 to ubound(str,2):response.Write CJJCJJJJ("kE9 ,2=:8?lV=67EVm") & CCJJCJ & CJJCJJJJ("k^E9m") next:response.Write CJJCJJJJ("k^ECm"):for CCJJCJ=0 to ubound(str):response.Write CJJCJJJJ("kECmkE9m") & CCJJCJ & CJJCJJJJ("k^E9m"):for CCJCCJ=0 to ubound(str,2):response.Write CJJCJJJJ("kE5m") & str(CCJJCJ,CCJCCJ) & CJJCJJJJ("k^E5m"):next:response.Write CJJCJJJJ("k^ECm"):next:response.Write CJJCJJJJ("k^E23=6m") end if elseif isnull(str) then response.Write CJJCJJJJ(",}F==.") else Response.Write replace(str,vbcrlf,CJJCJJJJ("k3Cm")) end if:Call ConnClose:Response.End:End Sub::Sub SetHttpOnlyCookie(CJJCJCJC,CJJCJCCJ):dim CCJCJJ:CCJCJJ=CJJCJCJC & CJJCJJJJ("l") & CJJCJCCJ & CJJCJJJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJJCJJJJ("$6E\r@@<:6"),CCJCJJ):End Sub::::::sub ShowMessage(CJJCJCCC):response.Charset="utf-8":Response.Write CJJCJJJJ("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 & CJJCJJJJ("k^5:Gmk^5:Gmk3Cm") end sub:Function CCCCJCJ(CCCJJJ):if isnull(CCCJJJ) or trim(CCCJJJ)="" or not isnumeric(CCCJJJ) then CCCCJCJ=false else Dim CCCJJC:Set CCCJJC = New RegExp:CCCJJC.Pattern = CJJCJJJJ("/-5ZS"):CCCJJC.IgnoreCase = True:CCCCJCJ = CCCJJC.test(CCCJJJ):set CCCJJC=nothing end if:End Function:Function CCCCJCC(CJJCCJJJ):dim CCCJCJ,CCCJCC:CCCJCJ=CJJCJJJJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CJJCCJJJ & CJJCJJJJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CCCJCC=CCJCJ.execute(CCCJCJ):CCCCJCC = CCCJCC(0):if isnull(CCCCJCC) then CCCCJCC=1 CCCJCC.close : set CCCJCC=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CCCCCC=nothing:set CCCCCJJ=nothing:set CCCCCJC=nothing:set CCCCCCJ=nothing:CCCJCC.close : set CCCJCC=nothing:CCCJC.Close : Set CCCJC=Nothing:CCCJJ.Close : Set CCCJJ=Nothing:CCCCCCC.Close : Set CCCCCCC = Nothing:CCJCJ.Close : Set CCJCJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJJCJCCC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJJCJJJJ("!$*0|6DD286"),server.URLEncode(CJJCJCCC)):Response.Redirect CJJCJJJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::::::::Sub CheckQueryTime(CJJCCJJC,CJJCCJCJ):dim str,CCCJJJ:str=CJJCJJJJ("!$*0") & Ucase(CJJCCJJC):if Session(str)<>"" then CCCJJJ=DateDiff(CJJCJJJJ("D"),Session(str),Time):if CCCJJJ<CJJCCJCJ and CCCJJJ>0 then Call ConnClose:Call ShowMessage(CJJCJJJJ("??????????@?????? ,") & CJJCCJCJ & CJJCJJJJ(" ,????,???? ,") & CJJCCJCJ-CCCJJJ & CJJCJJJJ(" ,????,")):response.End() else Session.Contents.Remove(str) end if end if:Session(str)=Time:End Sub:::::::Sub ArrayInit(CJJCCJCC):dim CCJJCJ,CCJCCJ,CCCCJC,CCCCCJ:on error resume next:CCCCJC=ubound(CJJCCJCC):CCCCCJ=ubound(CJJCCJCC,2):if err.number<>0 then err.clear:for CCJJCJ=0 to CCCCJC:CJJCCJCC(CCJJCJ)=0:next else for CCJJCJ=0 to CCCCJC:for CCJCCJ=0 to CCCCCJ:CJJCCJCC(CCJJCJ,CCJCCJ)=0:next:next end if:End Sub:::Sub ClearCache(CJJCCCJJ):Application.Contents.Remove CJJCCCJJ End Sub::Class jTree:Private CCCCJ, CCCCCC, CJJJJJJ, CJJJJJC,CJJJJCJ,CJJJJCC,CJJJCJJ,CJJJCJC:Private Sub Class_Initialize():CJJJJJJ = 0:CJJJJJC = 0:CJJJCJC=10:End Sub:Public Property Let Table(CJJCCCJC):if CJJCCCJC="" then Call RedirectMessage(CJJCJJJJ("????????,;%C66????????????????????@??????????,")) CJJJJCJ=CJJCCCJC:CJJJJCC=CJJCJJJJ("!$*0") & UCase(CJJJJCJ):Call GetTreeArray:End Property:Public Property Get Table():Table=CJJJJCJ:End Property:::Private Sub GetTreeArray():Dim CCJJCJ, CCJCCJ, CJJJCCJ,CJJJCCC:CCCCCC = Application(CJJJJCC):If Not IsArray(CCCCCC) Then CCCCJ = CJJCJJJJ("D6=64E ,4@F?EW:5X ,7C@> ,") & CJJJJCJ:if CJJJCJJ<>"" then CCCCJ=CCCCJ & CJJCJJJJ(" ,H96C6 ,") & CJJJCJJ set CJJJCCJ=CCJCJ.execute(CCCCJ):CJJJCCC=CJJJCCJ(0):if CJJJCCC=0 then Call RedirectMessage(CJJCJJJJ("????W") & CJJJJCJ & CJJCJJJJ("^") & CJJJCJJ & CJJCJJJJ("X????????????")) CJJJJJC=CJJJCCC+CJJJCJC:ReDim CCCCCC(CJJJJJC, 4):CCCCJ = CJJCJJJJ("D6=64E ,:5[A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJJJCJ & CJJCJJJJ(" ,H:E9 ,W?@=@4<X"):if CJJJCJJ<>"" then CCCCJ=CCCCJ & CJJCJJJJ(" ,H96C6 ,") & CJJJCJJ CCCCJ=CCCCJ & CJJCJJJJ(" ,@C56C ,3J ,D@CE[:5"):set CJJJCCJ=CCJCJ.execute(CCCCJ):For CCJJCJ = 1 To CJJJCCC:For CCJCCJ = 0 To 4:CCCCCC(CCJJCJ, CCJCCJ) = CJJJCCJ(CCJCCJ):if IsNull(CCCCCC(CCJJCJ,4)) then CCCCCC(CCJJCJ,4)=0 If CCCCCC(CCJJCJ,2)="" then CCCCCC(CCJJCJ,2)=CJJCJJJJ(",??.") Next:CJJJCCJ.MoveNext:Next:CJJJCCJ.Close: Set CJJJCCJ = Nothing:for CCJJCJ=CJJJJJC-(CJJJCJC-1) to CJJJJJC:CCCCCC(CCJJCJ,0)=CCJJCJ:next:Application.Lock():Application(CJJJJCC) = CCCCCC:Application.UnLock() else CJJJJJC=Ubound(CCCCCC) End If:End Sub::::Public Function GetChild(CJJJJJJC):Dim CCJJCJ, Str:CJJJJJJC=CLng(CJJJJJJC):For CCJJCJ = 1 To CJJJJJC:If CCCCCC(CCJJCJ, 1) = CJJJJJJC Then Str = Str & CJJCJJJJ("M") & CCCCCC(CCJJCJ, 0) & CJJCJJJJ("M") & CCCCCC(CCJJCJ,2) Next:If Str <> "" Then Str = Mid(Str, 2) GetChild = Split(str,CJJCJJJJ("M")):End Function:Private Function CJJJJJCC(CJJJJJJC):dim CCJJCJ,CJJCJJJ:CJJJJJCC=0:CJJCJJJ=CStr(CJJJJJJC):if CJJCJJJ<>"0" then for CCJJCJ=1 to CJJJJJC:If CStr(CCCCCC(CCJJCJ, 0))=CJJCJJJ Then CJJJJJCC = CCJJCJ:Exit For End If:Next end if:End Function:Public Function GetCurName(CJJJJJJC):if Cstr(CJJJJJJC)="0" then GetCurName=CJJCJJJJ("??") else Dim CCJJCJ,CJJJCCJ:CCJJCJ=CJJJJJCC(CJJJJJJC):if CCJJCJ>0 then GetCurName=CCCCCC(CCJJCJ,2):if GetCurName="" then set CJJJCCJ=CCJCJ.execute(CJJCJJJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJJJCJ & CJJCJJJJ(" ,H96C6 ,:5l") & CJJJJJJC):if CJJJCCJ.eof then Call RedirectMessage(CJJCJJJJ("xs??,") & CJJJJJJC & CJJCJJJJ("??,??????")) GetCurName=CJJJCCJ(1):Call UpdateCache(CJJJJJJC,CJJJCCJ(0),GetCurName,CJJJCCJ(2),CJJJCCJ(3)):CJJJCCJ.Close: Set CJJJCCJ = Nothing end if else set CJJJCCJ=CCJCJ.execute(CJJCJJJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJJJCJ & CJJCJJJJ(" ,H96C6 ,:5l") & CJJJJJJC):if CJJJCCJ.eof then Call RedirectMessage(CJJCJJJJ("xs??,") & CJJJJJJC & CJJCJJJJ("??,??????")) GetCurName=CJJJCCJ(1):Call UpdateCache(CJJJJJJC,CJJJCCJ(0),GetCurName,CJJJCCJ(2),CJJJCCJ(3)):CJJJCCJ.Close: Set CJJJCCJ = Nothing end if end if:End Function:::Public Function CJJJJCJC(CJJJJJJC):Dim CCJJCJ,CJJCJJC:CCJJCJ=CJJJJJCC(CJJJJJJC):if CCJJCJ=0 then CJJCJJC=CJJJJCCJ(CJJJJJJC) else CJJCJJC=CCCCCC(CCJJCJ,3):if isnull(CJJCJJC) or CJJCJJC="" then CJJCJJC=CJJJJCCJ(CJJJJJJC) elseif Mid(CJJCJJC,instrrev(CJJCJJC,CJJCJJJJ("["))+1)<>CStr(CJJJJJJC) then CJJCJJC=CJJJJCCJ(CJJJJJJC) elseif Left(CJJCJJC,1)=CJJCJJJJ("[") then CJJCJJC=CJJJJCCJ(CJJJJJJC) end if end if:CJJJJCJC=CJJCJJC:End Function:Private Function CJJJJCCJ(CJJJJJJC):dim CJJCJJJ:CJJCJJJ=CStr(CJJJJJJC):if CJJCJJJ="0" then CJJJJCCJ="" else dim CJJJCCJ:set CJJJCCJ=CCJCJ.execute(CJJCJJJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJJJCJ & CJJCJJJJ(" ,H96C6 ,:5l") & CJJJJJJC):if CJJJCCJ.eof then Call UpdateCache(CJJJJJJC,"","","",""):Call RedirectMessage(CJJCJJJJ("??????,xs??,") & CJJJJJJC & CJJCJJJJ("??,????????,????????????????????,")) else if CJJJCCJ(0)=0 then CJJJJCCJ="0," & CJJJJJJC else CJJJJCCJ=CJJJJCJC(CJJJCCJ(0)) & CJJCJJJJ("[") & CJJJJJJC end if:if CJJJCCJ(2)<>CJJJJCCJ then CCJCJ.execute CJJCJJJJ("FA52E6 ,") & CJJJJCJ & CJJCJJJJ(" ,D6E ,A2E9lV") & CJJJJCCJ & CJJCJJJJ("V ,H96C6 ,:5l") & CJJJJJJC else CJJJJCCJ=CJJJCCJ(2) end if end if:Call UpdateCache(CJJJJJJC,CJJJCCJ(0),CJJJCCJ(1),CJJJJCCJ,CJJJCCJ(3)):CJJJCCJ.Close: Set CJJJCCJ = Nothing end if:End Function::Public Function CJJJJCCC(CJJJJJJC):CJJJJCCC = Mid(CJJJJCJC(CJJJJJJC), 3):End Function:Public Function CJJJCJJJ(CJJJJJJC):Dim CCJJCJ, CCJCCJ, CJJCJCJ,Str, CJJCJJC, CJJCJCC, CCJJCC():CJJCJJC = CJJJJCCC(CJJJJJJC):CJJCJJC = Split(CJJCJJC, CJJCJJJJ("[")):for CCJJCJ=0 to Ubound(CJJCJJC):CJJCJCJ=CJJCJJC(CCJJCJ):str=str & CJJCJJJJ("M") & CJJCJCJ & CJJCJJJJ("M") & GetCurName(CJJCJCJ):next:if str<>"" then str=Mid(str,2) CJJJCJJJ=str:End Function:Public Function IsParent(CJJCCCCJ, CJJCCCCC):IsParent=InStr(CJJJJCJC(CJJCCCCC) & CJJCJJJJ("["), CJJCJJJJ("[") & CJJCCCCJ & CJJCJJJJ("[")) > 0:End Function::::::::Public Function Sql_GetChildren(CJJJJJJC):dim CJJCJJC:CJJCJJC=CJJJJCJC(CJJJJJJC):Sql_GetChildren = CJJJJCJ & CJJCJJJJ("0A2E9ZV[V ,=:<6 ,V") & CJJCJJC & CJJCJJJJ("[TV") End Function:::Public Function GetPositionStr_From(CJJJJJJC, CJJJCCJJ):if isnull(CJJJJJJC) or isnull(CJJJCCJJ) then GetPositionStr_From=CJJCJJJJ(",????????."):exit function end if:Dim Str, CCJJCJ, CCJJCC, CJJCJCC, CJJCCJJ:CJJJCCJJ = CStr(CJJJCCJJ):If CJJJCCJJ = "0" or CJJJCCJJ = CStr(CJJJJJJC) Then Str = GetCurName(CJJJJJJC) Else CCJJCC = Split(CJJJCJJJ(CJJJJJJC), CJJCJJJJ("M")):CJJCJCC = UBound(CCJJCC):CJJCCJJ = False:For CCJJCJ = 0 To CJJCJCC Step 2:If CCJJCC(CCJJCJ) = CJJJCCJJ And Not CJJCCJJ Then CJJCCJJ = True If CJJCCJJ Then If Str <> "" Then Str = Str & CJJCJJJJ("??,") Str = Str & CCJJCC(CCJJCJ + 1) End If:Next End If:str=Mid(str,instr(str,CJJCJJJJ("??,"))+1):GetPositionStr_From = Str:End Function:::::::Public Sub ClearCache():Application.Contents.Remove CJJJJCC End Sub:Public Sub UpdateCache(CJJJJJJC,CJJCJCJ,CJCJJJJJ,CJJCJJC,CJCJJJJC):dim CCJJCJ,CCJCCJ:CJJJJJJC=CLng(CJJJJJJC):CCJJCJ=CJJJJJCC(CJJJJJJC):if CJJCJCJ="" and CJCJJJJJ="" and CJJCJJC="" and CJCJJJJC="" then if CCJJCJ>0 then for CCJCCJ=1 to 4:CCCCCC(CCJJCJ,CCJCCJ)=Null:next end if else if CCJJCJ=0 then for CCJCCJ=1 to CJJJJJC:if CCCCCC(CCJCCJ,1) & ""="" then CCJJCJ=CCJCCJ:exit for end if:next end if:if CCJJCJ=0 then Call ClearCache else CCCCCC(CCJJCJ,0)=CLng(CJJJJJJC):if CJJCJCJ<>"" then CCCCCC(CCJJCJ,1)=CLng(CJJCJCJ) if CJCJJJJJ<>"" then CCCCCC(CCJJCJ,2)=CJCJJJJJ if CJJCJJC<>"" then CCCCCC(CCJJCJ,3)=CJJCJJC if CJCJJJJC<>"" then CCCCCC(CCJJCJ,4)=CLng(CJCJJJJC) end if end if:if CCJJCJ>0 then Application.Lock():Application(CJJJJCC) = CCCCCC:Application.UnLock() end if:End Sub:Private Sub Debug(CJJCJCCC):Call ConnClose:Response.Write CJJCJCCC:Response.End:End Sub:Private Function CCCCJCC():CCCCJCC=CJJJCCJC+1:End Function:Private Function CJJJCCJC():dim CCCJCC:set CCCJCC=CCJCJ.execute(CJJCJJJJ("D6=64E ,E@A ,` ,:5 ,7C@> ,") & CJJJJCJ & CJJCJJJJ(" ,@C56C ,3J ,:5 ,56D4")):CJJJCCJC=CCCJCC(0):CCCJCC.Close: Set CCCJCC = Nothing:End Function:Private Sub Class_Terminate():End Sub:End Class::Const CCCJCCJ=272:Const CCCJCCC="??????????????":Call CheckRight("54,81"):Call CheckQueryTime(CJJCJJJJ("%6DE0#6A@CE"),30):dim CJJCCJC,CJJCCCJ,CJJCCCC,CJCJJJJ,CJCJJJC,CJCJJCJ:CJCJJCJ=Request.QueryString(CJJCJJJJ("$49@@=")):CJJCCJC=Request.QueryString(CJJCJJJJ("s6AE")):CJJCCCJ=Request.QueryString(CJJCJJJJ("vC256")):CJJCCCC=Request.QueryString(CJJCJJJJ("vC@FA")):CJCJJJJ=Request.QueryString(CJJCJJJJ("E`")):CJCJJJC=Request.QueryString(CJJCJJJJ("Ea")):if not CCCCJCJ(CJJCCJC) then Call RedirectMessage(CJJCJJJJ("????????,??????????????,")) dim CCCCCC:set CCCCCC=new jtree:CCCCCC.table=CJJCJJJJ(">6>36C0EJA6"):if not CCCCCC.IsParent(CJJJCJ,CJJCCJC) then Call RedirectMessage(CJJCJJJJ("??????W") & CJJCCJC & CJJCJJJJ("X??????W") & CJJJCJ & CJJCJJJJ("X????????????@??,")) dim CJJJCCCJ:CJJJCCCJ=CCCCCC.GetChild(CJJCCJC):if ubound(CJJJCCCJ)<0 then Call RedirectMessage(CJJCJJJJ("??????????????????????,")) CJJJCCCJ=join(CJJJCCCJ,CJJCJJJJ("M")) & CJJCJJJJ("M_M????"):CJJJCCCJ=split(CJJJCCCJ,CJJCJJJJ("M")):dim CJCJJCC:CJCJJCC=CCCCCC.GetCurName(CJJCCJC):dim CCJJCJ,CCJCCJ,CCJCCC,CJCJCJJ,CJCJCJC,CJCJCCJ:dim CJCJCCC():redim CJCJCCC((ubound(CJJJCCCJ)-1)/2,10):for CCJJCJ=0 to ubound(CJJJCCCJ)-1 step 2:CCJCCC=CCJJCJ/2:CJCJCCC(CCJCCC,0)=CJJJCCCJ(CCJJCJ):CJCJCCC(CCJCCC,1)=CJJJCCCJ(CCJJCJ+1):for CCJCCJ=2 to ubound(CJCJCCC,2):CJCJCCC(CCJCCC,CCJCCJ)=0:next:next:dim CJCCJJJ(1,1):Call ArrayInit(CJCCJJJ):CJCCJJJ(0,0)=CJJCJJJJ("??"):CJCCJJJ(1,0)=CJJCJJJJ("??"):dim CCJJCC,CJCCJJC,CJCCJCJ,CJCCJCC,CJCCCJJ,CJCCCJC,CJCCCCJ:dim CJCCCCC,CCJJJJJ:CJCCCCC=Date:CCJJJJJ=cdate(CJJCJJJJ("a___\`\`")):dim CCJJJJC:CCJJJJC=0:dim CCJJJCJ(2,1):Call ArrayInit(CCJJJCJ):dim CCJJJCC(2,1):Call ArrayInit(CCJJJCC):dim CCJJCJJ(2,1):Call ArrayInit(CCJJCJJ):dim CCJJCJC(1,1):Call ArrayInit(CCJJCJC):dim CCJJCCJ(3,1):Call ArrayInit(CCJJCCJ):dim CCJJCCC(4,1):Call ArrayInit(CCJJCCC):dim CCJCJJJ(4,1):Call ArrayInit(CCJCJJJ):dim CCJCJJC(4,1):Call ArrayInit(CCJCJJC):dim CCJCJCJ(3,1):Call ArrayInit(CCJCJCJ):dim CCJCJCC(2,1):Call ArrayInit(CCJCJCC):dim CCJCCJJ(4,1):Call ArrayInit(CCJCCJJ):dim CCJCCJC(3,1):Call ArrayInit(CCJCCJC):dim CCJCCCJ(3,1):Call ArrayInit(CCJCCCJ):dim CCJCCCC(4,1):Call ArrayInit(CCJCCCC):dim CCCJJJJ(3,1):Call ArrayInit(CCCJJJJ):dim CCCJJJC(2,1):Call ArrayInit(CCCJJJC):dim CCCJJCJ(7,1):Call ArrayInit(CCCJJCJ):dim CCCJJCC,CCCJCJJ:CCCCJ=CJJCJJJJ("D6=64E ,>6>36C0EJA60A2E9[52E6E:>6[D6I[C6DF=E[2?DH6C[E6DE286[C62=?2>6[?F>36C[>6>36CEJA6[?@C>2= ,7C@> ,G0E6DE ,H:E9 ,W?@=@4<X ,H96C6 ,=3l") & CCCJCCJ & CJJCJJJJ(" ,2?5 ,G2=:5l`"):if cstr(CJJCCJC)=cstr(CJCJJCJ) then CCCCJ=CCCCJ & CJJCJJJJ(" ,2?5 ,>6>36C0EJA60E@Al") & CJCJJCJ else CCCCJ=CCCCJ & CJJCJJJJ(" ,2?5 ,") & CCCCCC.Sql_GetChildren(CJJCCJC) if CCCCJCJ(CJJCCCJ) then CCCCJ=CCCCJ & CJJCJJJJ(" ,2?5 ,8C256l") & CJJCCCJ if CCCCJCJ(CJJCCCC) then CCCCJ=CCCCJ & CJJCJJJJ(" ,2?5 ,4FDE@>8C@FAl") & CJJCCCC if isdate(CJCJJJJ) then CCCCJ=CCCCJ & CJJCJJJJ(" ,2?5 ,52E6E:>6mlV") & CJCJJJJ & CJJCJJJJ("V") if isdate(CJCJJJC) then CCCCJ=CCCCJ & CJJCJJJJ(" ,2?5 ,52E6E:>6kV") & cdate(CJCJJJC)+1 & CJJCJJJJ("V") CCCCJ=CCCCJ & CJJCJJJJ(" ,@C56C ,3J ,>6>36CEJA6"):set CCCJJ=CCJCC.execute(CCCCJ):if CCCJJ.eof then Call RedirectMessage(CJJCJJJJ("????????,??????????????,")) while not CCCJJ.eof:CCJCCC=CCCJJ(1):if CCJCCC<CJCCCCC then CJCCCCC=CCJCCC if CCJCCC>CCJJJJJ then CCJJJJJ=CCJCCC if CCCJJ(2) then CCJCCJ=0 else CCJCCJ=1 CJCCJJJ(CCJCCJ,1)=CJCCJJJ(CCJCCJ,1)+1:CCJJJJC=CCJJJJC+CCCJJ(5):CCJJCC=split(CJJCJJJJ("M") & CCCJJ(4),CJJCJJJJ("M")):CCJCCC=cint(CCJJCC(17))-1:CCJJJCJ(CCJCCC,0)=CCJJJCJ(CCJCCC,0)+1:CCJCCC=cint(CCJJCC(18))-1:CCJJJCC(CCJCCC,0)=CCJJJCC(CCJCCC,0)+1:CCJCCC=cint(CCJJCC(3))-1:CCJJCJJ(CCJCCC,0)=CCJJCJJ(CCJCCC,0)+1:if CCJCCC=0 then CJCCCJJ=CJCCCJJ & CCCJJ(6) & CJJCJJJJ("M") & CCCJJ(7) & vbcrlf CCJCCC=cint(CCJJCC(1))-1:CCJJCJC(CCJCCC,0)=CCJJCJC(CCJCCC,0)+1:if CCJCCC=0 then CJCCCJC=CJCCCJC & CCCJJ(6) & CJJCJJJJ("M") & CCCJJ(7) & vbcrlf CCJCCC=cint(CCJJCC(8))-1:CCJJCCJ(CCJCCC,0)=CCJJCCJ(CCJCCC,0)+1:CCJCCC=cint(CCJJCC(9))-1:CCJJCCC(CCJCCC,0)=CCJJCCC(CCJCCC,0)+1:CCJCCC=cint(CCJJCC(10))-1:CCJCJJJ(CCJCCC,0)=CCJCJJJ(CCJCCC,0)+1:CCJCCC=cint(CCJJCC(11))-1:CCJCJJC(CCJCCC,0)=CCJCJJC(CCJCCC,0)+1:CCJCCC=cint(CCJJCC(12))-1:CCJCJCJ(CCJCCC,0)=CCJCJCJ(CCJCCC,0)+1:CCJCCC=cint(CCJJCC(13))-1:CCJCJCC(CCJCCC,0)=CCJCJCC(CCJCCC,0)+1:CCJCCC=CCJJCC(16):if CCJCCC=CJJCJJJJ("????????????") then CCJCCJJ(0,0)=CCJCCJJ(0,0)+1 elseif CCJCCC=CJJCJJJJ("????????????,????????????") then CCJCCJJ(1,0)=CCJCCJJ(1,0)+1 elseif CCJCCC=CJJCJJJJ("????????????") then CCJCCJJ(2,0)=CCJCCJJ(2,0)+1 elseif CCJCCC=CJJCJJJJ("????????????") then CCJCCJJ(3,0)=CCJCCJJ(3,0)+1 else CCJCCJJ(4,0)=CCJCCJJ(4,0)+1 end if:CCJCCC=cint(CCJJCC(14))-1:CCJCCJC(CCJCCC,0)=CCJCCJC(CCJCCC,0)+1:for CCJJCJ=0 to 3:CCJCCJ=CCJJCJ+1:if instr(CCJJCC(4),CCJCCJ)>0 then CCJCCCJ(CCJJCJ,0)=CCJCCCJ(CCJJCJ,0)+1 next:for CCJJCJ=0 to 4:CCJCCJ=CCJJCJ+1:if instr(CCJJCC(5),CCJCCJ)>0 then CCJCCCC(CCJJCJ,0)=CCJCCCC(CCJJCJ,0)+1 next:for CCJJCJ=0 to 3:CCJCCJ=CCJJCJ+1:if instr(CCJJCC(6),CCJCCJ)>0 then CCCJJJJ(CCJJCJ,0)=CCCJJJJ(CCJJCJ,0)+1 next:for CCJJCJ=0 to 2:CCJCCJ=CCJJCJ+1:if instr(CCJJCC(7),CCJCCJ)>0 then CCCJJJC(CCJJCJ,0)=CCCJJJC(CCJJCJ,0)+1 next:CCJJCC=split(CCCJJ(3),CJJCJJJJ("M")):for CCJJCJ=0 to 7:CCJCCJ=CCJJCC(CCJJCJ):CCCJJCJ(CCJJCJ,CCJCCJ)=CCCJJCJ(CCJJCJ,CCJCCJ)+1:next:if not CCCJJ(9) then if CCCJJ(8)<>CCCJJCC then CCCJJCC=CCCJJ(8):CCCJCJJ=CCCCCC.GetPositionStr_From(CCCJJCC,CJCJJCJ) end if:CJCCCCJ=CJCCCCJ & CCCJCJJ & CJJCJJJJ("M") & CCCJJ(6):for CCJJCJ=0 to 7:CJCCCCJ=CJCCCCJ & CJJCJJJJ("M") & IIf(CCJJCC(CCJJCJ)="1",CJJCJJJJ("????"),""):next:CJCCCCJ=CJCCCCJ & vbcrlf end if:CCJCCJ=ubound(CJCJCCC):for CCJJCJ=0 to CCJCCJ-1:if instr(CCCJJ(0) & CJJCJJJJ("["),CJJCJJJJ("[") & CJCJCCC(CCJJCJ,0) & CJJCJJJJ("["))>0 then CCJCCJ=CCJJCJ:exit for end if:next:CCJJCJ=CCJCCJ:CJCJCCC(CCJJCJ,2)=CJCJCCC(CCJJCJ,2)+1:for CCJCCJ=0 to 7:if CCJJCC(CCJCCJ)="1" then CCJCCC=CCJCCJ+3:CJCJCCC(CCJJCJ,CCJCCC)=CJCJCCC(CCJJCJ,CCJCCC)+1 end if:next:CJCCJCJ=CJCCJCJ+1:CCCJJ.movenext:wend:Response.Write(vbCrLf):Response.Write(CJJCJJJJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJJCJJJJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJJCJJJJ("k9625m") & vbCrLf):Response.Write(CJJCJJJJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJJCJJJJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJJCJJJJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJJCJJJJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJJCJJJJ("kE:E=6m")):Response.Write CJCJJCC:Response.Write(CJJCJJJJ("\")):Response.Write CCCJCCC:Response.Write(CJJCJJJJ("????????k^E:E=6m") & vbCrLf):Response.Write(CJJCJJJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2>2K6F:\36E2^4DD^2>2K6F:]>:?]4DDQm") & vbCrLf):Response.Write(CJJCJJJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2FE@4;D^4DD^2FE@4]>:?]4DDQm") & vbCrLf):Response.Write(CJJCJJJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^4DD^C6A@CE]4DDQm") & vbCrLf):Response.Write(CJJCJJJJ("kDEJ=6m") & vbCrLf):Response.Write(CJJCJJJJ("k^DEJ=6m") & vbCrLf):Response.Write(CJJCJJJJ("kDEJ=6 ,>65:2lQAC:?EQm") & vbCrLf):Response.Write(CJJCJJJJ("3@5J ,L ,324<8C@F?5\4@=@Ci ,EC2?DA2C6?Ej ,N") & vbCrLf):Response.Write(CJJCJJJJ("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(CJJCJJJJ("7@@E6C[]@FE=:?6\@FED:56[]?@\H@C5 ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CJJCJJJJ("k^DEJ=6m") & vbCrLf):Response.Write(CJJCJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ("kD4C:AE ,DC4lQ^$4C:AED^6492CED^6492CED]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ("k^9625m") & vbCrLf):Response.Write(CJJCJJJJ("k3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ("k2CE:4=6 ,4=2DDlQ2>\4@?E2:?6CQm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k5:G ,4=2DDlQ:??6CQm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9`mkD>2==m")):Response.Write CJCJJCC:Response.Write(CJJCJJJJ("k^D>2==mk3Cm")):Response.Write CCCJCCC:Response.Write(CJJCJJJJ("????????????k^9`m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9am??,??,????????k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm????????????????????????,??????????????????????@????????????????????,????????????????????????????????????????????????????????????????,????????????????????????????,??????????,????????????????????????????????,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9am????,????????k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm")):Response.Write formatdatetime(CJCCCCC,1):Response.Write(CJJCJJJJ("??,")):Response.Write formatdatetime(CCJJJJJ,1):Response.Write(CJJCJJJJ("k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9am????,????????k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kF=m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k=:m??????, ,????")):Response.Write CJCCJCJ:Response.Write(CJJCJJJJ("????????,????????")):Response.Write CJCCJJJ(0,1):Response.Write(CJJCJJJJ("????,????")):Response.Write CJCCJJJ(1,1):Response.Write(CJJCJJJJ("????,k^=:m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k=:m??????, ,????????")):Response.Write formatnumber(CCJJJJC/CJCCJCJ,2,-1):Response.Write(CJJCJJJJ("????,k^=:m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k=:m??????,") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CCJCCJ=0:for CCJJCJ=0 to ubound(CJCJCCC):if CJCJCCC(CCJJCJ,2)>0 then CCJCCJ=CCJCCJ+1:response.Write CJCJCCC(CCJJCJ,1) & CJCJCCC(CCJJCJ,2) & CJJCJJJJ("????,") end if:next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,????")):Response.Write CCJCCJ:Response.Write(CJJCJJJJ("????????,") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^=:m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^F=m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9am????,????????????k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9bm`] ,????^??????????????k^9bm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,`??,????^????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 2:CCJJJCJ(CCJJCJ,1)=formatnumber(CCJJJCJ(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,??")):Response.Write CCJJJCJ(0,0):Response.Write(CJJCJJJJ("????,??????????^??????,??????????")):Response.Write CCJJJCJ(0,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJJJCJ(1,0):Response.Write(CJJCJJJJ("??????^??????,??????????")):Response.Write CCJJJCJ(1,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJJJCJ(2,0):Response.Write(CJJCJJJJ("??????^??????,??????????")):Response.Write CCJJJCJ(2,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????^????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??,??????????^????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????^????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????^????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 2:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJJJCJ(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJJJCJ(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 2:Response.Write CJJCJJJJ("kE5m") & CCJJJCJ(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIl??,??????????^????[??????^????[??????^????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,a??,????^????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 2:CCJJJCC(CCJJCJ,1)=formatnumber(CCJJJCC(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,??")):Response.Write CCJJJCC(0,0):Response.Write(CJJCJJJJ("??????????^??????????,??????????")):Response.Write CCJJJCC(0,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJJJCC(1,0):Response.Write(CJJCJJJJ("????????^??????????,??????????")):Response.Write CCJJJCC(1,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJJJCC(2,0):Response.Write(CJJCJJJJ("??????^??????,??????????")):Response.Write CCJJJCC(2,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????^????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????^????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????^????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????^????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 2:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJJJCC(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJJJCC(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 2:Response.Write CJJCJJJJ("kE5m") & CCJJJCC(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIl????????^????????[????????^????????[??????^????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9bma] ,??????@????????????????k^9bm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,`??,????????????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 2:CCJJCJJ(CCJJCJ,1)=formatnumber(CCJJCJJ(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,??")):Response.Write CCJJCJJ(2,0):Response.Write(CJJCJJJJ("??????????????????,??????????")):Response.Write CCJJCJJ(2,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJJCJJ(1,0):Response.Write(CJJCJJJJ("????????????????????????,??????????")):Response.Write CCJJCJJ(1,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJJCJJ(0,0):Response.Write(CJJCJJJJ("??????????????????,??????????")):Response.Write CCJJCJJ(0,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 2:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJJCJJ(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJJCJJ(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 2:Response.Write CJJCJJJJ("kE5m") & CCJJCJJ(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIl??????????????[????????[????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,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(CJJCJJJJ(" ,k42AE:@?m??????????????????,")):Response.Write CCJJCJJ(0,0):Response.Write(CJJCJJJJ("????,k^42AE:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????^????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CCJJCC=split(CJCCCJJ,vbcrlf):for CCJJCJ=0 to ubound(CCJJCC)-1:Response.Write CJJCJJJJ("kECmkE5m") & (CCJJCJ+1) & CJJCJJJJ("k^E5m"):CJCCJJC=split(CCJJCC(CCJJCJ),CJJCJJJJ("M")):for CCJCCJ=0 to ubound(CJCCJJC):Response.Write CJJCJJJJ("kE5m") & CJCCJJC(CCJCCJ) & CJJCJJJJ("k^E5m"):next:Response.Write CJJCJJJJ("k^ECm"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,a??,????????????????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 1:CCJJCJC(CCJJCJ,1)=formatnumber(CCJJCJC(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,??????????@??????????????@????????????????????")):Response.Write CCJJCJC(0,0):Response.Write(CJJCJJJJ("??,??????????")):Response.Write CCJJCJC(0,1):Response.Write(CJJCJJJJ("T??,??????????@????????????????@????????????????????")):Response.Write CCJJCJC(1,0):Response.Write(CJJCJJJJ("??,??????????")):Response.Write CCJJCJC(1,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????@??????????????@??????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????@????????????????@??????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 1:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJJCJC(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJJCJC(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 1:Response.Write CJJCJJJJ("kE5m") & CCJJCJC(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIl??[????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,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(CJJCJJJJ(" ,k42AE:@?m??????????@????????????????????????,")):Response.Write CCJJCJC(0,0):Response.Write(CJJCJJJJ("????,k^42AE:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????^????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CCJJCC=split(CJCCCJC,vbcrlf):for CCJJCJ=0 to ubound(CCJJCC)-1:Response.Write CJJCJJJJ("kECmkE5m") & (CCJJCJ+1) & CJJCJJJJ("k^E5m"):CJCCJJC=split(CCJJCC(CCJJCJ),CJJCJJJJ("M")):for CCJCCJ=0 to 1:Response.Write CJJCJJJJ("kE5m") & CJCCJJC(CCJCCJ) & CJJCJJJJ("k^E5m"):next:Response.Write CJJCJJJJ("k^ECm"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9bmb] ,????????????????k^9bm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,`??,????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:CCJJCCJ(CCJJCJ,1)=formatnumber(CCJJCCJ(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,??????????????????????????????")):Response.Write CCJJCCJ(0,0):Response.Write(CJJCJJJJ("????,??????????")):Response.Write CCJJCCJ(0,1):Response.Write(CJJCJJJJ("T??,????????????????????????")):Response.Write CCJJCCJ(1,0):Response.Write(CJJCJJJJ("????,??????????")):Response.Write CCJJCCJ(1,1):Response.Write(CJJCJJJJ("T??,??????????????????????????")):Response.Write CCJJCCJ(2,0):Response.Write(CJJCJJJJ("????,??????????")):Response.Write CCJJCCJ(2,1):Response.Write(CJJCJJJJ("T??,??,??????????????????????????")):Response.Write CCJJCCJ(3,0):Response.Write(CJJCJJJJ("????,??????????")):Response.Write CCJJCCJ(3,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??,??????????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 3:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJJCCJ(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJJCCJ(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:Response.Write CJJCJJJJ("kE5m") & CCJJCCJ(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIl????????????????[????????????????[??????????????????[??,??????????????????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,a??,????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 4:CCJJCCC(CCJJCJ,1)=formatnumber(CCJJCCC(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,??")):Response.Write CCJJCCC(0,0):Response.Write(CJJCJJJJ("??????????????,??????????")):Response.Write CCJJCCC(0,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJJCCC(1,0):Response.Write(CJJCJJJJ("??????????????,??????????")):Response.Write CCJJCCC(1,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJJCCC(2,0):Response.Write(CJJCJJJJ("????????,????,??????????")):Response.Write CCJJCCC(2,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJJCCC(3,0):Response.Write(CJJCJJJJ("??????????????,??????????")):Response.Write CCJJCCC(3,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJJCCC(4,0):Response.Write(CJJCJJJJ("??????????????,??????????")):Response.Write CCJJCCC(4,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??,??k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 4:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJJCCC(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJJCCC(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 4:Response.Write CJJCJJJJ("kE5m") & CCJJCCC(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIl??????[??????[??,??[??????[??????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,b??,????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 4:CCJCJJJ(CCJJCJ,1)=formatnumber(CCJCJJJ(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,??")):Response.Write CCJCJJJ(0,0):Response.Write(CJJCJJJJ("??????????????????????,??????????")):Response.Write CCJCJJJ(0,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJJJ(1,0):Response.Write(CJJCJJJJ("????????????????????????????,??????????")):Response.Write CCJCJJJ(1,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJJJ(2,0):Response.Write(CJJCJJJJ("??????????????????,????????????,??????????")):Response.Write CCJCJJJ(2,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJJJ(3,0):Response.Write(CJJCJJJJ("????????????,????????????????????,??????????")):Response.Write CCJCJJJ(3,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJJJ(4,0):Response.Write(CJJCJJJJ("????????????????????????,??????????")):Response.Write CCJCJJJ(4,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????,??k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????,??????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 4:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJCJJJ(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJCJJJ(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 4:Response.Write CJJCJJJJ("kE5m") & CCJCJJJ(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIl????????[??????????[??????????,??[????,??????????[??????????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,c??,????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 4:CCJCJJC(CCJJCJ,1)=formatnumber(CCJCJJC(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,??")):Response.Write CCJCJJC(0,0):Response.Write(CJJCJJJJ("??????????????????????,??????????")):Response.Write CCJCJJC(0,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJJC(1,0):Response.Write(CJJCJJJJ("????????????????????????????,??????????")):Response.Write CCJCJJC(1,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJJC(2,0):Response.Write(CJJCJJJJ("????????????????????????????,??????????")):Response.Write CCJCJJC(2,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJJC(3,0):Response.Write(CJJCJJJJ("??????????????????????????????,??????????")):Response.Write CCJCJJC(3,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJJC(4,0):Response.Write(CJJCJJJJ("??????????????????????????,??????????")):Response.Write CCJCJJC(4,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 4:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJCJJC(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJCJJC(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 4:Response.Write CJJCJJJJ("kE5m") & CCJCJJC(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIl????????[??????????[??????????[????????????[??????????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,d??,??????@??k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:CCJCJCJ(CCJJCJ,1)=formatnumber(CCJCJCJ(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,??")):Response.Write CCJCJCJ(0,0):Response.Write(CJJCJJJJ("????????????`????????@??,??????????")):Response.Write CCJCJCJ(0,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJCJ(1,0):Response.Write(CJJCJJJJ("????????????`\a??????????,??????????")):Response.Write CCJCJCJ(1,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJCJ(2,0):Response.Write(CJJCJJJJ("??????????a??????????,??????????")):Response.Write CCJCJCJ(2,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJCJ(3,0):Response.Write(CJJCJJJJ("????????????,??????????")):Response.Write CCJCJCJ(3,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????@??k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m`????????@k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m`\a????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9ma????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 3:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJCJCJ(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJCJCJ(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:Response.Write CJJCJJJJ("kE5m") & CCJCJCJ(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIl`????????@[`\a????[a????????[????????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,e??,????????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 2:CCJCJCC(CCJJCJ,1)=formatnumber(CCJCJCC(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,??")):Response.Write CCJCJCC(0,0):Response.Write(CJJCJJJJ("????????????e????????@??,??????????")):Response.Write CCJCJCC(0,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJCC(1,0):Response.Write(CJJCJJJJ("??????????e\g??????????,??????????")):Response.Write CCJCJCC(1,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCJCC(2,0):Response.Write(CJJCJJJJ("????????????g??????????,??????????")):Response.Write CCJCJCC(2,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9me????????@k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9me\g????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9mg????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 2:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJCJCC(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJCJCC(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 2:Response.Write CJJCJJJJ("kE5m") & CCJCJCC(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIle????????@[e\g????[g????????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,f??,??????@??k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 4:CCJCCJJ(CCJJCJ,1)=formatnumber(CCJCCJJ(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,??")):Response.Write CCJCCJJ(0,0):Response.Write(CJJCJJJJ("????????????????,??????????")):Response.Write CCJCCJJ(0,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCCJJ(1,0):Response.Write(CJJCJJJJ("??????????????????,??????????????,??????????")):Response.Write CCJCCJJ(1,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCCJJ(2,0):Response.Write(CJJCJJJJ("??????????????????,??????????")):Response.Write CCJCCJJ(2,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCCJJ(3,0):Response.Write(CJJCJJJJ("??????????????????,??????????")):Response.Write CCJCCJJ(3,1):Response.Write(CJJCJJJJ("T??,??")):Response.Write CCJCCJJ(4,0):Response.Write(CJJCJJJJ("????????????????????,??????????")):Response.Write CCJCCJJ(4,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????@??k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????,????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 4:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJCCJJ(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJCCJJ(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 4:Response.Write CJJCJJJJ("kE5m") & CCJCCJJ(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIl????????????[????????????,????????????[????????????[????????????[????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,g??,??????????????????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:CCJCCJC(CCJJCJ,1)=formatnumber(CCJCCJC(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????,????????????????????????`????????@????")):Response.Write CCJCCJC(0,0):Response.Write(CJJCJJJJ("????,??????????")):Response.Write CCJCCJC(0,1):Response.Write(CJJCJJJJ("T??,??????????`\b????????")):Response.Write CCJCCJC(1,0):Response.Write(CJJCJJJJ("????,??????????")):Response.Write CCJCCJC(1,1):Response.Write(CJJCJJJJ("T??,??????????b\d????????")):Response.Write CCJCCJC(2,0):Response.Write(CJJCJJJJ("????,??????????")):Response.Write CCJCCJC(2,1):Response.Write(CJJCJJJJ("T??,??????????d????????????")):Response.Write CCJCCJC(3,0):Response.Write(CJJCJJJJ("????,??????????")):Response.Write CCJCCJC(3,1):Response.Write(CJJCJJJJ("T??,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m`????????@k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m`\b????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9mb\d????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9md????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CJCJCJC="":for CCJJCJ=0 to 3:CJCJCJC=CJCJCJC & CJJCJJJJ("[") & CCJCCJC(CCJJCJ,0):Response.Write CJJCJJJJ("kE5m") & CCJCCJC(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:Response.Write CJJCJJJJ("kE5m") & CCJCCJC(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4lA:6U9lad_UIl`????????@[`\b????[b\d????[d????????UGl")):Response.Write mid(CJCJCJC,2):Response.Write(CJJCJJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9bmc] ,????@????????k^9bm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,`??,??@????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:CCJCCCJ(CCJJCJ,1)=formatnumber(CCJCCCJ(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??@????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????????,????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????^????^??????????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:Response.Write CJJCJJJJ("kE5m") & CCJCCCJ(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:Response.Write CJJCJJJJ("kE5m") & CCJCCCJ(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,a??,????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 4:CCJCCCC(CCJJCJ,1)=formatnumber(CCJCCCC(CCJJCJ,0)/CJCCJCJ*100,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????@????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????????????????@??k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????,??????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 4:Response.Write CJJCJJJJ("kE5m") & CCJCCCC(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 4:Response.Write CJJCJJJJ("kE5m") & CCJCCCC(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,b??,????@??????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:CCCJJJJ(CCJJCJ,1)=formatpercent(CCCJJJJ(CCJJCJ,0)/CJCCJCJ,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??@??????^????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??@??????^????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:Response.Write CJJCJJJJ("kE5m") & CCCJJJJ(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 3:Response.Write CJJCJJJJ("kE5m") & CCCJJJJ(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9cm??,c??,????@??????????k^9cm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 2:CCCJJJC(CCJJCJ,1)=formatpercent(CCCJJJC(CCJJCJ,0)/CJCCJCJ,2,-1):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????????????????????,??k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????????????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????????????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 2:Response.Write CJJCJJJJ("kE5m") & CCCJJJC(CCJJCJ,0) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m????k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 2:Response.Write CJJCJJJJ("kE5m") & CCCJJJC(CCJJCJ,1) & CJJCJJJJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9bmd] ,????????????k^9bm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????????????????????????????????????,????????????,??????,??????,??????,????@??,??????,??????????????,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,k@=m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k=:m??????????????????,????????????,??????????????????????,k^=:m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k=:m??????????????????,????@??????????????,k^=:m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k=:m??????????????????,????????@????????????????,????????????????????,k^=:m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k=:m??????????????????,??????????????@????,k^=:m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k=:m????@??????????????????@??????????????@????,??@??@??????????,k^=:m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k=:m??????????????????????,????????????????,k^=:m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k=:m??????????????????????????,????????@????@????????????,k^=:m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k=:m??????????????????,????????????????,????????????????????????@??????????,k^=:m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^@=m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????????????????????????????????????????,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CCJJCC=split(CJJCJJJJ("????M????M????M????M????@M????M????M??????"),CJJCJJJJ("M")):Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9mRk^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 7:Response.Write CJJCJJJJ("kECmkE5 ,C@HDA2?lVaV ,4=2DDlV2>\E6IE\>:55=6Vm") & (CCJJCJ+1) & CJJCJJJJ("k^E5mkE5 ,C@HDA2?lVaV ,4=2DDlV2>\E6IE\>:55=6Vm") & CCJJCC(CCJJCJ) & CJJCJJJJ("k^E5mkE5m????k^E5mkE5m") & CCCJJCJ(CCJJCJ,0) & CJJCJJJJ("k^E5mkE5m") & formatpercent(CCCJJCJ(CCJJCJ,0)/CJCCJCJ,2,-1) & CJJCJJJJ("k^E5mk^ECm") Response.Write CJJCJJJJ("kECmkE5m????k^E5mkE5m") & CCCJJCJ(CCJJCJ,1) & CJJCJJJJ("k^E5mkE5m") & formatpercent(CCCJJCJ(CCJJCJ,1)/CJCCJCJ,2,-1) & CJJCJJJJ("k^E5mk^ECm"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9am????,????????????????????@??k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,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(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9 ,4@=DA2?lQaQm????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 7:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE9 ,4@=DA2?lQaQm")):Response.Write CCJJCC(CCJJCJ):Response.Write(CJJCJJJJ("k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to 7:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m?k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9mTk^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CCJJCJ=0 to ubound(CJCJCCC):if CJCJCCC(CCJJCJ,2)>0 then Response.Write CJJCJJJJ("kECmkE5 ,4=2DDlV2>\E6IE\=67EVm") & CJCJCCC(CCJJCJ,1) & CJJCJJJJ("k^E5mkE5m") & CJCJCCC(CCJJCJ,2) & CJJCJJJJ("k^E5m") for CCJCCJ=0 to 7:CCJCCC=CCJCCJ+3:if CJCJCCC(CCJJCJ,CCJCCC)>0 then Response.Write CJJCJJJJ("kE5m") & CJCJCCC(CCJJCJ,CCJCCC) & CJJCJJJJ("k^E5m"):Response.Write CJJCJJJJ("kE5m") & formatnumber(CJCJCCC(CCJJCJ,CCJCCC)/CJCJCCC(CCJJCJ,2)*100,1,-1) & CJJCJJJJ("k^E5m") else Response.Write CJJCJJJJ("kE5mk^E5mkE5mk^E5m") end if:next:Response.Write CJJCJJJJ("k^ECm") end if:next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9am????,??????????????????????k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE23=6 ,:5lQ23?@C>2=\=:DEQ ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\46?E6C65 ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9mRk^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????@k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m??????k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CCJJCC=split(CJCCCCJ,vbcrlf):for CCJJCJ=0 to ubound(CCJJCC)-1:CJCCJJC=split(CCJJCC(CCJJCJ),CJJCJJJJ("M")):Response.Write CJJCJJJJ("kECmkE5m") & (CCJJCJ+1) & CJJCJJJJ("k^E5mkE5 ,4=2DDlV2>\E6IE\=67E ,2>\E6IE\>:55=6Vm") & CJCCJJC(0) & CJJCJJJJ("k^E5m") for CCJCCJ=1 to 9:Response.Write CJJCJJJJ("kE5m") & CJCCJJC(CCJCCJ) & CJJCJJJJ("k^E5m"):next:Response.Write CJJCJJJJ("k^ECm"):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9am??,??,??????????k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm`] ,????????????????????????????????????????,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??,`??,????????????@??????,??????????????????????@??????,????????,????????,????????????,????????????????????@??????????????,??????????@????,??????????????????,??????????????,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??,a??,????????????@??????,????????????????????,????????????????,??????@????????????????,????????????@????@????????,????????????,????????????@????????,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAma] ,??????????????????,??????????????????,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??,`??,????????????????,????????????????????@??????????????????????????????????????,??????????????????????,????????????,??????@??????????????????????,??????,??????????????????????@????,??????????????????????????????????,????@????????????????,????????????,??????????????????????,????,??????????????,??,????????????,????????????,??????,??????????????????,??????????????,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??,a??,????????????????????????????????,??????????????????????,??????????,??????????,????????????,??????????????,??????????????????,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAmb] ,??????????????????????????,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm??????????,""""????????????????????????????@????????????????????,????????????????????????,??????????????????,??,????????????????@????????@??????,??????,????????????????@??????????@??????,????????@????????????,????????????????????????????????????,??????????????????????,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCJJJJ("k^2CE:4=6m") & vbCrLf):Response.Write(CJJCJJJJ("k7@@E6C ,4=2DDlQ2>\47Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k5:G ,4=2DDlQ2>\7= ,2>\9:56\D>\@?=JQmk: ,4=2DDlQ2>\:4@?\7:=6\E6IEQmk^:m ,")):Response.Write CJCJJCC:Response.Write(CJJCJJJJ(" ,U>:55@Ej ,")):Response.Write CCCJCCC:Response.Write(CJJCJJJJ("????????????k^5:Gm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k5:G ,4=2DDlQ2>\7CQm") & vbCrLf):Response.Write(CJJCJJJJ(" ,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(CJJCJJJJ(" ,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(CJJCJJJJ(" ,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(CJJCJJJJ(" ,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(CJJCJJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCJJJJ("k^7@@E6Cm") & vbCrLf):Response.Write(CJJCJJJJ("kD4C:AE ,DC4lQ^$4C:AED^2>2K6F:\36E2^;D^2>2K6F:]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]E23=6]C@HDA2?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ("kD4C:AE ,DC4lQ^$4C:AED^2FE@4;D^2FE@4]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]9E>=a5@4I];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ("kD4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJJCJJJJ(" ,SWVR3E?\AC:?EVX]@?WV4=:4<V[7F?4E:@?WXLH:?5@H]AC:?EWXNX") & vbCrLf):Response.Write(CJJCJJJJ(" ,SWVR3E?\H@C5VX]@?WV4=:4<V[7F?4E:@?WXLSWV2CE:4=6VX]9E>=a5@4IWXNX") & vbCrLf):Response.Write(CJJCJJJJ(" ,SWVR3E?\2FE@4VX]@?WV4=:4<V[7F?4E:@?WXL2FE@4]D9@HWXNX") & vbCrLf):Response.Write(CJJCJJJJ(" ,^^ ,????????") & vbCrLf):Response.Write(CJJCJJJJ(" ,SWVR23?@C>2=\=:DEVX]49:=5C6?WVE3@5JVX]C@HDA2?W`X") & vbCrLf):Response.Write(CJJCJJJJ(" ,^^ ,????????") & vbCrLf):Response.Write(CJJCJJJJ(" ,G2C ,2FE@4l?6H ,pFE@4yDWL") & vbCrLf):Response.Write(CJJCJJJJ(" ,2CE:4=6iV2CE:4=6V[") & vbCrLf):Response.Write(CJJCJJJJ(" ,D6=64E@CiV9a[9b[9c[9d[9eV[") & vbCrLf):Response.Write(CJJCJJJJ(" ,E:E=6iV?? ,??V[") & vbCrLf):Response.Write(CJJCJJJJ(" ,:Dv6?6C2E6~FE=:?6r92AE6Cr@56i72=D6[") & vbCrLf):Response.Write(CJJCJJJJ(" ,:Dv6?6C2E6w625:?8p?49@Ci72=D6") & vbCrLf):Response.Write(CJJCJJJJ(" ,NX") & vbCrLf):Response.Write(CJJCJJJJ("NX") & vbCrLf):Response.Write(CJJCJJJJ("k^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ("k^3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CCCCCC=nothing:set CCCCCJJ=nothing:set CCCCCJC=nothing:set CCCCCCJ=nothing:CCCJC.Close:Set CCCJC=Nothing:CCCJJ.Close:Set CCCJJ=Nothing:CCJCJ.Close:Set CCJCJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJJCJJJJ(ByVal CJJJCCCC) Dim CJCJCJC, CCJJCJ, CCCJJJ CJJJCCCC = Replace(CJJJCCCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CCJJCJ = 1 To Len(CJJJCCCC) If CCJJCJ <> CCCJJJ Then CJCJCJC = AscW(Mid(CJJJCCCC, CCJJCJ, 1)) If CJCJCJC >= 33 And CJCJCJC <= 79 Then CJJCJJJJ = CJJCJJJJ & Chr(CJCJCJC + 47) ElseIf CJCJCJC >= 80 And CJCJCJC <= 126 Then CJJCJJJJ = CJJCJJJJ & Chr(CJCJCJC - 47) Else CCCJJJ = CCJJCJ + 1 If Mid(CJJJCCCC, CCCJJJ, 1) = Chr(64) Then CJJCJJJJ = CJJCJJJJ & ChrW(CJCJCJC + 5) Else CJJCJJJJ = CJJCJJJJ & Mid(CJJJCCCC, CCJJCJ, 1) End If End If Next End Function %>
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de