<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CCCJCJ, CCCJCC,CCCCJJ, CCCCJC, CCCCCJ:Set CCCJCJ = server.CreateObject(CJJCJJJJ("ps~sq]r@??64E:@?")):CCCJCJ.open Application(CJJCJJJJ("r@??64E:@?$EC:?8")):Set CCCJCC=CCCJCJ::Dim CCCCCC,CJJJJJJ,CJJJJJC,CJJJJCJ,CJJJJCC,CJJJCJJ,CJJJCJC,CJJJCCJ,CJJJCCC:Dim CJJCJJJ,CJJCJJC,CJJCJCJ,CJJCJCC,CJJCCJJ,CJJCCJC:Dim CJJCCCJ,CJJCCCC,CJCJJJJ:Dim CJCJJJC:CJCJJJC=Trim(Request.Cookies(CJJCJJJJ("!$*|t|qt#"))):if CJCJJJC="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CCCCCC>0 then
CCCCCJ=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") & CJJJJJJ & CJJCJJJJ("V ,2?5 ,:5l") & CCCCCC
set CCCCJJ=CCCJCJ.execute(CCCCCJ):If CCCCJJ.EOF Then
Call ClearMemberCookie
Else
CJJJJJC=CCCCJJ(2) & "":CJJJJCJ=CCCCJJ(3):CJJJJCC=CCCCJJ(5):CJJJCJJ=CCCCJJ(6):CJJJCJC=CCCCJJ(9):CJJJCCJ=CCCCJJ(15):CJJCJJJ=CCCCJJ(0):CJJCCCC=CCCCJJ(1):CJJCCCJ=CCCCJJ(11) & "":CJJCJJC=CCCCJJ(10) & "":CJJJCCC=CCCCJJ(12):CJJCJCJ=CCCCJJ(14):CJJCJCC=CCCCJJ(13):CJJCCJJ=CCCCJJ(7) & "":CJJCCJC=CCCCJJ(4):CJCJJJJ=CCCCJJ(8):if isnull(CJJJCCJ) then CJJJCCJ=0
if isnull(CJJJCJC) or CJJJCJC=0 then CJJJCJC=CJJJJCJ
if isnull(CJJCCJC) then CJJCCJC=0
if isnull(CJJJJCC) then CJJJJCC=0
if instr(CJJCJJJJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CJJJJJJ)>0 then Call RedirectMessage(CJJCJJJJ("弬@寁@矼@，,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,"))
Call SetMemberCookie(CCCCCC,CJJJJJJ)
End IF
end if:Sub CheckRight(CJJCJJJC):dim CJCJJCJ,CJCJJCC:if CCCCCC=0 then
Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJJCJJJJ("癶@彐@俜@恪@夬@敃@，,诲@釈@斫@癶@彐@。,"))
elseIf not CCCCCCJ(CJJCJJJC) then
Call RedirectMessage(CJJCJJJJ("朾@陋@W") & CJJCJJJC & CJJCJJJJ("X袦@祼@歝@，,诲@三@糶@绚@箜@琁@呓@聏@糶@。,"))
end if:End Sub:Function CCCCCCJ(CJJCJJJC):dim CJCJJCJ,CJCJJCC:CJCJJCC=split(CJJCJJJC,CJJCJJJJ("[")):CCCCCCJ=False:for CJCJJCJ=0 to ubound(CJCJJCC):If Mid(CJJJJJC,CJCJJCC(CJCJJCJ),1)="1" then
CCCCCCJ=True:exit function
end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CJJCJJJJ("!$*|t|qt#"))="":CCCCCC=0:CJJJCJJ=0:CJJJJJJ=Empty:CJJJJCC=0:CJJJCCJ=0:CJJJCJC=0:CJJJJCJ=0:CJJCJJJ=False:CJJCCCC=False:CJCJJJJ=Empty:End Sub:Sub CheckMemberCookie():dim CJCJCJJ,CJCJCJC,CJCJJCJ,CJCJCCJ,CJCJCCC:CJCJCJJ=split(CJCJJJC,CJJCJJJJ("]")):if ubound(CJCJCJJ)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CJCJCJJ(0)) or len(CJCJCJJ(1))<>32 or len(CJCJCJJ(2))<>32 then
Call ClearMemberCookie
else
CJCJCJC=CJCJCJJ(1):for CJCJJCJ=1 to len(CJCJCJC):CJCJCCJ=mid(CJCJCJC,CJCJJCJ,1):if isnumeric(CJCJCCJ) then CJCJCCC=CJCJCCC & CJCJCCJ
if len(CJCJCCC)=7 then exit for
next:CJCJCJC=CJCJCJJ(2):if CJCJCCC<>mid(CJCJCJC,6,7) then
Call ClearMemberCookie
else
CJCJCCJ=mid(CJCJCJC,18,10)/2:if CJCJCCJ<DateDiff(CJJCJJJJ("D"), CJJCJJJJ("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CCCCCC=Clng(CJCJCJJ(0)):CJJJJJJ=CJCJCJJ(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CJJJCCJC,CJJCJJCJ):dim CJCJJCJ,CJCJCCJ,CJCJCCC:for CJCJJCJ=1 to len(CJJCJJCJ):CJCJCCJ=mid(CJJCJJCJ,CJCJJCJ,1):if isnumeric(CJCJCCJ) then CJCJCCC=CJCJCCC & CJCJCCJ
if len(CJCJCCC)=7 then exit for
next:CJCJCCC=CJJJCCJC & CJJCJJJJ("]") & CJJCJJCJ & CJJCJJJJ("]") & Fix(10000*(Rnd+1)) & CJCJCCC & Fix(10000*(Rnd+1)) & DateDiff(CJJCJJJJ("D"), CJJCJJJJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJJCJJJJ("!$*|t|qt#"))=CJCJCCC:End Sub:::Function IIf(CJJCJJCC, CJJCJCJJ, CJJCJCJC):if isnull(CJJCJJCC) or isempty(CJJCJJCC) then
IIf = CJJCJCJC
elseif CJJCJJCC Then
IIf = CJJCJCJJ
Else
IIf = CJJCJCJC
end if:End Function:Const CCCCJCC="^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 CJCJJCJ,CJCJCCJ,CJCCJJJ:if isarray(str) then
on error resume next:CJCJJCJ=ubound(str,2):CJCCJJJ=err.number:err.clear:on error goto 0:if CJCCJJJ<>0 then
for CJCJJCJ=0 to ubound(str):if CJCJJCJ>0 then response.Write CJJCJJJJ("k3C ,^m")
response.Write CJCJJCJ & CJJCJJJJ("i ,") & str(CJCJJCJ):next
else
response.Write CJJCJJJJ("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m")
for CJCJJCJ=0 to ubound(str,2):response.Write CJJCJJJJ("kE9 ,2=:8?lV=67EVm") & CJCJJCJ & CJJCJJJJ("k^E9m")
next:response.Write CJJCJJJJ("k^ECm"):for CJCJJCJ=0 to ubound(str):response.Write CJJCJJJJ("kECmkE9m") & CJCJJCJ & CJJCJJJJ("k^E9m"):for CJCJCCJ=0 to ubound(str,2):response.Write CJJCJJJJ("kE5m") & str(CJCJJCJ,CJCJCCJ) & 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(CJJCJCCJ,CJJCJCCC):dim CJCJCJJ:CJCJCJJ=CJJCJCCJ & CJJCJJJJ("l") & CJJCJCCC & CJJCJJJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJJCJJJJ("$6E\r@@<:6"),CJCJCJJ):End Sub::::::sub ShowMessage(CJJCCJJJ):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") & CJJCCJJJ & CJJCJJJJ("k^5:Gmk^5:Gmk3Cm")
end sub:Function CJJJJJJJ(CJCCJJJ):if isnull(CJCCJJJ) or trim(CJCCJJJ)="" or not isnumeric(CJCCJJJ) then
CJJJJJJJ=false
else
Dim CJCCJJC:Set CJCCJJC = New RegExp:CJCCJJC.Pattern = CJJCJJJJ("/-5ZS"):CJCCJJC.IgnoreCase = True:CJJJJJJJ = CJCCJJC.test(CJCCJJJ):set CJCCJJC=nothing
end if:End Function:Function CJJJJJJC(CJJCCJJC):dim CJCCJCJ,CJCCJCC:CJCCJCJ=CJJCJJJJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CJJCCJJC & CJJCJJJJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJCCJCC=CCCJCJ.execute(CJCCJCJ):CJJJJJJC = CJCCJCC(0):if isnull(CJJJJJJC) then CJJJJJJC=1
CJCCJCC.close : set CJCCJCC=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CJCCCCC=nothing:set CJJJJJCJ=nothing:set CJJJJJCC=nothing:set CJJJJCJJ=nothing:CJCCJCC.close : set CJCCJCC=nothing:CCCCJC.Close : Set CCCCJC=Nothing:CCCCJJ.Close : Set CCCCJJ=Nothing:CJJJJCJC.Close : Set CJJJJCJC = Nothing:CCCJCJ.Close : Set CCCJCJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJJCCJJJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJJCJJJJ("!$*0|6DD286"),server.URLEncode(CJJCCJJJ)):Response.Redirect CJJCJJJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::::::::Sub CheckQueryTime(CJJCCJCJ,CJJCCJCC):dim str,CJCCJJJ:str=CJJCJJJJ("!$*0") & Ucase(CJJCCJCJ):if Session(str)<>"" then
CJCCJJJ=DateDiff(CJJCJJJJ("D"),Session(str),Time):if CJCCJJJ<CJJCCJCC and CJCCJJJ>0 then
Call ConnClose:Call ShowMessage(CJJCJJJJ("柠@话@闯@随@忀@顶@夢@争@ ,") & CJJCCJCC & CJJCJJJJ(" ,种@，,迓@剤@ ,") & CJJCCJCC-CJCCJJJ & CJJCJJJJ(" ,种@！,")):response.End()
else
Session.Contents.Remove(str)
end if
end if:Session(str)=Time:End Sub:::::::Sub ArrayInit(CJJCCCJJ):dim CJCJJCJ,CJCJCCJ,CJCCCJC,CJCCCCJ:on error resume next:CJCCCJC=ubound(CJJCCCJJ):CJCCCCJ=ubound(CJJCCCJJ,2):if err.number<>0 then
err.clear:for CJCJJCJ=0 to CJCCCJC:CJJCCCJJ(CJCJJCJ)=0:next
else
for CJCJJCJ=0 to CJCCCJC:for CJCJCCJ=0 to CJCCCCJ:CJJCCCJJ(CJCJJCJ,CJCJCCJ)=0:next:next
end if:End Sub:::Sub ClearCache(CJJCCCJC):Application.Contents.Remove CJJCCCJC
End Sub::Class jTree:Private CCCCCJ, CJCCCCC, CCJJJJJ, CCJJJJC,CCJJJCJ,CCJJJCC,CCJJCJJ,CCJJCJC:Private Sub Class_Initialize():CCJJJJJ = 0:CCJJJJC = 0:CCJJCJC=10:End Sub:Public Property Let Table(CJJCCCCJ):if CJJCCCCJ="" then Call RedirectMessage(CJJCJJJJ("寴@丈@赲@，,;%C66籶@宙@來@匑@旱@沜@朄@讹@罩@忀@襼@癿@屙@怢@！,"))
CCJJJCJ=CJJCCCCJ:CCJJJCC=CJJCJJJJ("!$*0") & UCase(CCJJJCJ):Call GetTreeArray:End Property:Public Property Get Table():Table=CCJJJCJ:End Property:::Private Sub GetTreeArray():Dim CJCJJCJ, CJCJCCJ, CCJJCCJ,CCJJCCC:CJCCCCC = Application(CCJJJCC):If Not IsArray(CJCCCCC) Then
CCCCCJ = CJJCJJJJ("D6=64E ,4@F?EW:5X ,7C@> ,") & CCJJJCJ:if CCJJCJJ<>"" then CCCCCJ=CCCCCJ & CJJCJJJJ(" ,H96C6 ,") & CCJJCJJ
set CCJJCCJ=CCCJCJ.execute(CCCCCJ):CCJJCCC=CCJJCCJ(0):if CCJJCCC=0 then Call RedirectMessage(CJJCJJJJ("柠@话@W") & CCJJJCJ & CJJCJJJJ("^") & CCJJCJJ & CJJCJJJJ("X沜@朄@绎@林@敫@捩@"))
CCJJJJC=CCJJCCC+CCJJCJC:ReDim CJCCCCC(CCJJJJC, 4):CCCCCJ = CJJCJJJJ("D6=64E ,:5[A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCJJJCJ & CJJCJJJJ(" ,H:E9 ,W?@=@4<X"):if CCJJCJJ<>"" then CCCCCJ=CCCCCJ & CJJCJJJJ(" ,H96C6 ,") & CCJJCJJ
CCCCCJ=CCCCCJ & CJJCJJJJ(" ,@C56C ,3J ,D@CE[:5"):set CCJJCCJ=CCCJCJ.execute(CCCCCJ):For CJCJJCJ = 1 To CCJJCCC:For CJCJCCJ = 0 To 4:CJCCCCC(CJCJJCJ, CJCJCCJ) = CCJJCCJ(CJCJCCJ):if IsNull(CJCCCCC(CJCJJCJ,4)) then CJCCCCC(CJCJJCJ,4)=0
If CJCCCCC(CJCJJCJ,2)="" then CJCCCCC(CJCJJCJ,2)=CJJCJJJJ(",穵@.")
Next:CCJJCCJ.MoveNext:Next:CCJJCCJ.Close: Set CCJJCCJ = Nothing:for CJCJJCJ=CCJJJJC-(CCJJCJC-1) to CCJJJJC:CJCCCCC(CJCJJCJ,0)=CJCJJCJ:next:Application.Lock():Application(CCJJJCC) = CJCCCCC:Application.UnLock()
else
CCJJJJC=Ubound(CJCCCCC)
End If:End Sub:::::Private Function CJJJJCCC(CJJJCCJC):dim CJCJJCJ,CCJCJJJ:CJJJJCCC=0:CCJCJJJ=CStr(CJJJCCJC):if CCJCJJJ<>"0" then
for CJCJJCJ=1 to CCJJJJC:If CStr(CJCCCCC(CJCJJCJ, 0))=CCJCJJJ Then
CJJJJCCC = CJCJJCJ:Exit For
End If:Next
end if:End Function:Public Function GetCurName(CJJJCCJC):if Cstr(CJJJCCJC)="0" then
GetCurName=CJJCJJJJ("栴@")
else
Dim CJCJJCJ,CCJJCCJ:CJCJJCJ=CJJJJCCC(CJJJCCJC):if CJCJJCJ>0 then
GetCurName=CJCCCCC(CJCJJCJ,2):if GetCurName="" then
set CCJJCCJ=CCCJCJ.execute(CJJCJJJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCJJJCJ & CJJCJJJJ(" ,H96C6 ,:5l") & CJJJCCJC):if CCJJCCJ.eof then Call RedirectMessage(CJJCJJJJ("xs（,") & CJJJCCJC & CJJCJJJJ("）,朥@批@别@"))
GetCurName=CCJJCCJ(1):Call UpdateCache(CJJJCCJC,CCJJCCJ(0),GetCurName,CCJJCCJ(2),CCJJCCJ(3)):CCJJCCJ.Close: Set CCJJCCJ = Nothing
end if
else
set CCJJCCJ=CCCJCJ.execute(CJJCJJJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCJJJCJ & CJJCJJJJ(" ,H96C6 ,:5l") & CJJJCCJC):if CCJJCCJ.eof then Call RedirectMessage(CJJCJJJJ("xs（,") & CJJJCCJC & CJJCJJJJ("）,朥@批@别@"))
GetCurName=CCJJCCJ(1):Call UpdateCache(CJJJCCJC,CCJJCCJ(0),GetCurName,CCJJCCJ(2),CCJJCCJ(3)):CCJJCCJ.Close: Set CCJJCCJ = Nothing
end if
end if:End Function:::Public Function CJJJCJJC(CJJJCCJC):Dim CJCJJCJ,CCJCJJC:CJCJJCJ=CJJJJCCC(CJJJCCJC):if CJCJJCJ=0 then
CCJCJJC=CJJJCJCJ(CJJJCCJC)
else
CCJCJJC=CJCCCCC(CJCJJCJ,3):if isnull(CCJCJJC) or CCJCJJC="" then
CCJCJJC=CJJJCJCJ(CJJJCCJC)
elseif Mid(CCJCJJC,instrrev(CCJCJJC,CJJCJJJJ("["))+1)<>CStr(CJJJCCJC) then
CCJCJJC=CJJJCJCJ(CJJJCCJC)
elseif Left(CCJCJJC,1)=CJJCJJJJ("[") then
CCJCJJC=CJJJCJCJ(CJJJCCJC)
end if
end if:CJJJCJJC=CCJCJJC:End Function:Private Function CJJJCJCJ(CJJJCCJC):dim CCJCJJJ:CCJCJJJ=CStr(CJJJCCJC):if CCJCJJJ="0" then
CJJJCJCJ=""
else
dim CCJJCCJ:set CCJJCCJ=CCCJCJ.execute(CJJCJJJJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCJJJCJ & CJJCJJJJ(" ,H96C6 ,:5l") & CJJJCCJC):if CCJJCCJ.eof then
Call UpdateCache(CJJJCCJC,"","","",""):Call RedirectMessage(CJJCJJJJ("顴@盩@（,xs：,") & CJJJCCJC & CJJCJJJJ("）,丈@孓@圣@，,诲@患@迏@囙@吉@釈@斫@擈@佗@。,"))
else
if CCJJCCJ(0)=0 then
CJJJCJCJ="0," & CJJJCCJC
else
CJJJCJCJ=CJJJCJJC(CCJJCCJ(0)) & CJJCJJJJ("[") & CJJJCCJC
end if:if CCJJCCJ(2)<>CJJJCJCJ then
CCCJCJ.execute CJJCJJJJ("FA52E6 ,") & CCJJJCJ & CJJCJJJJ(" ,D6E ,A2E9lV") & CJJJCJCJ & CJJCJJJJ("V ,H96C6 ,:5l") & CJJJCCJC
else
CJJJCJCJ=CCJJCCJ(2)
end if
end if:Call UpdateCache(CJJJCCJC,CCJJCCJ(0),CCJJCCJ(1),CJJJCJCJ,CCJJCCJ(3)):CCJJCCJ.Close: Set CCJJCCJ = Nothing
end if:End Function::::Public Function IsParent(CJJCCCCC, CJCJJJJJ):IsParent=InStr(CJJJCJJC(CJCJJJJJ) & CJJCJJJJ("["), CJJCJJJJ("[") & CJJCCCCC & CJJCJJJJ("[")) > 0:End Function::::::::Public Function Sql_GetChildren(CJJJCCJC):dim CCJCJJC:CCJCJJC=CJJJCJJC(CJJJCCJC):Sql_GetChildren = CCJJJCJ & CJJCJJJJ("0A2E9ZV[V ,=:<6 ,V") & CCJCJJC & CJJCJJJJ("[TV")
End Function::::::::::Public Sub ClearCache():Application.Contents.Remove CCJJJCC
End Sub:Public Sub UpdateCache(CJJJCCJC,CJCJJJJC,CJCJJJCJ,CCJCJJC,CJCJJJCC):dim CJCJJCJ,CJCJCCJ:CJJJCCJC=CLng(CJJJCCJC):CJCJJCJ=CJJJJCCC(CJJJCCJC):if CJCJJJJC="" and CJCJJJCJ="" and CCJCJJC="" and CJCJJJCC="" then
if CJCJJCJ>0 then
for CJCJCCJ=1 to 4:CJCCCCC(CJCJJCJ,CJCJCCJ)=Null:next
end if
else
if CJCJJCJ=0 then
for CJCJCCJ=1 to CCJJJJC:if CJCCCCC(CJCJCCJ,1) & ""="" then
CJCJJCJ=CJCJCCJ:exit for
end if:next
end if:if CJCJJCJ=0 then
Call ClearCache
else
CJCCCCC(CJCJJCJ,0)=CLng(CJJJCCJC):if CJCJJJJC<>"" then CJCCCCC(CJCJJCJ,1)=CLng(CJCJJJJC)
if CJCJJJCJ<>"" then CJCCCCC(CJCJJCJ,2)=CJCJJJCJ
if CCJCJJC<>"" then CJCCCCC(CJCJJCJ,3)=CCJCJJC
if CJCJJJCC<>"" then CJCCCCC(CJCJJCJ,4)=CLng(CJCJJJCC)
end if
end if:if CJCJJCJ>0 then
Application.Lock():Application(CCJJJCC) = CJCCCCC:Application.UnLock()
end if:End Sub:Private Sub Debug(CJJCCJJJ):Call ConnClose:Response.Write CJJCCJJJ:Response.End:End Sub:Private Function CJJJJJJC():CJJJJJJC=CJJJCCCJ+1:End Function:Private Function CJJJCCCJ():dim CJCCJCC:set CJCCJCC=CCCJCJ.execute(CJJCJJJJ("D6=64E ,E@A ,` ,:5 ,7C@> ,") & CCJJJCJ & CJJCJJJJ(" ,@C56C ,3J ,:5 ,56D4")):CJJJCCCJ=CJCCJCC(0):CJCCJCC.Close: Set CJCCJCC = Nothing:End Function:Private Sub Class_Terminate():End Sub:End Class::Const CCCCCJJ=182:Const CCCCCJC="成都市中小学生心理健康问卷":Call CheckRight("54,81"):Call CheckQueryTime(CJJCJJJJ("%6DE0#6A@CE"),30):dim CCJCJCJ,CCJCJCC,CCJCCJJ,CCJCCJC,CCJCCCJ,CCJCCCC:CCJCCCC=Request.QueryString(CJJCJJJJ("$49@@=")):CCJCJCJ=Request.QueryString(CJJCJJJJ("s6AE")):CCJCJCC=Request.QueryString(CJJCJJJJ("vC256")):CCJCCJJ=Request.QueryString(CJJCJJJJ("vC@FA")):CCJCCJC=Request.QueryString(CJJCJJJJ("E`")):CCJCCCJ=Request.QueryString(CJJCJJJJ("Ea")):if not CJJJJJJJ(CCJCJCJ) then Call RedirectMessage(CJJCJJJJ("寴@丈@赲@，,糶@绚@厽@敫@丝@夬@。,"))
dim CJCCCCC:set CJCCCCC=new jtree:CJCCCCC.table=CJJCJJJJ(">6>36C0EJA6"):if not CJCCCCC.IsParent(CJJJJCJ,CCJCJCJ) then Call RedirectMessage(CJJCJJJJ("诠@苾@囯@W") & CCJCJCJ & CJJCJJJJ("X丈@圣@患@W") & CJJJJCJ & CJJCJJJJ("X癿@箜@琁@苾@囯@冀@。,"))
dim CJCJJCC,CCCJJJJ,CCCJJJC,CCCJJCJ:dim CJCJJCJ,CJCJCCJ,CJCJCCC,CCCJJCC:dim CCCJCJJ:CCCJCJJ=split(CJJCJJJJ("抌@邼@M無@虌@M孟@狧@M怶@低@徾@琁@偠@庲@M甚@洶@滜@愊@庡@M秪@杼@\涃@杼@惀@愚@M丶@覽@平@禊@愚@M闩@颓@衇@丵@"),CJJCJJJJ("M")):dim CCCJCJC:CCCJCJC=CJCCCCC.GetCurName(CCJCJCJ):dim CCCJCCJ(3,28):Call ArrayInit(CCCJCCJ):CCCJCCJ(0,0)=CJJCJJJJ("尊@孡@"):CCCJCCJ(0,1)="14375,6150,68640,68641,6201,5494,68619,68620,8104,8116,6782,6764,68625,12295,68649,68650,6887,6891,6975,6966,8215,8212,14571,13965,68616,6823,69256,69257,68626,68627,20798,7251,68662,68663,68601,68602,20459,68633,16681,68623,68644,68655,68656,69696,69700,17591,69408,69409,28340,28359,7541":CCCJCCJ(1,0)=CJJCJJJJ("刘@丨@"):CCCJCCJ(1,1)=CJJCJJJJ("ege_h[agdbd[`cdhc[`cdfc[ege`b[ege`c[egea`[dg`g[g_fc[g_hb[efdd[fggb[fafh[fag_[eged`[gaca[eggc[egebe[egebh[ehbg[gaaa[egeaa[a_f_b[`cdgg[ehadc[ehadd[egeag[egeah[facc[egebd[egeec[dffdg[ege_b[ege_c[`hhd`[egebc[`eeha[`eegh[egece[`hhda[egedf[egedg[egfd`[a_dd`[f__dd[f__ee[dagde[dagdf[f__dh[f_afh[f_ag_[f_f`f[f_f`g[ehb`f[ehb`g[eeafb[egcha[f`__b[f`__c[ehhg`[f___a[ehf_h[ehf`a[b_bcf[f_`af[f_`b`[f__fb[f__fe[f_c_e[f_c_f[dhedf[efcg[egeca"):CCCJCCJ(2,0)=CJJCJJJJ("髓@丨@"):CCCJCCJ(2,1)="68610,68611,14594,68643,6162,5697,5822,68648,8072,6750,6747,7272,7276,68652,68653,6878,6937,6935,8220,8219,20711,14591,6811,6810,69251,69252,68630,68631,7242,7252,19966,19086,68605,68606,20421,19510,16686,16684,68647,196,68659,68660,68753,68755,69445,70278,70719,70720,69319,69320,50079,50080,71005,71006,17587,69747,69691,69694,70136,70139,70148,70149,70408,70409":CCCJCCJ(3,0)=CJJCJJJJ("聇@髓@"):CCCJCCJ(3,1)="68612,14584,6167,5813,8080,6749,7278,68654,68637,6990,8221,68638,6815,69253,68632,20805,19085,68607,20417,68624,9302,68661,26896,27762,68758":for CJCJJCJ=0 to 3:CCCJCCJ(CJCJJCJ,1)=split(CCCJCCJ(CJCJJCJ,1),CJJCJJJJ("[")):next:dim CCCJCCC(7,2):Call ArrayInit(CCCJCCC):CJCJJCC=Array(37.94,8.11,6.43,52.47,23.31,39.36,62.67,22.18):for CJCJJCJ=0 to ubound(CCCJCCC):CCCJCCC(CJCJJCJ,2)=CJCJJCC(CJCJJCJ):next:dim CCCCJJJ(1,25):Call ArrayInit(CCCCJJJ):CCCCJJJ(0,0)=CJJCJJJJ("甲@"):CCCCJJJ(1,0)=CJJCJJJJ("奮@"):dim CCCCJJC,CCCCJCJ:CCCCJJC=Date:CCCCJCJ=cdate(CJJCJJJJ("a___\`\`")):CCCCCJ=CJJCJJJJ("D6=64E ,52E6E:>6[D4@C60C2H[>6>36C0EJA60A2E9[D6I[>6>36C ,7C@> ,G0E6DE ,H:E9 ,W?@=@4<X ,H96C6 ,=3l") & CCCCCJJ & CJJCJJJJ(" ,2?5 ,G2=:5l`"):if cstr(CCJCJCJ)=cstr(CCJCCCC) then CCCCCJ=CCCCCJ & CJJCJJJJ(" ,2?5 ,>6>36C0EJA60E@Al") & CCJCCCC else CCCCCJ=CCCCCJ & CJJCJJJJ(" ,2?5 ,") & CJCCCCC.Sql_GetChildren(CCJCJCJ)
if CJJJJJJJ(CCJCJCC) then CCCCCJ=CCCCCJ & CJJCJJJJ(" ,2?5 ,8C256l") & CCJCJCC
if CJJJJJJJ(CCJCCJJ) then CCCCCJ=CCCCCJ & CJJCJJJJ(" ,2?5 ,4FDE@>8C@FAl") & CCJCCJJ
if isdate(CCJCCJC) then CCCCCJ=CCCCCJ & CJJCJJJJ(" ,2?5 ,52E6E:>6mlV") & CCJCCJC & CJJCJJJJ("V")
if isdate(CCJCCCJ) then CCCCCJ=CCCCCJ & CJJCJJJJ(" ,2?5 ,52E6E:>6kV") & cdate(CCJCCCJ)+1 & CJJCJJJJ("V")
CCCCCJ=CCCCCJ & CJJCJJJJ(" ,@C56C ,3J ,:5"):set CCCCJJ=CCCJCJ.execute(CCCCCJ):if CCCCJJ.eof then Call RedirectMessage(CJJCJJJJ("寴@丈@赲@，,迓@沜@朄@浆@访@讫@彐@！,"))
while not CCCCJJ.eof:CJCJCCC=CCCCJJ(0):if CJCJCCC<CCCCJJC then CCCCJJC=CJCJCCC
if CJCJCCC>CCCCJCJ then CCCCJCJ=CJCJCCC
CCCJJJC=CCCCJJ(2) & CJJCJJJJ("["):CCCJJCJ=-1:for CJCJJCJ=0 to 3:CJCJJCC=CCCJCCJ(CJCJJCJ,1):for CJCJCCJ=0 to ubound(CJCJJCC):if instr(CCCJJJC,CJJCJJJJ("[") & CJCJJCC(CJCJCCJ) & CJJCJJJJ("["))>0 then
CCCJJCJ=CJCJJCJ:exit for
end if:next:if CCCJJCJ>=0 then exit for
next:CJCJCCC=IIf(CCCCJJ(3),2,3):if CCCJJCJ=-1 then Call RedirectMessage(CJJCJJJJ("伕@呓@xs：,") & CCCCJJ(4) & CJJCJJJJ("（,跪@彿@：,") & CCCCJJ(2) & CJJCJJJJ("）, ,沜@朄@孡@殰@敫@捩@，,诲@梻@柠@。,"))
CCCJCCJ(CCCJJCJ,CJCJCCC)=CCCJCCJ(CCCJJCJ,CJCJCCC)+1:CJCJJCC=split(CCCCJJ(1),CJJCJJJJ("M")):for CJCJJCJ=0 to 7:CJCJJCC(CJCJJCJ)=cint(CJCJJCC(CJCJJCJ)):CCCJCCC(CJCJJCJ,0)=CCCJCCC(CJCJJCJ,0)+CJCJJCC(CJCJJCJ):next:for CJCJJCJ=0 to 7:CJCJCCC=CJCJJCJ+5:CCCJCCJ(CCCJJCJ,CJCJCCC)=CCCJCCJ(CCCJJCJ,CJCJCCC)+CJCJJCC(CJCJJCJ):CJCJCCC=CJCJJCJ+21:CCCJCCJ(CCCJJCJ,CJCJCCC)=CCCJCCJ(CCCJJCJ,CJCJCCC) & CJJCJJJJ("[") & CJCJJCC(CJCJJCJ):next:CJCJCCJ=IIf(CCCCJJ(3),0,1):CCCCJJJ(CJCJCCJ,1)=CCCCJJJ(CJCJCCJ,1)+1:for CJCJJCJ=0 to 7:CJCJCCC=CJCJJCJ+2:CCCCJJJ(CJCJCCJ,CJCJCCC)=CCCCJJJ(CJCJCCJ,CJCJCCC)+CJCJJCC(CJCJJCJ):CJCJCCC=CJCJJCJ+18:CCCCJJJ(CJCJCCJ,CJCJCCC)=CCCCJJJ(CJCJCCJ,CJCJCCC) & CJJCJJJJ("[") & CJCJJCC(CJCJJCJ):next:CCCJJJJ=CCCJJJJ+1:CCCCJJ.movenext:wend:for CJCJJCJ=0 to 3:CCCJCCJ(CJCJJCJ,4)=CCCJCCJ(CJCJJCJ,2)+CCCJCCJ(CJCJJCJ,3):for CJCJCCJ=0 to 7:if CCCJCCJ(CJCJJCJ,4)>0 then CCCJCCJ(CJCJJCJ,CJCJCCJ+13)=formatnumber(CCCJCCJ(CJCJJCJ,CJCJCCJ+5)/CCCJCCJ(CJCJJCJ,4),2,-1)
CCCJCCJ(CJCJJCJ,CJCJCCJ+21)=mid(CCCJCCJ(CJCJJCJ,CJCJCCJ+21),3):next:next:for CJCJJCJ=0 to 7:CCCJCCC(CJCJJCJ,1)=formatnumber(CCCJCCC(CJCJJCJ,0)/CCCJJJJ,2,-1):next:for CJCJJCJ=0 to 1:for CJCJCCJ=0 to 7:CCCCJJJ(CJCJJCJ,CJCJCCJ+10)=formatnumber(CCCCJJJ(CJCJJCJ,CJCJCCJ+2)/CCCCJJJ(CJCJJCJ,1),2,-1):CCCCJJJ(CJCJJCJ,CJCJCCJ+18)=mid(CCCCJJJ(CJCJJCJ,CJCJCCJ+18),3):next:next: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  CCCJCJC:Response.Write(CJJCJJJJ("\")):Response.Write  CCCCCJC: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 ,9C67lQDEJ=6]4DDQm") & 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[]2FE@4;D[]?@\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]4@>>@?]>:?];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  CCCJCJC:Response.Write(CJJCJJJJ("k^D>2==mk3Cm")):Response.Write  CCCCCJC:Response.Write(CJJCJJJJ("浆@诐@绎@林@抠@呅@k^9`m") & 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(" ,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(" ,kE9 ,4=2DDlQ2>\E6IE\=67EQm盌@浆@挂@栂@k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE9 ,4=2DDlQ2>\E6IE\=67EQm盌@浆@巠@兲@杠@溋@叅@共@俜@庡@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(" ,kE5 ,C@HDA2?lQeQ ,4=2DDlQ2>\E6IE\>:55=6Qm徾@琁@偠@庲@k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,C@HDA2?lQbQ ,4=2DDlQ2>\E6IE\=67E ,2>\E6IE\>:55=6Qm怶@低@徾@琁@偠@庲@k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,4=2DDlQ2>\E6IE\=67EQm儺@章@無@虌@怢@惀@绥@隗@碈@策@柠@衣@（,_]gh）,k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,4=2DDlQ2>\E6IE\=67EQm儺@章@抌@邼@隗@碈@臥@访@释@衣@（,_]fb）,k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,4=2DDlQ2>\E6IE\=67EQm孟@狧@释@衣@（,_]hc）,k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,C@HDA2?lQaQ ,4=2DDlQ2>\E6IE\=67E ,2>\E6IE\>:55=6Qm丶@覽@平@禊@愚@k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,4=2DDlQ2>\E6IE\=67EQm甚@洶@滜@愊@庡@释@衣@（,_]ge）,k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,4=2DDlQ2>\E6IE\=67EQm秪@杼@惀@愚@涃@杼@惀@愚@释@衣@（,_]gd）,k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,4=2DDlQ2>\E6IE\=67EQm闩@颓@衇@丵@k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,4=2DDlQ2>\E6IE\=67EQm儺@章@靍@尌@幯@闩@颓@衇@丵@闩@卲@（,_]gf）,k^E5m") & 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(" ,k9am亇@、,浆@诐@旱@闯@k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm")):Response.Write  formatdatetime(CCCCJJC,1):Response.Write(CJJCJJJJ("～,")):Response.Write  formatdatetime(CCCCJCJ,1):Response.Write(CJJCJJJJ("k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9am丄@、,浆@诐@羟@低@k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm")):Response.Write  CCCJCJC:Response.Write(CJJCJJJJ("丨@尊@孡@孡@甚@")):Response.Write  CCCJJJJ:Response.Write(CJJCJJJJ("亵@。,兲@低@刁@巾@惀@冰@覼@丆@衣@：,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(" ,")):for CJCJJCJ=0 to 3:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,C@HDA2?lQaQ ,4=2DDlQ2>\E6IE\>:55=6Qm")):Response.Write  CCCJCCJ(CJCJJCJ,0):Response.Write(CJJCJJJJ("k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m甲@k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m")):Response.Write  CCCJCCJ(CJCJJCJ,2):Response.Write(CJJCJJJJ("k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m奮@k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m")):Response.Write  CCCJCCJ(CJCJJCJ,3):Response.Write(CJJCJJJJ("k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):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(" ,k9am囖@、,怶@低@癿@浆@诐@绎@林@k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm叿@严@四@孋@徒@刁@癿@幮@坂@敫@k^Am") & 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(" ,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 CJCJJCJ=0 to 7:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m")):Response.Write  CJCJJCJ+1:Response.Write(CJJCJJJJ("k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m")):Response.Write  CCCJCJJ(CJCJJCJ):Response.Write(CJJCJJJJ("k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m")):Response.Write  CCCJCCC(CJCJJCJ,1):Response.Write(CJJCJJJJ("k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m")):Response.Write  CCCJCCC(CJCJJCJ,2):Response.Write(CJJCJJJJ("k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@衣@样@只@矠@，,夢@邌@厺@孡@甚@圣@“,抌@邼@”,、,“,無@虌@”,、,“,孟@狧@”,、,“,怶@低@徾@琁@偠@庲@”,、,“,闩@颓@衇@丵@”,丅@癿@徒@刁@髓@争@戋@郸@巽@幮@坂@氯@幮@；,圣@“,甚@洶@滜@愊@庡@”,、,“,秪@杼@\涃@杼@惀@愚@”,、,“,丶@覽@平@禊@愚@”,丅@癿@徒@刁@佉@争@戋@郸@巽@幮@坂@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm返@误@昉@，,夢@邌@厺@孡@甚@癿@抌@邼@氯@幮@、,無@虌@氯@幮@、,孟@狧@氯@幮@襼@髓@争@戋@郸@巽@幮@坂@氯@幮@，,怶@低@徾@琁@偠@庲@犱@冰@襼@巩@争@戋@郸@巽@幮@坂@氯@幮@；,甚@洶@滜@愊@庡@、,秪@杼@惀@愚@氯@幮@、,丶@覽@平@禊@愚@氯@幮@襼@佉@争@戋@郸@巽@幮@坂@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9am亏@、,丈@吇@孡@殰@孡@甚@癿@浆@诐@绎@林@每@轾@k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD64E:@?m") & 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=2DDlQ2>\E6IE\>:55=6Qm四@孋@k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CJCJJCJ=0 to 3:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m")):Response.Write  CCCJCCJ(CJCJJCJ,0):Response.Write(CJJCJJJJ("k3Cm（,")):Response.Write  CCCJCCJ(CJCJJCJ,4):Response.Write(CJJCJJJJ("亵@）,k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m昪@吡@巩@廽@昹@葒@k3Cm（,!k_]_d）,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 CJCJJCJ=0 to 7:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m")):Response.Write  CCCJCJJ(CJCJJCJ):Response.Write(CJJCJJJJ("k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CJCJCCJ=0 to 3:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m")):Response.Write  CCCJCCJ(CJCJCCJ,CJCJJCJ+13):Response.Write(CJJCJJJJ("k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,4=2DDlQA\G2=F6Qmk:?AFE ,EJA6lQ9:556?Q ,G2=F6lQ")):Response.Write  CCCJCCJ(0,CJCJJCJ+21) & CJJCJJJJ("M") & CCCJCCJ(1,CJCJJCJ+21) & CJJCJJJJ("M") & CCCJCCJ(2,CJCJJCJ+21) & CJJCJJJJ("M") & CCCJCCJ(3,CJCJJCJ+21):Response.Write(CJJCJJJJ("Qmk^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CJCJJCJ=0 to 7:CCCJJCC="":for CJCJCCJ=0 to 3:CCCJJCC=CCCJJCC & CJJCJJJJ("M") & CCCJCCJ(CJCJCCJ,CJCJJCJ+13):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k9bm【,")):Response.Write  CCCJCJJ(CJCJJCJ):Response.Write(CJJCJJJJ("】,k^9bm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lQ^$4C:AED^492CE];Dn4l4@=F>?UHldd_U9lb__U=l_UIl尊@孡@M刘@丨@M髓@丨@M聇@髓@UGl")):Response.Write  mid(CCCJJCC,2):Response.Write(CJJCJJJJ("U>l`Qmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kA ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm【,礵@來@】,囖@严@孡@殰@癿@孡@甚@圣@诠@四@孋@丅@癿@徒@刁@圣@绚@讜@孡@丅@巩@廽@昹@葒@。,兲@低@杠@眆@，,尊@孡@甚@癿@徒@刁@襼@昹@葒@髓@争@共@仑@丄@严@孡@殰@孡@甚@癿@。,返@误@昉@，,尊@孡@甚@癿@抌@邼@氯@幮@盳@寴@每@轾@釈@，,耇@刘@丨@甚@、,髓@丨@甚@咇@聇@髓@甚@癿@抌@邼@氯@幮@盳@寴@轾@轶@。,返@揋@礵@，,襼@力@夢@寴@尊@孡@甚@癿@兮@徾@咇@徾@琁@辀@寷@，,帩@劤@仑@仧@之@覽@圫@眆@往@闩@颓@，,逋@渋@陈@佉@抌@邼@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^D64E:@?m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k9am全@、,丈@吇@怢@刦@孡@甚@癿@浆@诐@绎@林@每@轾@k^9am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kD64E:@?m") & 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(" ,kE9m四@孋@k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CJCJJCJ=0 to 1:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m")):Response.Write  CCCCJJJ(CJCJJCJ,0):Response.Write(CJJCJJJJ("（,")):Response.Write  CCCCJJJ(CJCJJCJ,1):Response.Write(CJJCJJJJ("亵@）,k^E9m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE9m昪@吡@巩@廽@昹@葒@（,!k_]_d）,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 CJCJJCJ=0 to 7:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m")):Response.Write  CCCJCJJ(CJCJJCJ):Response.Write(CJJCJJJJ("k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):for CJCJCCJ=0 to 1:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE5m")):Response.Write  CCCCJJJ(CJCJCCJ,CJCJJCJ+10):Response.Write(CJJCJJJJ("k^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kE5 ,4=2DDlQA\G2=F6Qmk:?AFE ,EJA6lQ9:556?Q ,G2=F6lQ")):Response.Write  CCCCJJJ(0,CJCJJCJ+18) & CJJCJJJJ("M") & CCCCJJJ(1,CJCJJCJ+18):Response.Write(CJJCJJJJ("Qmk^E5m") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):next:Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,k^E3@5Jm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJJCJJJJ(" ,")):CCCJJCC=CJJCJJJJ(","):for CJCJJCJ=0 to 1:if CJCJJCJ>0 then CCCJJCC=CCCJJCC & CJJCJJJJ("[")
CCCJJCC=CCCJJCC & CJJCJJJJ("LQ?2>6QiQ") & CCCCJJJ(CJCJJCJ,0) & CJJCJJJJ("Q[Q52E2Qi,"):for CJCJCCJ=0 to 7:if CJCJCCJ>0 then CCCJJCC=CCCJJCC & CJJCJJJJ("[")
CCCJJCC=CCCJJCC & CCCCJJJ(CJCJJCJ,CJCJCCJ+10):next:CCCJJCC=CCCJJCC & CJJCJJJJ(".N"):next:CCCJJCC=CCCJJCC & CJJCJJJJ("."):Response.Write(vbCrLf):Response.Write(CJJCJJJJ(" ,kD4C:AE ,DC4lV^$4C:AED^492CE];Dn4l4@=F>?UHldd_UClb_U=l_UIl")):Response.Write  join(CCCJCJJ,CJJCJJJJ("[")):Response.Write(CJJCJJJJ("UGl")):Response.Write  CCCJJCC:Response.Write(CJJCJJJJ("Vmk^D4C:AEm") & vbCrLf):Response.Write(CJJCJJJJ(" ,k5:G ,4=2DDlQ2>\E6IE\AC:>2CJ ,2>\<2:Qm") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm【,礵@來@】,甬@丅@靝@癿@囹@衣@只@矠@，,甲@甚@咇@奮@甚@圣@“,抌@邼@”,、,“,怶@低@徾@琁@偠@庲@”,、,“,闩@颓@衇@丵@”,丅@癿@徒@刁@圣@绚@讜@孡@丅@巩@廽@昹@葒@，,圣@“,無@虌@”,、,“,孟@狧@”,、,“,甚@洶@滜@愊@庡@”,、,“,秪@杼@\涃@杼@惀@愚@”,、,“,丶@覽@平@禊@愚@”,丅@癿@徒@刁@圣@绚@讜@孡@丅@巩@廽@丈@昹@葒@。,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm圣@“,抌@邼@”,、,“,怶@低@徾@琁@偠@庲@”,斴@靝@，,甲@甚@癿@徒@刁@昹@葒@髓@争@奮@甚@癿@。,返@误@昉@，,甲@甚@癿@抌@邼@氯@幮@襼@每@奮@甚@曯@力@丠@釈@，,怶@低@徾@琁@偠@庲@氯@幮@襼@每@奮@甚@曯@巩@。,返@揋@礵@，,序@诠@寴@甲@甚@夕@力@兮@泣@咇@辀@寷@，,帩@劤@仑@仧@陈@佉@抌@邼@癿@氯@幮@，,揋@髓@徾@琁@偠@庲@癿@氯@幮@。,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm圣@“,闩@颓@衇@丵@”,斴@靝@，,甲@甚@癿@徒@刁@昹@葒@髓@争@奮@甚@癿@。,返@误@昉@甲@甚@癿@闩@颓@衇@丵@襼@每@奮@甚@曯@夕@。,返@揋@礵@，,序@诠@寴@甲@甚@夕@力@敔@肭@咇@弐@寷@，,帩@劤@仑@仧@攴@啿@丈@艪@癿@衇@丵@乛@惪@。,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,kAm圣@“,無@虌@”,、,“,孟@狧@”,、,“,甚@洶@滜@愊@庡@”,、,“,秪@杼@\涃@杼@惀@愚@”,、,“,丶@覽@平@禊@愚@”,斴@靝@，,甲@甚@咇@奮@甚@癿@衣@玫@埵@朧@巩@丈@夕@，,卮@甲@甚@咇@奮@甚@癿@無@虌@氯@幮@、,孟@狧@愚@、,甚@洶@滜@愊@庡@、,秪@杼@惀@愚@氯@幮@、,丶@覽@平@禊@愚@氯@幮@夢@臯@盳@吇@。,k^Am") & vbCrLf):Response.Write(CJJCJJJJ(" ,k^5:Gm") & 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  CCCJCJC:Response.Write(CJJCJJJJ(" ,U>:55@Ej ,")):Response.Write  CCCCCJC: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^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(" ,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(" ,^^ ,刁@枋@斂@孒@揋@礵@") & vbCrLf):Response.Write(CJJCJJJJ(" ,SWV]2>\E6IE\AC:>2CJVX]A@A@G6CWL") & vbCrLf):Response.Write(CJJCJJJJ(" ,4@?E6?EiV揋@礵@：,诠@斂@朧@幱@静@钃@寴@栲@朧@癿@宙@陀@刁@枋@，,句@昪@栲@來@，,诲@俘@孓@丵@(@C5斂@桞@吉@臥@衇@俩@攴@斂@孒@。,V[") & vbCrLf):Response.Write(CJJCJJJJ(" ,EC:886CiV9@G6CV[") & vbCrLf):Response.Write(CJJCJJJJ(" ,E96>6iV52?86C ,D>V") & vbCrLf):Response.Write(CJJCJJJJ(" ,NX") & vbCrLf):Response.Write(CJJCJJJJ(" ,^^ ,讜@箒@!倷@") & vbCrLf):Response.Write(CJJCJJJJ(" ,G2C ,AC@8C6DD ,l ,S]p|&x]AC@8C6DD") & vbCrLf):Response.Write(CJJCJJJJ(" ,SW5@4F>6?EX]2;2I$E2CEW7F?4E:@?WX ,LAC@8C6DD]DE2CEWXNX") & vbCrLf):Response.Write(CJJCJJJJ(" ,SW5@4F>6?EX]2;2I$E@AW7F?4E:@?WX ,LAC@8C6DD]5@?6WXNX") & vbCrLf):Response.Write(CJJCJJJJ(" ,SWVE5]A\G2=F6VX]6249W7F?4E:@?WXL") & vbCrLf):Response.Write(CJJCJJJJ(" ,G2C ,SE5lSWE9:DX") & vbCrLf):Response.Write(CJJCJJJJ(" ,G2C ,5lSE5]49:=5C6?WV:?AFEVX]G2=WX") & vbCrLf):Response.Write(CJJCJJJJ(" ,S]A@DEWV^2A:^!0'2=F6]2D9IV[L5i5N[7F?4E:@?W;D@?XL") & vbCrLf):Response.Write(CJJCJJJJ(" ,AC@8C6DD]:?4WX") & vbCrLf):Response.Write(CJJCJJJJ(" ,:7W;D@?]4@56lll_XLSE5]E6IEW;D@?]52E2k_]_dnV昪@ViV吡@VXN") & vbCrLf):Response.Write(CJJCJJJJ(" ,6=D6LSE5]E6IEWV\VXN") & vbCrLf):Response.Write(CJJCJJJJ(" ,NX") & 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 CJCCCCC=nothing:set CJJJJJCJ=nothing:set CJJJJJCC=nothing:set CJJJJCJJ=nothing:CCCCJC.Close:Set CCCCJC=Nothing:CCCCJJ.Close:Set CCCCJJ=Nothing:CCCJCJ.Close:Set CCCJCJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CJJCJJJJ(ByVal CJJJCCCC)
Dim CCCJJCC, CJCJJCJ, CJCCJJJ
CJJJCCCC = Replace(CJJJCCCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CJCJJCJ = 1 To Len(CJJJCCCC)
If CJCJJCJ <> CJCCJJJ Then
CCCJJCC = AscW(Mid(CJJJCCCC, CJCJJCJ, 1))
If CCCJJCC >= 33 And CCCJJCC <= 79 Then
CJJCJJJJ = CJJCJJJJ & Chr(CCCJJCC + 47)
ElseIf CCCJJCC >= 80 And CCCJJCC <= 126 Then
CJJCJJJJ = CJJCJJJJ & Chr(CCCJJCC - 47)
Else
CJCCJJJ = CJCJJCJ + 1
If Mid(CJJJCCCC, CJCCJJJ, 1) = Chr(64) Then CJJCJJJJ = CJJCJJJJ & ChrW(CCCJJCC + 5) Else CJJCJJJJ = CJJCJJJJ & Mid(CJJJCCCC, CJCJJCJ, 1)
End If
End If
Next
End Function
%>