<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CJJJCC, CJJCJJ,CJJCJC, CJJCCJ, CJJCCC:Set CJJJCC = server.CreateObject(CJJJCJJJ("ps~sq]r@??64E:@?")):CJJJCC.open Application(CJJJCJJJ("r@??64E:@?$EC:?8")):Set CJJCJJ=CJJJCC::Dim CJCJJJ,CJCJJC,CJCJCJ,CJCJCC,CJCCJJ,CJCCJC,CJCCCJ,CJCCCC,CCJJJJ:Dim CCJJJC,CCJJCJ,CCJJCC,CCJCJJ,CCJCJC,CCJCCJ:Dim CCJCCC,CCCJJJ,CCCJJC:Dim CCCJCJ:CCCJCJ=Trim(Request.Cookies(CJJJCJJJ("!$*|t|qt#"))):if CCCJCJ="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CJCJJJ>0 then CJJCCC=CJJJCJJJ("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?@=@40 then Call RedirectMessage(CJJJCJJJ("弬@寁@矼@,,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,")) Call SetMemberCookie(CJCJJJ,CJCJJC) End IF end if:Sub CheckRight(CJJJCJJC):dim CCCJCC,CCCCJJ:if CJCJJJ=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJJJCJJJ("癶@彐@俜@恪@夬@敃@,,诲@釈@斫@癶@彐@。,")) elseIf not CCCJCJJ(CJJJCJJC) then Call RedirectMessage(CJJJCJJJ("朾@陋@W") & CJJJCJJC & CJJJCJJJ("X袦@祼@歝@,,诲@三@糶@绚@箜@琁@呓@聏@糶@。,")) end if:End Sub:Function CCCJCJJ(CJJJCJJC):dim CCCJCC,CCCCJJ:CCCCJJ=split(CJJJCJJC,CJJJCJJJ("[")):CCCJCJJ=False:for CCCJCC=0 to ubound(CCCCJJ):If Mid(CJCJCJ,CCCCJJ(CCCJCC),1)="1" then CCCJCJJ=True:exit function end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CJJJCJJJ("!$*|t|qt#"))="":CJCJJJ=0:CJCCJC=0:CJCJJC=Empty:CJCCJJ=0:CJCCCC=0:CJCCCJ=0:CJCJCC=0:CCJJJC=False:CCCJJJ=False:CCCJJC=Empty:End Sub:Sub CheckMemberCookie():dim CCCCJC,CCCCCJ,CCCJCC,CCCCCC,CJJJJJJ:CCCCJC=split(CCCJCJ,CJJJCJJJ("]")):if ubound(CCCCJC)<>2 then Call ClearMemberCookie elseif not isnumeric(CCCCJC(0)) or len(CCCCJC(1))<>32 or len(CCCCJC(2))<>32 then Call ClearMemberCookie else CCCCCJ=CCCCJC(1):for CCCJCC=1 to len(CCCCCJ):CCCCCC=mid(CCCCCJ,CCCJCC,1):if isnumeric(CCCCCC) then CJJJJJJ=CJJJJJJ & CCCCCC if len(CJJJJJJ)=7 then exit for next:CCCCCJ=CCCCJC(2):if CJJJJJJ<>mid(CCCCCJ,6,7) then Call ClearMemberCookie else CCCCCC=mid(CCCCCJ,18,10)/2:if CCCCCC0 then for CCCJCC=0 to ubound(str):if CCCJCC>0 then response.Write CJJJCJJJ("k3C ,^m") response.Write CCCJCC & CJJJCJJJ("i ,") & str(CCCJCC):next else response.Write CJJJCJJJ("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m") for CCCJCC=0 to ubound(str,2):response.Write CJJJCJJJ("kE9 ,2=:8?lV=67EVm") & CCCJCC & CJJJCJJJ("k^E9m") next:response.Write CJJJCJJJ("k^ECm"):for CCCJCC=0 to ubound(str):response.Write CJJJCJJJ("kECmkE9m") & CCCJCC & CJJJCJJJ("k^E9m"):for CCCCCC=0 to ubound(str,2):response.Write CJJJCJJJ("kE5m") & str(CCCJCC,CCCCCC) & CJJJCJJJ("k^E5m"):next:response.Write CJJJCJJJ("k^ECm"):next:response.Write CJJJCJJJ("k^E23=6m") end if elseif isnull(str) then response.Write CJJJCJJJ(",}F==.") else Response.Write replace(str,vbcrlf,CJJJCJJJ("k3Cm")) end if:Call ConnClose:Response.End:End Sub::Sub SetHttpOnlyCookie(CJJJCJCC,CJJJCCJJ):dim CCCCJC:CCCCJC=CJJJCJCC & CJJJCJJJ("l") & CJJJCCJJ & CJJJCJJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJJJCJJJ("$6E\r@@<:6"),CCCCJC):End Sub::::::sub ShowMessage(CJJJCCJC):response.Charset="utf-8":Response.Write CJJJCJJJ("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") & CJJJCCJC & CJJJCJJJ("k^5:Gmk^5:Gmk3Cm") end sub:Function CCCJCJC(CJJJJJC):if isnull(CJJJJJC) or trim(CJJJJJC)="" or not isnumeric(CJJJJJC) then CCCJCJC=false else Dim CJJJJCJ:Set CJJJJCJ = New RegExp:CJJJJCJ.Pattern = CJJJCJJJ("/-5ZS"):CJJJJCJ.IgnoreCase = True:CCCJCJC = CJJJJCJ.test(CJJJJJC):set CJJJJCJ=nothing end if:End Function:Function CCCJCCJ(CJJJCCCJ):dim CJJJJCC,CJJJCJJ:CJJJJCC=CJJJCJJJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CJJJCCCJ & CJJJCJJJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJJJCJJ=CJJJCC.execute(CJJJJCC):CCCJCCJ = CJJJCJJ(0):if isnull(CCCJCCJ) then CCCJCCJ=1 CJJJCJJ.close : set CJJJCJJ=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CJJCJJJ=nothing:set CCCJCCC=nothing:set CCCCJJJ=nothing:set CCCCJJC=nothing:CJJJCJJ.close : set CJJJCJJ=nothing:CJJCCJ.Close : Set CJJCCJ=Nothing:CJJCJC.Close : Set CJJCJC=Nothing:CCCCJCJ.Close : Set CCCCJCJ = Nothing:CJJJCC.Close : Set CJJJCC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJJJCCJC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJJJCJJJ("!$*0|6DD286"),server.URLEncode(CJJJCCJC)):Response.Redirect CJJJCJJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::::::::Sub CheckQueryTime(CJJJCCCC,CJJCJJJJ):dim str,CJJJJJC:str=CJJJCJJJ("!$*0") & Ucase(CJJJCCCC):if Session(str)<>"" then CJJJJJC=DateDiff(CJJJCJJJ("D"),Session(str),Time):if CJJJJJC0 then Call ConnClose:Call ShowMessage(CJJJCJJJ("柠@话@闯@随@忀@顶@夢@争@ ,") & CJJCJJJJ & CJJJCJJJ(" ,种@,,迓@剤@ ,") & CJJCJJJJ-CJJJJJC & CJJJCJJJ(" ,种@!,")):response.End() else Session.Contents.Remove(str) end if end if:Session(str)=Time:End Sub:::::::Sub ArrayInit(CJJCJJJC):dim CCCJCC,CCCCCC,CJJJCCJ,CJJJCCC:on error resume next:CJJJCCJ=ubound(CJJCJJJC):CJJJCCC=ubound(CJJCJJJC,2):if err.number<>0 then err.clear:for CCCJCC=0 to CJJJCCJ:CJJCJJJC(CCCJCC)=0:next else for CCCJCC=0 to CJJJCCJ:for CCCCCC=0 to CJJJCCC:CJJCJJJC(CCCJCC,CCCCCC)=0:next:next end if:End Sub:::Sub ClearCache(CJJCJJCJ):Application.Contents.Remove CJJCJJCJ End Sub::Class jTree:Private CJJCCC, CJJCJJJ, CJJCJJC, CJJCJCJ,CJJCJCC,CJJCCJJ,CJJCCJC,CJJCCCJ:Private Sub Class_Initialize():CJJCJJC = 0:CJJCJCJ = 0:CJJCCCJ=10:End Sub:Public Property Let Table(CJJCJJCC):if CJJCJJCC="" then Call RedirectMessage(CJJJCJJJ("寴@丈@赲@,,;%C66籶@宙@來@匑@旱@沜@朄@讹@罩@忀@襼@癿@屙@怢@!,")) CJJCJCC=CJJCJJCC:CJJCCJJ=CJJJCJJJ("!$*0") & UCase(CJJCJCC):Call GetTreeArray:End Property:Public Property Get Table():Table=CJJCJCC:End Property:::Private Sub GetTreeArray():Dim CCCJCC, CCCCCC, CJJCCCC,CJCJJJJ:CJJCJJJ = Application(CJJCCJJ):If Not IsArray(CJJCJJJ) Then CJJCCC = CJJJCJJJ("D6=64E ,4@F?EW:5X ,7C@> ,") & CJJCJCC:if CJJCCJC<>"" then CJJCCC=CJJCCC & CJJJCJJJ(" ,H96C6 ,") & CJJCCJC set CJJCCCC=CJJJCC.execute(CJJCCC):CJCJJJJ=CJJCCCC(0):if CJCJJJJ=0 then Call RedirectMessage(CJJJCJJJ("柠@话@W") & CJJCJCC & CJJJCJJJ("^") & CJJCCJC & CJJJCJJJ("X沜@朄@绎@林@敫@捩@")) CJJCJCJ=CJCJJJJ+CJJCCCJ:ReDim CJJCJJJ(CJJCJCJ, 4):CJJCCC = CJJJCJJJ("D6=64E ,:5[A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCJCC & CJJJCJJJ(" ,H:E9 ,W?@=@4"" then CJJCCC=CJJCCC & CJJJCJJJ(" ,H96C6 ,") & CJJCCJC CJJCCC=CJJCCC & CJJJCJJJ(" ,@C56C ,3J ,D@CE[:5"):set CJJCCCC=CJJJCC.execute(CJJCCC):For CCCJCC = 1 To CJCJJJJ:For CCCCCC = 0 To 4:CJJCJJJ(CCCJCC, CCCCCC) = CJJCCCC(CCCCCC):if IsNull(CJJCJJJ(CCCJCC,4)) then CJJCJJJ(CCCJCC,4)=0 If CJJCJJJ(CCCJCC,2)="" then CJJCJJJ(CCCJCC,2)=CJJJCJJJ(",穵@.") Next:CJJCCCC.MoveNext:Next:CJJCCCC.Close: Set CJJCCCC = Nothing:for CCCJCC=CJJCJCJ-(CJJCCCJ-1) to CJJCJCJ:CJJCJJJ(CCCJCC,0)=CCCJCC:next:Application.Lock():Application(CJJCCJJ) = CJJCJJJ:Application.UnLock() else CJJCJCJ=Ubound(CJJCJJJ) End If:End Sub::::Public Function GetChild(CCCCCJJ):Dim CCCJCC, Str:CCCCCJJ=CLng(CCCCCJJ):For CCCJCC = 1 To CJJCJCJ:If CJJCJJJ(CCCJCC, 1) = CCCCCJJ Then Str = Str & CJJJCJJJ("M") & CJJCJJJ(CCCJCC, 0) & CJJJCJJJ("M") & CJJCJJJ(CCCJCC,2) Next:If Str <> "" Then Str = Mid(Str, 2) GetChild = Split(str,CJJJCJJJ("M")):End Function:Private Function CCCCCCJ(CCCCCJJ):dim CCCJCC,CJCJJJC:CCCCCCJ=0:CJCJJJC=CStr(CCCCCJJ):if CJCJJJC<>"0" then for CCCJCC=1 to CJJCJCJ:If CStr(CJJCJJJ(CCCJCC, 0))=CJCJJJC Then CCCCCCJ = CCCJCC:Exit For End If:Next end if:End Function:Public Function GetCurName(CCCCCJJ):if Cstr(CCCCCJJ)="0" then GetCurName=CJJJCJJJ("栴@") else Dim CCCJCC,CJJCCCC:CCCJCC=CCCCCCJ(CCCCCJJ):if CCCJCC>0 then GetCurName=CJJCJJJ(CCCJCC,2):if GetCurName="" then set CJJCCCC=CJJJCC.execute(CJJJCJJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCJCC & CJJJCJJJ(" ,H96C6 ,:5l") & CCCCCJJ):if CJJCCCC.eof then Call RedirectMessage(CJJJCJJJ("xs(,") & CCCCCJJ & CJJJCJJJ("),朥@批@别@")) GetCurName=CJJCCCC(1):Call UpdateCache(CCCCCJJ,CJJCCCC(0),GetCurName,CJJCCCC(2),CJJCCCC(3)):CJJCCCC.Close: Set CJJCCCC = Nothing end if else set CJJCCCC=CJJJCC.execute(CJJJCJJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCJCC & CJJJCJJJ(" ,H96C6 ,:5l") & CCCCCJJ):if CJJCCCC.eof then Call RedirectMessage(CJJJCJJJ("xs(,") & CCCCCJJ & CJJJCJJJ("),朥@批@别@")) GetCurName=CJJCCCC(1):Call UpdateCache(CCCCCJJ,CJJCCCC(0),GetCurName,CJJCCCC(2),CJJCCCC(3)):CJJCCCC.Close: Set CJJCCCC = Nothing end if end if:End Function:::Public Function CJJJJJJJ(CCCCCJJ):Dim CCCJCC,CJCJJCJ:CCCJCC=CCCCCCJ(CCCCCJJ):if CCCJCC=0 then CJCJJCJ=CJJJJJJC(CCCCCJJ) else CJCJJCJ=CJJCJJJ(CCCJCC,3):if isnull(CJCJJCJ) or CJCJJCJ="" then CJCJJCJ=CJJJJJJC(CCCCCJJ) elseif Mid(CJCJJCJ,instrrev(CJCJJCJ,CJJJCJJJ("["))+1)<>CStr(CCCCCJJ) then CJCJJCJ=CJJJJJJC(CCCCCJJ) elseif Left(CJCJJCJ,1)=CJJJCJJJ("[") then CJCJJCJ=CJJJJJJC(CCCCCJJ) end if end if:CJJJJJJJ=CJCJJCJ:End Function:Private Function CJJJJJJC(CCCCCJJ):dim CJCJJJC:CJCJJJC=CStr(CCCCCJJ):if CJCJJJC="0" then CJJJJJJC="" else dim CJJCCCC:set CJJCCCC=CJJJCC.execute(CJJJCJJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CJJCJCC & CJJJCJJJ(" ,H96C6 ,:5l") & CCCCCJJ):if CJJCCCC.eof then Call UpdateCache(CCCCCJJ,"","","",""):Call RedirectMessage(CJJJCJJJ("顴@盩@(,xs:,") & CCCCCJJ & CJJJCJJJ("),丈@孓@圣@,,诲@患@迏@囙@吉@釈@斫@擈@佗@。,")) else if CJJCCCC(0)=0 then CJJJJJJC="0," & CCCCCJJ else CJJJJJJC=CJJJJJJJ(CJJCCCC(0)) & CJJJCJJJ("[") & CCCCCJJ end if:if CJJCCCC(2)<>CJJJJJJC then CJJJCC.execute CJJJCJJJ("FA52E6 ,") & CJJCJCC & CJJJCJJJ(" ,D6E ,A2E9lV") & CJJJJJJC & CJJJCJJJ("V ,H96C6 ,:5l") & CCCCCJJ else CJJJJJJC=CJJCCCC(2) end if end if:Call UpdateCache(CCCCCJJ,CJJCCCC(0),CJJCCCC(1),CJJJJJJC,CJJCCCC(3)):CJJCCCC.Close: Set CJJCCCC = Nothing end if:End Function::::Public Function IsParent(CJJCJCJJ, CJJCJCJC):IsParent=InStr(CJJJJJJJ(CJJCJCJC) & CJJJCJJJ("["), CJJJCJJJ("[") & CJJCJCJJ & CJJJCJJJ("[")) > 0:End Function::::::::Public Function Sql_GetChildren(CCCCCJJ):dim CJCJJCJ:CJCJJCJ=CJJJJJJJ(CCCCCJJ):Sql_GetChildren = CJJCJCC & CJJJCJJJ("0A2E9ZV[V ,=:<6 ,V") & CJCJJCJ & CJJJCJJJ("[TV") End Function::::::::::Public Sub ClearCache():Application.Contents.Remove CJJCCJJ End Sub:Public Sub UpdateCache(CCCCCJJ,CJJCJCCJ,CJJCJCCC,CJCJJCJ,CJJCCJJJ):dim CCCJCC,CCCCCC:CCCCCJJ=CLng(CCCCCJJ):CCCJCC=CCCCCCJ(CCCCCJJ):if CJJCJCCJ="" and CJJCJCCC="" and CJCJJCJ="" and CJJCCJJJ="" then if CCCJCC>0 then for CCCCCC=1 to 4:CJJCJJJ(CCCJCC,CCCCCC)=Null:next end if else if CCCJCC=0 then for CCCCCC=1 to CJJCJCJ:if CJJCJJJ(CCCCCC,1) & ""="" then CCCJCC=CCCCCC:exit for end if:next end if:if CCCJCC=0 then Call ClearCache else CJJCJJJ(CCCJCC,0)=CLng(CCCCCJJ):if CJJCJCCJ<>"" then CJJCJJJ(CCCJCC,1)=CLng(CJJCJCCJ) if CJJCJCCC<>"" then CJJCJJJ(CCCJCC,2)=CJJCJCCC if CJCJJCJ<>"" then CJJCJJJ(CCCJCC,3)=CJCJJCJ if CJJCCJJJ<>"" then CJJCJJJ(CCCJCC,4)=CLng(CJJCCJJJ) end if end if:if CCCJCC>0 then Application.Lock():Application(CJJCCJJ) = CJJCJJJ:Application.UnLock() end if:End Sub:Private Sub Debug(CJJJCCJC):Call ConnClose:Response.Write CJJJCCJC:Response.End:End Sub:Private Function CCCJCCJ():CCCJCCJ=CJJJJCJJ+1:End Function:Private Function CJJJJCJJ():dim CJJJCJJ:set CJJJCJJ=CJJJCC.execute(CJJJCJJJ("D6=64E ,E@A ,` ,:5 ,7C@> ,") & CJJCJCC & CJJJCJJJ(" ,@C56C ,3J ,:5 ,56D4")):CJJJJCJJ=CJJJCJJ(0):CJJJCJJ.Close: Set CJJJCJJ = Nothing:End Function:Private Sub Class_Terminate():End Sub:End Class::server.ScriptTimeout=120:Const CCCJJCJ=228:Const CCCJJCC="成人暴力攻击倾向量表":Call CheckRight("54,81"):Call CheckQueryTime(CJJJCJJJ("%6DE0#6A@CE"),30):dim CJCJJCC,CJCJCJJ,CJCJCJC,CJCJCCJ,CJCJCCC,CJCCJJJ,CJCCJJC,CJCCJCJ:CJCCJJJ=Request.QueryString(CJJJCJJJ("$49@@=")):CJCJJCC=Request.QueryString(CJJJCJJJ("s6AE")):CJCJCJJ=Request.QueryString(CJJJCJJJ("vC256")):CJCJCJC=Request.QueryString(CJJJCJJJ("vC@FA")):CJCCJCJ=Request.QueryString(CJJJCJJJ("E6DEEJA6")):CJCJCCJ=Request.QueryString(CJJJCJJJ("E`")):CJCJCCC=Request.QueryString(CJJJCJJJ("Ea")):CJCCJJC=Request.QueryString(CJJJCJJJ("=6G6=")):if not CCCJCJC(CJCJJCC) then Call RedirectMessage(CJJJCJJJ("寴@丈@赲@,,糶@绚@厽@敫@丝@夬@!,")) dim CJJCJJJ:set CJJCJJJ=new jtree:CJJCJJJ.table=CJJJCJJJ(">6>36C0EJA6"):if not CJJCJJJ.IsParent(CJCJCC,CJCJJCC) then Call RedirectMessage(CJJJCJJJ("诠@苾@囯@W") & CJCJJCC & CJJJCJJJ("X丈@圣@患@W") & CJCJCC & CJJJCJJJ("X癿@箜@琁@苾@囯@冀@。,")) dim CJJJJCJC:CJJJJCJC=CJJCJJJ.GetChild(CJCJJCC):if ubound(CJJJJCJC)<0 then Call RedirectMessage(CJJJCJJJ("陝@糶@苾@囯@诲@丈@襼@逄@别@曻@庐@尽@!,")) CJJJJCJC=join(CJJJJCJC,CJJJCJJJ("M")) & CJJJCJJJ("M_M共@仑@"):CJJJJCJC=split(CJJJJCJC,CJJJCJJJ("M")):dim CJCCJCC:CJCCJCC=CJJCJJJ.GetCurName(CJCJJCC):dim CCCJCC,CCCCCC,CJJJJJJ,CJCCCJJ,CJCCCJC,CJCCCCJ:dim CJCCCCC():redim CJCCCCC((ubound(CJJJJCJC)-1)/2,8):for CCCJCC=0 to ubound(CJJJJCJC)-1 step 2:CJJJJJJ=CCCJCC/2:CJCCCCC(CJJJJJJ,0)=CJJJJCJC(CCCJCC):CJCCCCC(CJJJJJJ,1)=CJJJJCJC(CCCJCC+1):for CCCCCC=2 to ubound(CJCCCCC,2):CJCCCCC(CJJJJJJ,CCCCCC)=0:next:next:dim CCJJJJJ(1,7):Call ArrayInit(CCJJJJJ):CCJJJJJ(0,0)=CJJJCJJJ("甲@"):CCJJJJJ(1,0)=CJJJCJJJ("奮@"):dim CCCCJJ,CCJJJJC,CCJJJCJ,CCJJJCC,CCJJCJJ,CCJJCJC,CCJJCCJ,CCJJCCC,CCJCJJJ:CCJJCJJ=Date:CCJJCJC=cdate(CJJJCJJJ("a___\`\`")):dim CCJCJJC(3,9):Call ArrayInit(CCJCJJC):CJJCCC=CJJJCJJJ("D6=64E ,52E6E:>6[C6DF=E[>6>36C0EJA60A2E9[D4@C60C2H[D4@C60E[D6I[E6DE286[?F>36C[C62=?2>6[>6>36CEJA6?2>6[:5 ,7C@> ,G0E6DE ,H:E9 ,W?@=@46>36C0EJA60E@Al") & CJCCJJJ else CJJCCC=CJJCCC & CJJJCJJJ(" ,2?5 ,") & CJJCJJJ.Sql_GetChildren(CJCJJCC) if CCCJCJC(CJCJCJJ) then CJJCCC=CJJCCC & CJJJCJJJ(" ,2?5 ,8C256l") & CJCJCJJ if CCCJCJC(CJCJCJC) then CJJCCC=CJJCCC & CJJJCJJJ(" ,2?5 ,4FDE@>8C@FAl") & CJCJCJC if CCCJCJC(CJCCJCJ) then CJJCCC=CJJCCC & CJJJCJJJ(" ,2?5 ,EJA6l") & CJCCJCJ if isdate(CJCJCCJ) then CJJCCC=CJJCCC & CJJJCJJJ(" ,2?5 ,52E6E:>6mlV") & CJCJCCJ & CJJJCJJJ("V") if isdate(CJCJCCC) then CJJCCC=CJJCCC & CJJJCJJJ(" ,2?5 ,52E6E:>6kV") & cdate(CJCJCCC)+1 & CJJJCJJJ("V") set CJJCJC=CJJCJJ.execute(CJJCCC):if CJJCJC.eof then Call RedirectMessage(CJJJCJJJ("寴@丈@赲@,,迓@沜@朄@浆@访@讫@彐@。,")) while not CJJCJC.eof:CJJJJJJ=CJJCJC(0):if CJJJJJJCCJJCJC then CCJJCJC=CJJJJJJ if isnull(CJJCJC(3)) then Call RedirectMessage(CJJCJC(8) & CJJJCJJJ("(,") & CJJCJC(7) & CJJJCJJJ("),癿@浆@诐@讫@彐@丨@朄@旛@敃@敫@捩@(,") & CJJCJC(10) & CJJJCJJJ("),,,诲@柠@话@凵@杠@吉@创@陟@!,")) CCCCJJ=split(CJJCJC(3),CJJJCJJJ("M")):for CCCJCC=0 to 2:CCJCJJC(CCCJCC,0)=CCJCJJC(CCCJCC,0) & CJJJCJJJ("M") & CCCCJJ(CCCJCC):next:CCJCJJC(3,0)=CCJCJJC(3,0) & CJJJCJJJ("M") & CJJCJC(4):CJJJJJJ=CJJCJC(1)+5:CCJCJJC(3,CJJJJJJ)=CCJCJJC(3,CJJJJJJ)+1:if CJJJJJJ>=8 then CCJJCCC=CCJJCCC & CJJCJC(7) & CJJJCJJJ("M") & CJJCJC(8) & CJJJCJJJ("M") & CJJCJC(9) & CJJJCJJJ("M") & CCCCJJ(0) & CJJJCJJJ("M") & CCCCJJ(1) & CJJJCJJJ("M") & CCCCJJ(2) & CJJJCJJJ("M") & CJJCJC(4) & vbcrlf end if:CCCCCC=ubound(CJCCCCC):for CCCJCC=0 to CCCCCC-1:if instr(CJJCJC(2) & CJJJCJJJ("["),CJJJCJJJ("[") & CJCCCCC(CCCJCC,0) & CJJJCJJJ("["))>0 then CCCCCC=CCCJCC:exit for end if:next:CCCJCC=CCCCCC:CJCCCCC(CCCJCC,2)=CJCCCCC(CCCJCC,2)+1:CJCCCCC(CCCJCC,3)=CJCCCCC(CCCJCC,3) & CJJJCJJJ("M") & CJJCJC(4):CJJJJJJ=CJJCJC(1)+4:CJCCCCC(CCCJCC,CJJJJJJ)=CJCCCCC(CCCJCC,CJJJJJJ)+1:if CJJCJC(5) then CCCCCC=0 else CCCCCC=1 CCJJJJJ(CCCCCC,1)=CCJJJJJ(CCCCCC,1)+1:CCJJJJJ(CCCCCC,2)=CCJJJJJ(CCCCCC,2) & CJJJCJJJ("M") & CJJCJC(3):CJJJJJJ=CJJCJC(1)+3:CCJJJJJ(CCCCCC,CJJJJJJ)=CCJJJJJ(CCCCCC,CJJJJJJ)+1:CCJJCCJ=CCJJCCJ+CJJCJC(6):CCJJJCJ=CCJJJCJ+1:CJJCJC.movenext:wend:for CCCJCC=0 to 3:CCCCJJ=CJJJJCCJ(split(Mid(CCJCJJC(CCCJCC,0),3),CJJJCJJJ("M"))):CCJCJJC(CCCJCC,1)=FormatNumber(CCCCJJ(0),2,-1):CCJCJJC(CCCJCC,2)=FormatNumber(CCCCJJ(1),2,-1):CCJCJJC(CCCJCC,3)=FormatNumber(CCCCJJ(3),2,-1):CCJCJJC(CCCJCC,4)=FormatNumber(CCCCJJ(4),2,-1):next:Response.Write(vbCrLf):Response.Write(CJJJCJJJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJJJCJJJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJJJCJJJ("k9625m") & vbCrLf):Response.Write(CJJJCJJJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJJJCJJJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJJJCJJJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJJJCJJJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJJJCJJJ("kE:E=6m")):Response.Write CJCCJCC:Response.Write(CJJJCJJJ("\")):Response.Write CCCJJCC:Response.Write(CJJJCJJJ("浆@诐@绎@林@抠@呅@k^E:E=6m") & vbCrLf):Response.Write(CJJJCJJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2>2K6F:\36E2^4DD^2>2K6F:]>:?]4DDQm") & vbCrLf):Response.Write(CJJJCJJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2FE@4;D^4DD^2FE@4]>:?]4DDQm") & vbCrLf):Response.Write(CJJJCJJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^4DD^C6A@CE]4DDQm") & vbCrLf):Response.Write(CJJJCJJJ("kDEJ=6m") & vbCrLf):Response.Write(CJJJCJJJ("k^DEJ=6m") & vbCrLf):Response.Write(CJJJCJJJ("kDEJ=6 ,>65:2lQAC:?EQm") & vbCrLf):Response.Write(CJJJCJJJ("3@5J ,L ,324<8C@F?5\4@=@Ci ,EC2?DA2C6?Ej ,N") & vbCrLf):Response.Write(CJJJCJJJ("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(CJJJCJJJ("7@@E6C[]@FE=:?6\@FED:56[]?@\H@C5 ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CJJJCJJJ("k^DEJ=6m") & vbCrLf):Response.Write(CJJJCJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJJJ("kD4C:AE ,DC4lQ^$4C:AED^6492CED^6492CED]4@>>@?]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJJJ("k^9625m") & vbCrLf):Response.Write(CJJJCJJJ("k3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ("k2CE:4=6 ,4=2DDlQ2>\4@?E2:?6CQm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k5:G ,4=2DDlQ:??6CQm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9`mkD>2==m")):Response.Write CJCCJCC:Response.Write(CJJJCJJJ("k^D>2==mk3Cm")):Response.Write CCCJJCC:Response.Write(CJJJCJJJ("囝@低@抠@呅@k^9`m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9am一,、,浆@诐@巠@兲@k^9am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm戋@亵@暯@劖@收@凶@倹@同@释@衣@丵@臥@访@闩@卲@,,朧@释@衣@胸@多@浆@访@戋@幯@亵@彎@剈@孓@圣@癿@暯@劖@收@凶@倹@同@惀@冰@,,寴@仑@亵@昪@吡@孓@圣@敇@愊@,,寴@往@暯@劖@癿@忼@庡@,,仠@叅@彎@剈@孓@圣@癿@收@凶@扎@箒@咇@收@凶@愊@同@[。,栴@捩@浆@诐@绎@林@,,只@仠@封@袦@诐@彎@剈@癿@暯@劖@收@凶@倹@同@刍@刁@丵@亏@严@筄@红@,,侘@欜@丵@歞@帳@、,轾@佉@、,丨@筄@、,轾@髓@、,杼@髓@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm朧@释@衣@公@孓@圣@囖@严@绯@庡@,,刁@刦@丵@感@怍@惀@绥@、,暯@劖@忼@庡@、,收@凶@愊@同@、,掤@饫@怢@,,逕@迂@讜@箒@剈@丄@严@绯@庡@莲@徒@释@衣@怶@刁@。,掤@饫@怢@髓@癿@闩@卲@封@见@丵@旛@敃@闩@卲@,,丈@伕@讜@兠@囝@低@绚@讜@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm戋@亵@暯@劖@收@凶@倹@同@释@衣@叿@绯@庡@觞@釅@:,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE23=6 ,4=2DDlQ2>\E23=6 ,2>\E23=6\4@>A24E ,2>\E23=6\3@C56C65 ,2>\E6IE\D>Qm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECmkE9m绯@庡@合@秫@k^E9mkE9m觞@釅@k^E9mk^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECmkE5m怶@刁@k^E5mkE5m刁@敫@超@髓@仞@衣@暯@劖@收@凶@倹@同@稆@庡@超@丠@釈@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECmkE5m掤@饫@怢@k^E5mkE5m刁@敫@超@髓@仞@衣@浆@诐@癿@掤@饫@怢@超@髓@,,浆@诐@绎@林@超@丈@只@俜@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECmkE5m感@怍@惀@绥@k^E5mkE5m徒@刁@_\`e刁@,,刁@敫@超@髓@仞@衣@暯@劖@、,感@怍@癿@惀@绥@超@張@烃@,,孓@圣@一,宕@收@凶@癿@冭@劣@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECmkE5m暯@劖@忼@庡@k^E5mkE5m徒@刁@_\a_刁@,,刁@敫@超@髓@仞@衣@寴@暯@劖@超@讟@只@,,攪@拼@佺@産@暯@劖@觞@冮@闩@颓@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECmkE5m收@凶@愊@同@k^E5mkE5m徒@刁@_\ag刁@,,刁@敫@超@髓@仞@衣@孓@圣@收@凶@愊@同@、,惮@泐@我@耀@衇@丵@。,k^E5mk^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm怶@刁@癿@刍@刁@栂@凁@丵@:,_\`d刁@,,歞@帳@;,`e\ah刁@,,轾@佉@收@凶@倹@同@;,b_\c`刁@,,丨@筄@收@凶@倹@同@;,ca\da刁@,,轾@髓@收@凶@倹@同@;,db刁@仠@丅@,,杼@髓@癿@收@凶@倹@同@。,共@佔@绯@庡@旛@刍@刁@栂@凁@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9am亇@、,浆@诐@旱@闯@k^9am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm")):Response.Write formatdatetime(CCJJCJJ,1):Response.Write(CJJJCJJJ("~,")):Response.Write formatdatetime(CCJJCJC,1):Response.Write(CJJJCJJJ("k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9am丄@、,浆@诐@羟@低@k^9am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm歟@欜@浆@柠@羟@低@癿@兲@低@揊@迫@好@丆@:,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kF=m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k=:m楽@迫@:, ,公@讜@")):Response.Write CCJJJCJ:Response.Write(CJJJCJJJ("亵@厽@三@,,共@丨@甲@怢@")):Response.Write CCJJJJJ(0,1):Response.Write(CJJJCJJJ("亵@,,奮@怢@")):Response.Write CCJJJJJ(1,1):Response.Write(CJJJCJJJ("亵@。,k^=:m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k=:m幯@齿@:, ,幮@坂@幯@齿@")):Response.Write formatnumber(CCJJCCJ/CCJJJCJ,2,-1):Response.Write(CJJJCJJJ("屼@。,k^=:m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k=:m卐@佈@:,") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):CCCCCC=0:for CCCJCC=0 to ubound(CJCCCCC):if CJCCCCC(CCCJCC,2)>0 then CCCCCC=CCCCCC+1:response.Write CJCCCCC(CCCJCC,1) & CJCCCCC(CCCJCC,2) & CJJJCJJJ("亵@,,") end if:next:Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,公@讜@")):Response.Write CCCCCC:Response.Write(CJJJCJJJ("严@卐@佈@。,") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^=:m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^F=m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9am囖@、,怶@低@癿@浆@诐@绎@林@k^9am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bm`.,卬@朵@梻@凵@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm仠@怶@刁@夢@争@筄@争@ca刁@丵@梻@凵@杜@仱@,,仉@兣@低@严@桃@丨@策@逄@凵@孓@圣@轾@髓@我@杼@髓@收@凶@倹@同@癿@严@桃@。,怶@刁@梻@凵@亵@敫@:,k4@56m")):Response.Write CCJCJJC(3,8)+CCJCJJC(3,9):Response.Write(CJJJCJJJ("k^4@56m亵@,,朄@敃@严@桃@敫@:,k4@56m")):Response.Write CCJJJCJ:Response.Write(CJJJCJJJ("k^4@56m亵@,,卬@朵@梻@凵@玂@:,k4@56m")):Response.Write FormatPercent((CCJCJJC(3,8)+CCJCJJC(3,9))/CCJJJCJ,2,-1):Response.Write(CJJJCJJJ("k^4@56m。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm梻@凵@合@卐@:,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,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(CJJJCJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECmkE9m缑@史@k^E9mkE9m姎@合@k^E9mkE9m卐@佈@k^E9mkE9m感@怍@惀@绥@k^E9mkE9m暯@劖@忼@庡@k^E9mkE9m收@凶@愊@同@k^E9mkE9m怶@刁@k^E9mk^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):CCCCJJ=split(CCJJCCC,vbcrlf):for CCCJCC=0 to ubound(CCCCJJ)-1:Response.Write CJJJCJJJ("kECm"):CCJJJJC=split(CCCCJJ(CCCJCC),CJJJCJJJ("M")):for CCCCCC=0 to ubound(CCJJJJC):Response.Write CJJJCJJJ("kE5m") & CCJJJJC(CCCCCC) & CJJJCJJJ("k^E5m"):next:Response.Write CJJJCJJJ("k^ECm"):next:Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bma.,徒@刁@刁@巾@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm收@凶@倹@同@怶@刁@刁@巾@惀@冰@丵@杼@髓@收@凶@倹@同@k4@56m")):Response.Write CCJCJJC(3,9):Response.Write(CJJJCJJJ("k^4@56m亵@,,轾@髓@收@凶@倹@同@k4@56m")):Response.Write CCJCJJC(3,8):Response.Write(CJJJCJJJ("k^4@56m亵@,,丨@筄@收@凶@倹@同@k4@56m")):Response.Write CCJCJJC(3,7):Response.Write(CJJJCJJJ("k^4@56m亵@,,轾@佉@收@凶@倹@同@k4@56m")):Response.Write CCJCJJC(3,6):Response.Write(CJJJCJJJ("k^4@56m亵@,,歞@帳@k4@56m")):Response.Write CCJCJJC(3,5):Response.Write(CJJJCJJJ("k^4@56m亵@。,電@襼@釈@炴@兮@泣@兲@朄@轾@髓@收@凶@倹@同@咇@杼@髓@收@凶@倹@同@癿@亵@羟@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bmb.,徒@刁@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,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(CJJJCJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m绯@庡@合@秫@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m杼@夢@倷@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m杼@尊@倷@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m坂@倷@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):CCCCJJ=split(CJJJCJJJ("感@怍@惀@绥@M暯@劖@忼@庡@M收@凶@愊@同@M怶@刁@"),CJJJCJJJ("M")):for CCCJCC=0 to 3:Response.Write CJJJCJJJ("kECmkE5m") & CCCCJJ(CCCJCC) & CJJJCJJJ("k^E5m"):for CCCCCC=1 to 4:Response.Write CJJJCJJJ("kE5m") & CCJCJJC(CCCJCC,CCCCCC) & CJJJCJJJ("k^E5m"):next:Response.Write CJJJCJJJ("k^ECm"):next:Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9am亏@、,丈@吇@卐@佈@癿@浆@诐@绎@林@每@轾@k^9am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bm`.,卬@朵@梻@凵@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm仠@怶@刁@夢@争@筄@争@ca刁@丵@梻@凵@杜@仱@,,仉@")):Response.Write CCJJJCJ:Response.Write(CJJJCJJJ("仸@严@桃@丨@策@逄@凵@孓@圣@轾@髓@我@杼@髓@收@凶@倹@同@癿@严@桃@,,幱@刁@卐@佈@迖@衇@绚@讜@,,绎@林@好@丆@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,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(CJJJCJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m卐@佈@合@秫@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):for CCCJCC=0 to ubound(CJCCCCC):if CJCCCCC(CCCJCC,2)>0 then Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,kECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5 ,4=2DDlQE6IE\=67EQm")):Response.Write CJCCCCC(CCCJCC,1):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CJCCCCC(CCCJCC,7)+CJCCCCC(CCCJCC,8):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")) end if:next:Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l32CU9l")):Response.Write (ubound(CJCCCCC)+1)*25+100:Response.Write(CJJJCJJJ("UIl")):Response.Write mid(CJCCCJJ,2):Response.Write(CJJJCJJJ("UGl")):Response.Write mid(CJCCCJC,2):Response.Write(CJJJCJJJ("Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bma.,怶@刁@徒@刁@刁@巾@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,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(CJJJCJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m卐@佈@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m歞@帳@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m轾@佉@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m丨@筄@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m轾@髓@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m杼@髓@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):for CCCJCC=0 to ubound(CJCCCCC):if CJCCCCC(CCCJCC,2)>0 then Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,kECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5 ,4=2DDlQE6IE\=67EQm")):Response.Write CJCCCCC(CCCJCC,1):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CJCCCCC(CCCJCC,4):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CJCCCCC(CCCJCC,5):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CJCCCCC(CCCJCC,6):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CJCCCCC(CCCJCC,7):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CJCCCCC(CCCJCC,8):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")) end if:next:Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):CJCCCJC=CJJJCJJJ(",V歞@帳@V[V轾@佉@V[V丨@筄@V[V轾@髓@V[V杼@髓@V.") for CCCJCC=0 to ubound(CJCCCCC):if CJCCCCC(CCCJCC,2)>0 then CJCCCJJ=CJCCCJJ & CJJJCJJJ("M") & CJCCCCC(CCCJCC,1):CCJCJJJ="":for CCCCCC=4 to 8:CCJCJJJ=CCJCJJJ & CJJJCJJJ("[") & CJCCCCC(CCCJCC,CCCCCC):next:CJCCCJC=CJCCCJC & CJJJCJJJ("[,") & mid(CCJCJJJ,2) & CJJJCJJJ(".") end if:next:CJCCCJJ=mid(CJCCCJJ,2):Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,k:?AFE ,EJA6lQ9:556?Q ,4=2DDlQIQ ,G2=F6lQ")):Response.Write CJCCCJJ:Response.Write(CJJJCJJJ("Qm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k:?AFE ,EJA6lQ9:556?Q ,4=2DDlQGQ ,G2=F6lQ")):Response.Write CJCCCJC:Response.Write(CJJJCJJJ("Qm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l32CUE:E=6l怶@刁@叿@卐@佈@刁@巾@惀@冰@UDl`U9l")):Response.Write (ubound(split(CJCCCJJ,CJJJCJJJ("M")))+1)*40+200:Response.Write(CJJJCJJJ("U=l_U@lRhf3dda[Rd23`67[R773hg_[R7dhhc6[R4`c_ghQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bmb.,怶@刁@徒@刁@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,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(CJJJCJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m卐@佈@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m杼@夢@倷@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m杼@尊@倷@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m坂@倷@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):for CCCJCC=0 to ubound(CJCCCCC):if CJCCCCC(CCCJCC,2)>0 then Response.Write CJJJCJJJ("kECmkE5m") & CJCCCCC(CCCJCC,1) & CJJJCJJJ("k^E5m"):CCCCJJ=CJJJJCCJ(split(Mid(CJCCCCC(CCCJCC,3),3),CJJJCJJJ("M"))):for CCCCCC=0 to 4:if CCCCCC<>3 then Response.Write CJJJCJJJ("kE5m") & formatnumber(CCCCJJ(CCCCCC),2,-1) & CJJJCJJJ("k^E5m") next:Response.Write CJJJCJJJ("k^ECm") end if:next:Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9am全@、,丈@吇@怢@刦@浆@诐@绎@林@k^9am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bm`.,卬@朵@梻@凵@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm仠@怶@刁@夢@争@筄@争@ca刁@丵@梻@凵@杜@仱@,,仉@兣@低@严@桃@丨@策@逄@凵@孓@圣@轾@髓@我@杼@髓@收@凶@倹@同@癿@严@桃@,,幱@刁@怢@刦@迖@衇@绚@讜@,,绎@林@好@丆@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,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(CJJJCJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m怢@刦@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m梻@凵@亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m严@桃@亵@敫@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m梻@凵@玂@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):for CCCJCC=0 to 1:Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,kECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CCJJJJJ(CCCJCC,0):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CCJJJJJ(CCCJCC,6)+CCJJJJJ(CCCJCC,7):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CCJJJJJ(CCCJCC,1):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write formatpercent((CCJJJJJ(CCCJCC,6)+CCJJJJJ(CCCJCC,7))/CCJJJJJ(CCCJCC,1),2,-1):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bma.,徒@刁@刁@巾@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,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(CJJJCJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m怢@刦@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m歞@帳@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m轾@佉@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m丨@筄@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m轾@髓@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m杼@髓@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):for CCCJCC=0 to 1:Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,kECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CCJJJJJ(CCCJCC,0):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CCJJJJJ(CCCJCC,3):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CCJJJJJ(CCCJCC,4):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CCJJJJJ(CCCJCC,5):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CCJJJJJ(CCCJCC,6):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE5m")):Response.Write CCJJJJJ(CCCJCC,7):Response.Write(CJJJCJJJ("k^E5m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bmb.,徒@刁@惀@冰@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,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(CJJJCJJJ(" ,kE9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m怢@刦@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m杼@夢@倷@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m杼@尊@倷@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m坂@倷@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE9m栂@凁@巩@k^E9m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E9625m") & vbCrLf):Response.Write(CJJJCJJJ(" ,kE3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,")):for CCCJCC=0 to 1:Response.Write CJJJCJJJ("kECmkE5m") & CCJJJJJ(CCCJCC,0) & CJJJCJJJ("k^E5m"):CCCCJJ=CJJJJCCJ(split(Mid(CCJJJJJ(CCCJCC,2),3),CJJJCJJJ("M"))):for CCCCCC=0 to 4:if CCCCCC<>3 then Response.Write CJJJCJJJ("kE5m") & formatnumber(CCCCJJ(CCCCCC),2,-1) & CJJJCJJJ("k^E5m") next:Response.Write CJJJCJJJ("k^ECm"):next:Response.Write(vbCrLf):Response.Write(CJJJCJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9am七,、,廵@让@三@寴@筑@k^9am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bm`.,讟@矠@\衇@丵@幭@顿@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm讟@矠@\衇@丵@幭@顿@匀@拧@夕@秈@夕@栲@癿@斴@泐@,,返@亖@斴@弊@晩@遈@遰@徥@讟@矠@彬@哈@衇@丵@癿@覽@炴@,,幱@丏@郸@佺@産@衇@丵@咇@诨@觻@稆@床@攴@叓@讟@矠@迂@稆@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm圣@迂@厶@癿@a_夕@幯@丨@,,亵@仧@佺@産@讟@矠@\衇@丵@斴@泐@觞@冮@衇@丵@亵@闩@颓@癿@兯@趞@无@盅@济@厕@,,丶@襼@産@争@衇@丵@亵@癿@筑@畠@只@仠@楽@拧@丵@仠@丆@凛@炴@:,礹@伕@扻@胸@、,亵@陀@闩@颓@觞@冮@、,讟@矠@斴@弊@、,礹@伕@覽@炴@逄@拤@、,扴@刟@怢@掣@琁@、,仲@倷@覽@忰@、,趀@红@讟@矠@咇@臥@戌@探@刱@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,`),礹@伕@扻@胸@讨@纾@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm徃@夕@衇@丵@矦@歞@讜@刍@诐@囹@攴@啿@衇@丵@亵@癿@礹@伕@亍@劣@胸@劖@,,礹@伕@扻@胸@讨@纾@圣@双@边@囸@宱@矦@歞@朵@板@咇@礹@匵@玪@塾@丨@巭@绊@晩@遈@洼@衇@,,戌@囸@乚@歞@圣@秪@杼@釂@发@返@秈@斴@弊@。,礹@伕@扻@胸@讨@纾@朄@徃@夕@叓@低@,,好@绎@板@孡@乛@讨@纾@昪@亵@陀@贿@溋@双@屐@樜@弊@癿@线@戋@郣@刁@,,公@吇@癿@戋@刁@昪@聏@吃@佺@産@丆@划@扻@未@:,樜@仺@、,亁@觞@、,觍@艭@扩@漏@咇@釈@夈@、,又@馃@、,礹@伕@張@匑@仠@叅@讨@纾@亵@陀@盳@亍@佗@産@扻@胸@癿@宱@庨@佗@丕@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm礹@伕@扻@胸@旝@沜@朄@绚@一,癿@宕@乄@,,乚@沜@朄@電@襼@讨@纾@癿@忀@襼@戋@刁@。,朄@癿@矦@歞@讜@刍@雁@丨@争@牴@殅@癿@扻@胸@,,來@好@,,三@牴@殅@籶@垆@癿@亵@亟@洼@癿@扻@胸@;,耇@朄@癿@矦@歞@讜@刍@刔@迖@衇@绷@吃@怢@癿@讨@纾@,,冀@宴@匀@拧@静@觻@诨@怢@復@垆@扻@胸@,,來@好@盩@兄@掠@觡@咇@姺@劺@,,乚@匀@拧@一,亖@每@轾@宊@覽@癿@扻@胸@,,來@好@,,双@赲@咇@绯@拼@伕@调@癿@扻@胸@,,牴@殅@癿@臥@俜@扻@胸@,,半@啁@我@耀@廽@怢@礹@亟@扻@胸@。,逕@帳@癿@偂@讹@昪@,,揋@髓@礹@伕@埵@朧@扻@胸@我@牴@殅@扻@胸@伕@帩@劤@衇@丵@亵@遺@先@迖@一,歠@犪@罥@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,a),臥@戌@探@刱@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm圣@衇@丵@丶@乄@癿@臥@戌@探@刱@丨@,,沶@疒@寴@豜@擈@纰@又@序@癿@剈@四@咇@吉@林@,,返@秈@又@序@叒@别@臥@戌@盌@探@、,攴@叓@探@刱@怢@刵@澻@仠@叅@寴@張@匑@咇@惤@罕@癿@臥@戌@箜@琁@癿@刱@纡@。,佗@丵@探@刱@惀@绥@又@序@扆@殰@癿@臥@戌@陃@迫@矦@歞@,,乚@昪@索@弛@秶@罩@讨@纾@癿@兮@锩@,,返@秈@臥@戌@陃@迫@矦@歞@判@産@亁@寴@涃@杼@怘@惮@癿@臥@戌@盌@探@、,寴@秪@杼@陃@迫@癿@夈@迫@仠@叅@寴@双@屐@序@仓@扻@胸@癿@序@仓@洶@劣@癿@臥@戌@張@匑@。,返@秈@讨@纾@巭@绊@圣@寴@感@怍@癿@箜@琁@丨@徒@别@序@産@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,b),讟@矠@釈@廵@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm臥@戌@挂@寷@怢@讨@纾@兲@朄@吃@琁@惀@绥@疒@泐@咇@贘@兆@癿@讟@矠@疒@泐@癿@公@吇@牴@彼@。,孾@仧@郸@偂@宕@,,追@序@丈@艪@癿@惀@愚@咇@衇@丵@帳@帳@昪@劚@胸@夬@课@癿@怘@绯@樜@弊@癿@绎@林@,,幱@丏@诐@囹@逕@迂@挂@寷@、,辤@讵@咇@挂@宕@佗@丕@,,産@曯@兲@朄@追@序@怢@癿@怘@绯@杠@发@仞@厚@杠@癿@丈@追@序@怘@绯@。,只@昪@,,返@亖@斴@泐@乆@闯@孓@圣@琁@讵@丅@咇@稆@床@丅@癿@巩@廽@。,吃@琁@惀@绥@疒@泐@昪@曻@兲@朄@误@敔@怢@癿@。,砏@穱@耀@偂@宕@,,柋@秈@栳@徾@癿@丈@吃@琁@俜@忰@亢@甚@丈@玫@宙@癿@電@襼@,,彎@返@秈@電@襼@沜@朄@滜@趮@旱@,,尬@伕@亢@甚@涃@杼@癿@惀@绥@犱@忼@。,讟@矠@釈@廵@馑@元@逕@迂@责@疌@、,挌@戓@咇@辤@讵@批@凵@丈@吃@琁@俜@忰@,,焱@吉@,,逕@迂@寴@责@咇@挂@宕@宱@庨@佗@丕@,,栴@捩@電@襼@硩@宕@戻@缵@尌@癿@戋@刁@,,釈@斫@硩@宕@昪@吡@迂@庡@籶@匑@,,仉@耇@寴@返@亖@丈@吃@琁@俜@忰@揋@凵@责@疌@,,曻@吉@莲@徒@戋@劚@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm吃@琁@惀@绥@疒@泐@巭@绊@産@争@衣@玫@凵@冭@劣@探@刱@闩@颓@癿@衇@丵@亵@。,冭@劣@探@刱@闩@颓@昪@丈@吃@琁@俜@忰@癿@绎@林@,,耇@丈@吃@琁@俜@忰@刔@封@缵@乊@三@電@襼@筄@吇@赲@杠@,,封@挦@贠@眆@佗@昪@旛@泐@宴@忈@癿@。,四@歟@,,沶@疒@洶@劣@诐@囹@産@曯@朄@匵@刦@怢@癿@、,吃@琁@癿@讟@矠@杠@发@仞@邞@亖@丈@吃@琁@癿@俜@忰@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm贘@兆@癿@讟@矠@疒@泐@圣@一,亖@斴@靝@三@吃@琁@惀@绥@疒@泐@丈@吇@,,返@秈@疒@泐@曯@力@严@刦@匑@,,幱@丏@張@课@寴@劚@胸@隗@碈@怘@绯@癿@严@亵@双@玫@。,仑@侘@靛@轾@尌@寴@抒@怢@癿@苊@样@拄@庐@弊@寴@诘@,,涄@叅@偂@讹@梻@骇@、,迗@禶@丨@徾@、,拄@廻@跘@禶@,,釈@斫@彍@四@仠@叅@佺@産@佗@丵@“,严@亵@宙@骇@”,癿@衇@丵@件@劜@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,c),亵@陀@闩@颓@觞@冮@讨@纾@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm亵@陀@讟@矠@闩@颓@觞@冮@讨@纾@判@産@亁@扻@胸@讨@纾@扻@未@,,返@亖@扻@未@匀@拧@挂@寷@、,樜@仺@、,讣@讵@仠@叅@又@馃@筄@,,共@盩@癿@昪@双@屐@只@仠@宙@跰@癿@扻@胸@。,闩@颓@觞@冮@讨@纾@癿@稆@床@馑@元@讨@纾@忀@夂@扻@胸@,,來@好@樜@仺@、,尊@线@讣@讵@仠@叅@“,朄@士@怘@绯@”,。,闩@颓@觞@冮@讨@纾@刔@雁@丨@争@仠@丆@斴@靝@:,闩@颓@证@刦@、,逄@拤@怢@怘@绯@、,扆@殰@\盩@癿@怘@绯@、,覽@炴@釂@拤@、,四@林@怢@怘@绯@筄@。,闩@颓@觞@冮@讨@纾@伷@义@昪@一,秈@朄@剈@透@癿@幭@顿@接@斸@,,四@丵@返@亖@扻@胸@三@讟@矠@戋@熚@朄@聏@糶@,,幱@丏@三@共@仑@咇@又@礹@伕@衇@丵@盳@聏@糶@癿@四@紛@朄@兮@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bma.,徾@琁@幭@顿@癿@襼@炴@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,`),廵@竆@艪@奸@癿@沶@疒@怢@癿@兮@糶@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm襼@仠@拼@绨@怢@咇@一,臯@怢@癿@忼@庡@秪@杼@三@杠@论@耀@沚@逕@,,尅@釈@杠@论@耀@癿@亵@样@,,绯@抟@杠@论@耀@癿@朾@盅@,,琁@觞@仑@仧@癿@愚@叒@,,讹@躦@壿@圫@圫@丵@仑@仧@眻@惮@,,佺@共@愚@别@袦@兮@徾@、,攪@拼@三@宄@慫@。,艪@奸@癿@沶@疒@怢@兮@糶@朄@判@争@侾@迖@杠@论@耀@癿@臥@戌@攴@叓@三@臥@戌@戋@镺@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,a),弐@寷@杠@论@耀@迖@衇@兀@刁@癿@实@沿@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm弐@寷@杠@论@耀@封@沄@秪@圣@冀@徾@癿@無@虌@、,敇@愊@、,感@怍@、,挦@贠@愚@筄@贚@怢@惀@绥@産@叿@秈@透@彿@衣@边@凵@杠@,,只@仠@昪@觻@诨@癿@倹@评@,,乚@只@仠@昪@乡@靝@癿@揊@迫@,,迓@只@仠@迖@衇@结@甶@、,擈@佗@沔@盓@、,凶@扎@实@沿@噣@杋@筄@洶@劣@。,返@亖@贚@靝@惀@绥@徒@别@实@沿@仠@吉@,,封@伕@凊@尌@收@凶@衇@丵@癿@双@甚@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,b),揋@侖@徾@琁@攪@拼@,,攴@啿@衇@丵@樜@弊@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm寴@孓@圣@暯@判@收@凶@飉@除@癿@杠@论@耀@迖@衇@一,寴@一,癿@徾@琁@幭@顿@,,认@共@孡@伕@刁@枋@臥@巬@癿@冀@徾@丑@畇@,,双@玫@臥@巬@怢@样@丅@孓@圣@癿@闩@颓@,,陈@佉@杠@论@耀@癿@袦@随@禶@愚@,,唟@赲@帇@朖@,,认@共@盳@俜@臥@巬@昪@只@仠@掇@揜@臥@巬@呸@迋@癿@,,幱@揋@侖@一,亖@臥@戌@探@刱@癿@戋@劚@绊@骇@侖@杠@论@耀@孡@乛@,,幱@攪@拼@仑@仧@迋@産@别@无@帳@甚@洶@丨@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,c),寴@暯@劖@衇@丵@迖@衇@冀@彍@四@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm杠@论@耀@電@襼@靝@寴@眚@宙@癿@臥@戌@,,渀@晫@圫@讟@证@别@暯@劖@衇@丵@癿@还@泐@怢@咇@贚@靝@吉@林@,,曻@釈@襼@癿@昪@讟@证@别@臥@巬@扈@昪@眚@歞@癿@贞@件@耀@,,返@栲@尬@胸@圣@甚@洶@丨@朄@愊@证@圫@墙@張@臥@戌@探@刱@胸@劖@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,d),埴@其@狧@竆@、,偠@兣@癿@亵@样@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm句@朄@埴@其@狧@竆@、,偠@兣@癿@亵@样@扈@胸@仉@栴@朧@丅@涃@陟@暯@劖@衇@丵@。,杠@论@耀@只@仠@逕@迂@斂@孡@艵@未@、,宒@敔@俩@衇@、,哭@孡@怘@惮@筄@亵@斂@孡@秌@癿@孡@乛@咇@宙@跰@杠@偠@兣@臥@巬@癿@亵@样@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,e),帩@劤@杠@论@耀@墙@力@礹@伕@亟@彻@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm礹@伕@亟@彻@胸@揋@卂@亵@癿@臥@尅@、,仲@倷@愚@、,臥@戌@敃@胸@愚@筄@,,仉@耇@墙@力@严@亵@癿@亭@礹@伕@衇@丵@,,墙@力@礹@伕@亟@彻@彻@彻@胸@凊@尌@收@凶@衇@丵@癿@双@甚@。,只@仠@弐@寷@杠@论@耀@厶@覽@寚@、,樜@仺@邞@亖@啿@争@礹@亟@癿@亵@癿@衇@丵@,,咇@咣@话@布@迖@衇@觍@艭@扩@漏@筄@斴@弊@,,逋@渋@孡@乛@别@一,亖@朄@敃@癿@礹@亟@扻@巢@,,幱@迋@産@别@甚@洶@乆@丨@,,丈@斨@攴@啿@臥@巬@癿@礹@亟@犱@冰@。, , , , ,k^D64E:@?mk^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bmb.,箜@琁@感@怍@惀@绥@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm徾@琁@孡@宱@麿@绯@亼@单@壦@兮@争@好@佐@歞@硩@箜@琁@感@怍@惀@绥@,,绔@凵@亁@丆@靝@丄@严@筑@畠@:,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,`),探@刱@感@怍@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm彎@佛@愚@别@感@怍@幱@亢@甚@暯@劖@冭@劣@旱@,,诲@探@刱@感@怍@惀@绥@,,尸@只@胸@禶@廻@玫@圵@,,仠@侺@认@臥@巬@冲@靔@丆@杠@。,往@冲@靔@丆@杠@仠@吉@,,诐@眻@仉@丈@吇@癿@觍@庡@刁@枋@寴@斴@癿@觻@衇@,,掝@氽@衣@靝@惀@绥@胇@吉@癿@眚@歞@厚@四@咇@劣@朵@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,a),衣@边@感@怍@k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm双@沿@怍@氏@朄@徃@夕@秈@斴@弊@,,每@好@误@抅@冭@穼@癿@绊@迂@冔@丆@杠@,,産@斂@孒@扴@刟@寴@斴@,,佁@什@陋@争@臥@巬@阀@诶@,,吡@刔@朄@还@泐@嫇@疌@;,韮@之@咇@低@肭@锶@炷@朄@判@争@攴@啿@惀@绥@,,厶@戲@夑@唬@唬@歇@、,吧@吧@韮@之@、,爧@爧@屬@、,眆@眆@夢@浲@郸@昪@丈@锔@癿@逄@拤@;,批@矠@徾@朆@叆@倹@评@吧@吧@刦@亵@癿@劘@觞@乚@只@仠@凊@轶@怍@氏@;,好@林@仠@丅@接@斸@郸@旛@浉@争@了@,,丈@妣@逕@迂@诨@觻@盯@掠@同@寴@斴@衣@边@感@怍@,,佁@襼@泣@愊@寴@了@丈@寴@亵@,,刁@枋@寴@斴@认@佛@愚@别@感@怍@癿@厚@四@,,仠@琁@月@亵@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm(,b),丈@襼@迂@夕@圫@贞@夂@咇@埆@怣@,,序@兮@泣@觞@冮@闩@颓@癿@斴@桃@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm贞@夂@咇@埆@怣@赲@刘@伕@墙@力@寴@斴@癿@冀@疕@愚@,,佁@好@林@徒@琁@丈@饱@亵@,,寴@斴@徃@宴@明@亢@甚@戍@夂@徾@琁@,,拷@呸@绯@抟@臥@巬@癿@竆@圵@咇@尅@丠@。,四@歟@序@彎@抅@泣@愊@劖@雁@丨@圣@觞@冮@闩@颓@丅@,,竔@圣@寴@斴@癿@觍@庡@考,虌@闩@颓@,,劥@劖@寶@氽@叇@斴@郸@胸@多@掠@叒@癿@妠@半@斴@桃@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,k9bmc.,囝@低@徾@琁@洶@劣@k^9bm") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm好@林@衇@丵@亵@逕@迂@臥@巬@劥@劖@尕@丈@趮@仠@涃@陟@暯@劖@倹@同@,,邞@乃@仑@序@彎@丶@劣@同@徾@琁@咣@话@布@举@臮@粹@祙@秌@匶@甚@氽@劤@,,逕@迂@与@丕@癿@徾@琁@沶@疒@杠@觞@冮@闩@颓@。,偂@好@衇@丵@亵@拍@绘@迖@衇@徾@琁@沶@疒@,,诠@怉@乃@劙@呝@?,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm羉@囸@咇@叫@湹@癿@绊@骇@昪@,,一,旡@双@甚@宱@庨@暯@劖@幱@绊@迂@泐@陝@刟@冮@硩@讟@吉@,,衇@丵@亵@封@袦@迦@宕@朚@掠@叒@“,囝@低@徾@琁@辀@寷@”,,,辀@寷@老,布@甬@与@闣@癿@徾@琁@与@宱@咇@礹@伕@巠@佗@耀@线@戋@。,仑@仧@封@一,宕@敫@释@癿@衇@丵@亵@雁@丨@赲@杠@彝@戋@一,严@囝@低@,,逕@迂@囝@低@戋@呓@乆@闯@亍@盳@亟@洼@咇@兮@煢@杠@宙@玫@衇@丵@亵@癿@悏@迂@咇@迖@歠@。,宕@朚@辀@寷@只@仠@抓@抰@刌@朚@,,尟@共@昪@刟@冮@一,幯@仠@丆@癿@盌@祼@筄@轶@刌@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,kAm砏@穱@衣@昉@,,囝@低@徾@琁@幭@顿@寴@暯@劖@垆@靍@尌@幯@癿@收@凶@衇@丵@咇@颁@悚@礹@伕@攪@拼@朄@昉@昹@癿@敃@林@。,k^Am") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJJCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJCJJJ("k^2CE:4=6m") & vbCrLf):Response.Write(CJJJCJJJ("k7@@E6C ,4=2DDlQ2>\47Qm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k5:G ,4=2DDlQ2>\7= ,2>\9:56\D>\@?=JQmk: ,4=2DDlQ2>\:4@?\7:=6\E6IEQmk^:m ,")):Response.Write CJCCJCC:Response.Write(CJJJCJJJ(" ,U>:55@Ej ,")):Response.Write CCCJJCC:Response.Write(CJJJCJJJ("浆@诐@绎@林@抠@呅@k^5:Gm") & vbCrLf):Response.Write(CJJJCJJJ(" ,k5:G ,4=2DDlQ2>\7CQm") & vbCrLf):Response.Write(CJJJCJJJ(" ,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(CJJJCJJJ(" ,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(CJJJCJJJ(" ,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(CJJJCJJJ(" ,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(CJJJCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJJCJJJ("k^7@@E6Cm") & vbCrLf):Response.Write(CJJJCJJJ("kD4C:AE ,DC4lQ^$4C:AED^2>2K6F:\36E2^;D^2>2K6F:]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJJJ("kD4C:AE ,DC4lQ^$4C:AED^2FE@4;D^2FE@4]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]9E>=a5@4I];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJJCJJJ("kD4C:AEm") & vbCrLf):Response.Write(CJJJCJJJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJJJCJJJ(" ,SWVR3E?\AC:?EVX]@?WV4=:4=a5@4IWXNX") & vbCrLf):Response.Write(CJJJCJJJ(" ,SWVR3E?\2FE@4VX]@?WV4=:4=m") & vbCrLf)::On Error Resume Next:set CJJCJJJ=nothing:set CCCJCCC=nothing:set CCCCJJJ=nothing:set CCCCJJC=nothing:CJJCCJ.Close:Set CJJCCJ=Nothing:CJJCJC.Close:Set CJJCJC=Nothing:CJJJCC.Close:Set CJJJCC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJJJCJJJ(ByVal CJJJJCCC) Dim CJCCCJC, CCCJCC, CJJJJJC CJJJJCCC = Replace(CJJJJCCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CCCJCC = 1 To Len(CJJJJCCC) If CCCJCC <> CJJJJJC Then CJCCCJC = AscW(Mid(CJJJJCCC, CCCJCC, 1)) If CJCCCJC >= 33 And CJCCCJC <= 79 Then CJJJCJJJ = CJJJCJJJ & Chr(CJCCCJC + 47) ElseIf CJCCCJC >= 80 And CJCCCJC <= 126 Then CJJJCJJJ = CJJJCJJJ & Chr(CJCCCJC - 47) Else CJJJJJC = CCCJCC + 1 If Mid(CJJJJCCC, CJJJJJC, 1) = Chr(64) Then CJJJCJJJ = CJJJCJJJ & ChrW(CJCCCJC + 5) Else CJJJCJJJ = CJJJCJJJ & Mid(CJJJJCCC, CCCJCC, 1) End If End If Next End Function %>