<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CCCJCJ, CCCJCC,CCCCJJ, CCCCJC, CCCCCJ:Set CCCJCJ = server.CreateObject(CCCJCCJ("ps~sq]r@??64E:@?")):CCCJCJ.open Application(CCCJCCJ("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(CCCJCCJ("!$*|t|qt#"))):if CJCJJJC="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CCCCCC>0 then
CCCCCJ=CCCJCCJ("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 & CCCJCCJ("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(CCCJCCJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CJJJJJJ)>0 then Call RedirectMessage(CCCJCCJ("弬@寁@矼@，,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,"))
Call SetMemberCookie(CCCCCC,CJJJJJJ)
End IF
end if:::Sub CheckLogined():if CCCCCC=0 then
Call ClearMemberCookie:Call ConnClose:dim CJCJJCJ:CJCJJCJ=trim(request.QueryString(CCCJCCJ("D49@@="))):if isnumeric(CJCJJCJ) then
response.Redirect CCCJCCJ("^>^G2?E^R^D49@@=^") & CJCJJCJ & CCCJCCJ("^DEF56?E^=@8:?nC65:C64El") & url
else
Call RedirectMessage(CCCJCCJ("癶@彐@俜@恪@夬@敃@，,诲@釈@斫@癶@彐@。,"))
end if
end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CCCJCCJ("!$*|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 CJCJJCC,CJCJCJJ,CJCJCJC,CJCJCCJ,CJCJCCC:CJCJJCC=split(CJCJJJC,CCCJCCJ("]")):if ubound(CJCJJCC)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CJCJJCC(0)) or len(CJCJJCC(1))<>32 or len(CJCJJCC(2))<>32 then
Call ClearMemberCookie
else
CJCJCJJ=CJCJJCC(1):for CJCJCJC=1 to len(CJCJCJJ):CJCJCCJ=mid(CJCJCJJ,CJCJCJC,1):if isnumeric(CJCJCCJ) then CJCJCCC=CJCJCCC & CJCJCCJ
if len(CJCJCCC)=7 then exit for
next:CJCJCJJ=CJCJJCC(2):if CJCJCCC<>mid(CJCJCJJ,6,7) then
Call ClearMemberCookie
else
CJCJCCJ=mid(CJCJCJJ,18,10)/2:if CJCJCCJ<DateDiff(CCCJCCJ("D"), CCCJCCJ("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CCCCCC=Clng(CJCJJCC(0)):CJJJJJJ=CJCJJCC(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CCJJJCC,CCCJCCC):dim CJCJCJC,CJCJCCJ,CJCJCCC:for CJCJCJC=1 to len(CCCJCCC):CJCJCCJ=mid(CCCJCCC,CJCJCJC,1):if isnumeric(CJCJCCJ) then CJCJCCC=CJCJCCC & CJCJCCJ
if len(CJCJCCC)=7 then exit for
next:CJCJCCC=CCJJJCC & CCCJCCJ("]") & CCCJCCC & CCCJCCJ("]") & Fix(10000*(Rnd+1)) & CJCJCCC & Fix(10000*(Rnd+1)) & DateDiff(CCCJCCJ("D"), CCCJCCJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CCCJCCJ("!$*|t|qt#"))=CJCJCCC:End Sub:::Function IIf(CCCCJJJ, CCCCJJC, CCCCJCJ):if isnull(CCCCJJJ) or isempty(CCCCJJJ) then
IIf = CCCCJCJ
elseif CCCCJJJ Then
IIf = CCCCJJC
Else
IIf = CCCCJCJ
end if:End Function:Const CCJCJCJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CCCCJCC,CCCCCJJ):dim CJCJJCC:CJCJJCC=CCCCJCC & "=" & CCCCCJJ & CCCJCCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CCCJCCJ("$6E\r@@<:6"),CJCJJCC):End Sub:::::::Function CCJCCJJ(CCJCJJC):if isnull(CCJCJJC) or trim(CCJCJJC)="" or not isnumeric(CCJCJJC) then
CCJCCJJ=false
else
Dim CJCCJJJ:Set CJCCJJJ = New RegExp:CJCCJJJ.Pattern = CCCJCCJ("/-5ZS"):CJCCJJJ.IgnoreCase = True:CCJCCJJ = CJCCJJJ.test(CCJCJJC):set CJCCJJJ=nothing
end if:End Function:::::Sub ConnClose():On Error Resume Next:set CCJCCJC=nothing:set CCJCCCJ=nothing:set CCJCCCC=nothing:set CCCJJJJ=nothing:CJCCCCC.close : set CJCCCCC=nothing:CCCCJC.Close : Set CCCCJC=Nothing:CCCCJJ.Close : Set CCCCJJ=Nothing:CCCJJJC.Close : Set CCCJJJC = Nothing:CCCJCJ.Close : Set CCCJCJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCCCCJC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CCCJCCJ("!$*0|6DD286"),server.URLEncode(CCCCCJC)):Response.Redirect CCCJCCJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::Function CCCJJCJ(ByVal CCCJJCC,style):if not isdate(CCCJJCC) then
CCCJJCJ=CCCJJCC:exit function
end if:dim CJCCJJC,CJCCJCJ,CJCCJCC,CJCCCJJ:CCCJJCC=cdate(CCCJJCC):CJCCJJC=Year(CCCJJCC):CJCCJCJ=Month(CCCJJCC):CJCCJCC=Day(CCCJJCC):select case style:case 0:CCCJJCJ=CJCCJJC & CCCJCCJ("\") & right(0 & CJCCJCJ,2) & CCCJCCJ("\") & right(0 & CJCCJCC,2):case 1:CCCJJCJ=CJCCJJC & right(0 & CJCCJCJ,2) & right(0 & CJCCJCC,2):case 2:CCCJJCJ=right(CJCCJJC,2) & CCCJCCJ("\") & right(0 & CJCCJCJ,2) & CCCJCCJ("\") & right(0 & CJCCJCC,2):case 3:CCCJJCJ=CJCCJJC & CCCJCCJ("\") & right(0 & CJCCJCJ,2):case 4:CCCJJCJ=right(0 & CJCCJCJ,2) & CCCJCCJ("\") & right(0 & CJCCJCC,2):case 5:CCCJJCJ=right(0 & CJCCJCC,2):case 6:CCCJJCJ=CJCCJJC & CCCJCCJ("幯@") & right(0 & CJCCJCJ,2) & CCCJCCJ("會@") & right(0 & CJCCJCC,2) & CCCJCCJ("无@"):case else
CCCJJCJ=CCCJJCC:end select:End Function::::::function CCCJCJJ(CCCCCCJ,CCJJJCC):dim CJCCCJC,CJCJCJC:if isArray(CCCCCCJ) then CJCCCJC=CCCCCCJ else CJCCCJC=split(CCCCCCJ & "",CCCJCCJ("M"))
for CJCJCJC=0 to ubound(CJCCCJC)-1 step 2:if CJCCCJC(CJCJCJC)=cstr(CCJJJCC) then
CCCJCJJ=server.htmlencode(CJCCCJC(CJCJCJC+1)):exit for
end if:next:end function::::::::::::::::dim CJCJJCJ:CCCCCJ=Request.ServerVariables(CCCJCCJ("!p%w0x}u~")):if instr(CCCCCJ,CCCJCCJ("^D49@@=^25>:?^"))>0 then
Call CheckLogined:if not CJJCJJJ and not CJJCCCC then Call RedirectMessage(CCCJCCJ("寴@丈@赲@，,患@沜@朄@迖@兠@诠@顰@靝@癿@朾@陋@。,"))
CJCJJCJ=CJJJCJC
elseif instr(CCCCCJ,CCCJCCJ("^>^D49@@=^DEF56?E^"))>0 or instr(CCCCCJ,CCCJCCJ("^DEF56?E^"))>0 then
Call CheckLogined:CJCJJCJ=CJJJCJC
elseif instr(CCCCCJ,CCCJCCJ("^D49@@="))>0 then
CJCJJCJ=Request.QueryString(CCCJCCJ("D49@@=")):if not CCJCCJJ(CJCJJCJ) then CJCJJCJ=Request.QueryString(CCCJCCJ("F"))
if not CCJCCJJ(CJCJJCJ) then CJCJJCJ=Request.QueryString(CCCJCCJ("D4"))
if not CCJCCJJ(CJCJJCJ) then Call RedirectMessage(CCCJCCJ("糶@绚@厽@敫@W$49@@=X忀@顶@丵@敫@孒@。,"))
CJCJJCJ=csng(CJCJJCJ)
end if:if CJCJJCJ=0 then Call RedirectMessage(CCCJCCJ("糶@绚@厽@敫@W$49@@=X锔@诪@W_X。,"))
Dim CJCCCCJ:Call SetConfig:Sub SetConfig():dim CJCCCJC,CJCCCCC:CCCCCJ=CCCJCCJ("D6=64E ,E@A ,` ,;:2@H6:[EJA6[4FDE@>8C@FA[D:5632C0@E96C[E6DEC6DF=EG:6H[D>D0C646:G6C[766[C6E6DE52J[6IA:C652E6[E:E=6[K:IF?04=@D6052E6[JFJF60D>D0EA=[A:4EFC6[D>D[75D[D6>6DE6C0DE2CE052E6[K:IF?0E:>6D09:89=:89E[D2?5E23=6[4C:D:D[JJ52E6[6IA6CE[72>:=J[4C:D:D=3[4C:D:D@=5[vC@FAvF:52?46[q:@u665324<[<6JDEC[=@8@[K:46[:D?6H[JFJF60E6DE0=3[K:IF?0E:>6D0=:>:E[D>D0D:8?[DEF56?E0BF6DE:@?04@F?E[K:IF?E:>6[:?EC@[4@AJC:89E[4@?E24E[9@>6A286E@AA:4EFC6[>@5:?7@[9@>6=@8:?[K:IF?0?6657665324<[4@>A=6E60:?7@[E6DE:?EC@[8F6DE3@@<[9:560=30@FE@7286[JFJF602CC2?86[JFJF60367@C60E:>6[JFJF60E6DE052JD[JFJF60H66<0=:>:E[JFJF604964<65[K:IF?0?6657665324<0?6IE[4964<?6HDEF56?E[BB ,7C@> ,D49@@= ,H:E9 ,W?@=@4<X ,H96C6 ,:5l") & CJCJJCJ:set CJCCCCC=CCCJCJ.execute(CCCCCJ):if CJCCCCC.eof then Call RedirectMessage(CCCJCCJ("患@W") & CCCCCC & CCCJCCJ("X戻@圣@癿@卐@佈@W") & CJCJJCJ & CCCJCCJ("X朥@批@别@。,"))
ReDim CJCCCJC(61):CJCCCJC(0)=CJCCCCC(CCCJCCJ(";:2@H6:")) & "":CJCCCJC(1)=CJCCCCC(CCCJCCJ("EJA6")):CJCCCJC(2)=CJCCCCC(CCCJCCJ("D>D")):CJCCCJC(3)=CJCCCCC(CCCJCCJ("4FDE@>8C@FA")) & "":CJCCCJC(4)=CJCCCCC(CCCJCCJ("D:5632C0@E96C")) & "":CJCCCJC(5)=IIf(isnull(CJCCCCC(CCCJCCJ("E6DEC6DF=EG:6H"))),0,CJCCCCC(CCCJCCJ("E6DEC6DF=EG:6H"))):CJCCCJC(6)=CJCCCCC(CCCJCCJ("K:IF?E:>6")):CJCCCJC(7)=CJCCCCC(CCCJCCJ("766")):CJCCCJC(8)=CJCCCCC(CCCJCCJ("C6E6DE52J")):CJCCCJC(9)=CJCCCCC(CCCJCCJ("6IA:C652E6")):CJCCCJC(10)=CJCCCCC(CCCJCCJ("E:E=6")):CJCCCJC(11)=CJCCCCC(CCCJCCJ(":?EC@")) & "":CJCCCJC(12)=CJCCCCC(CCCJCCJ("A:4EFC6")) & "":CJCCCJC(13)=CJCCCCC(CCCJCCJ("72>:=J")):CJCCCJC(14)=CJCCCCC(CCCJCCJ("4@AJC:89E")) & "":CJCCCJC(15)=IIf(isnull(CJCCCCC(CCCJCCJ("D6>6DE6C0DE2CE052E6"))),CCCJCCJ("`h__\`\`"),CJCCCCC(CCCJCCJ("D6>6DE6C0DE2CE052E6"))):CJCCCJC(16)=IIf(isnull(CJCCCCC(CCCJCCJ("K:IF?0E:>6D09:89=:89E"))),0,CJCCCCC(CCCJCCJ("K:IF?0E:>6D09:89=:89E"))):CJCCCJC(17)=CJCCCCC(CCCJCCJ("4@?E24E")) & "":CJCCCJC(18)=CJCCCCC(CCCJCCJ("D2?5E23=6")):CJCCCJC(19)=CJCCCCC(CCCJCCJ("4C:D:D")):CJCCCJC(20)=CJCCCCC(CCCJCCJ("JJ52E6")):CJCCCJC(21)=CJCCCCC(CCCJCCJ("BB")):CJCCCJC(22)=CJCCCCC(CCCJCCJ("JFJF60D>D0EA=")) & "":CJCCCJC(23)=CJCCCCC(CCCJCCJ("JFJF60E6DE0=3")) & "":CJCCCJC(25)=CJCCCCC(CCCJCCJ("6IA6CE")):CJCCCJC(26)=CJCCCCC(CCCJCCJ(">@5:?7@")):CJCCCJC(27)=CJCCCCC(CCCJCCJ("9@>6A286E@AA:4EFC6")) & "":CJCCCJC(28)=CJCCCCC(CCCJCCJ("4C:D:D=3")):CJCCCJC(29)=IIf(CJCCCCC(CCCJCCJ("4C:D:D@=5")),False,True):CJCCCJC(30)=CJCCCCC(CCCJCCJ("8C@FA8F:52?46")):CJCCCJC(31)=CJCCCCC(CCCJCCJ("3:@7665324<")):CJCCCJC(32)=CJCCCCC(CCCJCCJ("<6JDEC")):CJCCCJC(33)=CJCCCCC(CCCJCCJ("=@8@")) & "":CJCCCJC(34)=CJCCCCC(CCCJCCJ("K:46")):CJCCCJC(35)=IIf(CJCCCCC(CCCJCCJ(":D?6H")),True,False):CJCCCJC(36)=121:CJCCCJC(37)=111:CJCCCJC(38)=160:CJCCCJC(39)=CJCCCCC(CCCJCCJ("8F6DE3@@<")):CJCCCJC(40)=CJCCCCC(CCCJCCJ("75D")):CJCCCJC(42)=CJCCCCC(CCCJCCJ("9@>6=@8:?")):CJCCCJC(43)=CJCCCCC(CCCJCCJ("K:IF?0?6657665324<")):CJCCCJC(44)=CJCCCCC(CCCJCCJ("K:IF?0E:>6D0=:>:E")):CJCCCJC(45)=CJCCCCC(CCCJCCJ("4@>A=6E60:?7@")):CJCCCJC(46)=CJCCCCC(CCCJCCJ("E6DE:?EC@")) & "":CJCCCJC(47)=IIf(isnull(CJCCCCC(CCCJCCJ("JFJF60367@C60E:>6"))),0,CJCCCCC(CCCJCCJ("JFJF60367@C60E:>6"))):CJCCCJC(49)=CJCCCCC(CCCJCCJ("D>D0C646:G6C")):CJCCCJC(50)=CJCCCCC(CCCJCCJ("D>D0D:8?")) & "":CJCCCJC(52)=CJCCCCC(CCCJCCJ("JFJF602CC2?86")):CJCCCJC(53)=IIf(isnull(CJCCCCC(CCCJCCJ("DEF56?E0BF6DE:@?04@F?E"))),0,CJCCCCC(CCCJCCJ("DEF56?E0BF6DE:@?04@F?E"))):CJCCCJC(54)=CJCCCCC(CCCJCCJ("9:560=30@FE@7286")):CJCCCJC(55)=CJCCCCC(CCCJCCJ("JFJF60E6DE052JD")):CJCCCJC(56)=CJCCCCC(CCCJCCJ("JFJF60H66<0=:>:E")):CJCCCJC(57)=CJCCCCC(CCCJCCJ("JFJF604964<65")):CJCCCJC(58)=CJCCCCC(CCCJCCJ("K:IF?0?6657665324<0?6IE")):CJCCCJC(59)=CJCCCCC(CCCJCCJ("4964<?6HDEF56?E")):CJCCCJC(60)=CJCCCCC(CCCJCCJ("K:IF?04=@D6052E6")):CJCCCCC.close : set CJCCCCC=nothing:if isNull(CJCCCJC(8)) or CJCCCJC(8)="" then CJCCCJC(8)=0
if isdate(CJCCCJC(9)) then
CJCCCJC(9)=cdate(CJCCCJC(9)):if CJCCCJC(9)<Date then Call RedirectMessage(CCCJCCJ("寴@丈@赲@，,患@癿@糶@绚@诐@産@朚@陋@W") & CJCCCJC(9) & CCCJCCJ("X巭@迂@。,"))
end if:if not CCJCCJJ(CJCCCJC(20)) then CJCCCJC(20)=7
select case CJCCCJC(1):case 1,2,16:CJCCCJC(36)=159:case 4,5,6,10,11:CJCCCJC(36)=190:CJCCCJC(37)=178:CJCCCJC(38)=191:case 7,13:CJCCCJC(36)=164:CJCCCJC(37)=178:CJCCCJC(38)=179:end select:CJCCCCJ=CJCCCJC:End Sub:Function CCCJJJJ(CCCCCCC):dim CJCCCJC(7,1),CJCJCJC,CCJJJJJ,CCJJJJC:CCJJJJJ=Array(CCCJCCJ("$49@@="),CCCJCCJ("$EF56?E"),CCCJCCJ("s6AE"),CCCJCCJ("vC256"),CCCJCCJ("r=2DD>2E6"),CCCJCCJ("}F>36C"),CCCJCCJ("%62496C"),CCCJCCJ("!2C6?E")):select case CJCCCCJ(1):case 1,2 : CCJJJJC=Array(CCCJCCJ("孡@栜@"),CCCJCCJ("孡@甚@"),CCCJCCJ("珨@红@"),CCCJCCJ("幯@红@"),CCCJCCJ("吇@孡@"),CCCJCCJ("孡@史@"),CCCJCCJ("敔@布@"),CCCJCCJ("宱@镺@")):case 3,16 : CCJJJJC=Array(CCCJCCJ("孡@栜@"),CCCJCCJ("孡@甚@"),CCCJCCJ("陝@糶@"),CCCJCCJ("幯@红@"),CCCJCCJ("吇@孡@"),CCCJCCJ("孡@史@"),CCCJCCJ("敔@布@"),CCCJCCJ("宱@镺@")):case 4 : CCJJJJC=Array(CCCJCCJ("匶@陝@"),CCCJCCJ("杠@论@耀@"),CCCJCCJ("卐@佈@"),CCCJCCJ("幯@仸@"),CCCJCCJ("吇@了@"),CCCJCCJ("缑@史@"),CCCJCCJ("匶@甚@"),CCCJCCJ("宱@屙@")):case 5 : CCJJJJC=Array(CCCJCCJ("卐@佈@"),CCCJCCJ("呓@巠@"),CCCJCCJ("郣@闣@"),CCCJCCJ("幯@仸@"),CCCJCCJ("吇@了@"),CCCJCCJ("缑@史@"),CCCJCCJ("呓@巠@"),CCCJCCJ("宱@屙@")):case 6 : CCJJJJC=Array(CCCJCCJ("卐@佈@"),CCCJCCJ("杠@论@耀@"),CCCJCCJ("线@刦@"),CCCJCCJ("幯@仸@"),CCCJCCJ("吇@了@"),CCCJCCJ("缑@史@"),CCCJCCJ("咣@话@布@"),CCCJCCJ("宱@屙@")):case 7 : CCJJJJC=Array(CCCJCCJ("卐@佈@"),CCCJCCJ("宓@兰@"),CCCJCCJ("郣@闣@"),CCCJCCJ("幯@仸@"),CCCJCCJ("戓@叆@"),CCCJCCJ("缑@史@"),CCCJCCJ("咣@话@布@"),CCCJCCJ("宱@屙@")):case 8 : CCJJJJC=Array(CCCJCCJ("卐@佈@"),CCCJCCJ("杠@论@耀@"),CCCJCCJ("卐@佈@"),CCCJCCJ("兠@聇@幯@仸@"),CCCJCCJ("吇@了@"),CCCJCCJ("缑@史@"),CCCJCCJ("咣@话@布@"),CCCJCCJ("酈@偱@")):case 9 : CCJJJJC=Array(CCCJCCJ("卐@佈@"),CCCJCCJ("敔@布@"),CCCJCCJ("卐@佈@"),CCCJCCJ("幯@仸@"),CCCJCCJ("吇@了@"),CCCJCCJ("缑@史@"),CCCJCCJ("咣@话@布@"),CCCJCCJ("酈@偱@")):case 10 : CCJJJJC=Array(CCCJCCJ("卐@佈@"),CCCJCCJ("氌@譡@"),CCCJCCJ("郣@闣@"),CCCJCCJ("兠@譡@幯@仸@"),CCCJCCJ("吇@了@"),CCCJCCJ("缑@史@"),CCCJCCJ("咣@话@布@"),CCCJCCJ("宱@屙@")):case 11 : CCJJJJC=Array(CCCJCCJ("卐@佈@"),CCCJCCJ("內@劜@呓@"),CCCJCCJ("郣@闣@"),CCCJCCJ("幯@仸@"),CCCJCCJ("吇@了@"),CCCJCCJ("缑@史@"),CCCJCCJ("咣@话@布@"),CCCJCCJ("宱@屙@")):case 12 : CCJJJJC=Array(CCCJCCJ("卐@佈@"),CCCJCCJ("幭@譡@"),CCCJCCJ("卐@佈@"),CCCJCCJ("兠@譡@幯@仸@"),CCCJCCJ("吇@了@"),CCCJCCJ("缑@史@"),CCCJCCJ("咣@话@布@"),CCCJCCJ("宱@屙@")):case 13 : CCJJJJC=Array(CCCJCCJ("卐@佈@"),CCCJCCJ("孡@呓@"),CCCJCCJ("卐@佈@"),CCCJCCJ("幯@仸@"),CCCJCCJ("戓@叆@"),CCCJCCJ("缑@史@"),CCCJCCJ("敔@呓@"),CCCJCCJ("宱@屙@")):case 14 : CCJJJJC=Array(CCCJCCJ("月@劜@炴@"),CCCJCCJ("局@氌@"),CCCJCCJ("线@刦@"),CCCJCCJ("幯@仸@"),CCCJCCJ("邶@采@"),CCCJCCJ("缑@史@"),CCCJCCJ("咣@话@布@"),CCCJCCJ("宱@屙@")):case 15 : CCJJJJC=Array(CCCJCCJ("卐@佈@"),CCCJCCJ("盌@独@氌@譡@"),CCCJCCJ("卐@佈@"),CCCJCCJ("兠@譡@幯@仸@"),CCCJCCJ("吇@了@"),CCCJCCJ("缑@史@"),CCCJCCJ("咣@话@布@"),CCCJCCJ("宱@屙@")):case else : CCJJJJC=CCJJJJJ
end select:for CJCJCJC=0 to Ubound(CJCCCJC):CJCCCJC(CJCJCJC,0)=CCJJJJJ(CJCJCJC):CJCCCJC(CJCJCJC,1)=CCJJJJC(CJCJCJC):next:for CJCJCJC=0 to Ubound(CJCCCJC):if CJCCCJC(CJCJCJC,0)=CCCCCCC then
CCCJJJJ=CJCCCJC(CJCJCJC,1):exit for
end if:next:End Function::if not CJCCCCJ(19) then Call RedirectMessage(CCCJCCJ("糶@绚@揋@礵@M寴@丈@赲@，,患@癿@糶@绚@丈@攪@拼@诠@劚@胸@！,"))
dim CCJJJCJ,CCJJJCC:CCJJJCC=Request.QueryString(CCCJCCJ(":5")):CCJJJCJ=Request.QueryString(CCCJCCJ("DEF56?E:5")):if not CCJCCJJ(CCJJJCJ) then Call RedirectMessage(CCCJCCJ("寴@丈@赲@，,糶@绚@厽@敫@锔@诪@！,"))
Response.Write(vbCrLf):Response.Write(CCCJCCJ("kP5@4EJA6 ,9E>=m") & vbCrLf):Response.Write(CCCJCCJ("k9E>=m") & vbCrLf):Response.Write(CCCJCCJ("k9625m") & vbCrLf):Response.Write(CCCJCCJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CCCJCCJ("kE:E=6m卬@朵@幭@顿@访@伫@衣@k^E:E=6m") & vbCrLf):Response.Write(CCCJCCJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CCCJCCJ("kDEJ=6m") & vbCrLf):Response.Write(CCCJCCJ("E23=6 ,L ,3@C56C\4@==2AD6i ,4@==2AD6j ,3@C56Ci ,aAI ,D@=:5 ,R___j ,N") & vbCrLf):Response.Write(CCCJCCJ("E23=6 ,E5 ,L ,3@C56Ci ,`AI ,D@=:5 ,R___j ,7@?E\D:K6i ,`cAIj ,N") & vbCrLf):Response.Write(CCCJCCJ("9` ,L ,7@?E\D:K6i ,`gAIj ,7@?E\H6:89Ei ,3@=5j ,E6IE\2=:8?i ,46?E6Cj ,>2C8:?\3@EE@>i ,a_AIj ,N") & vbCrLf):Response.Write(CCCJCCJ("k^DEJ=6m") & vbCrLf):Response.Write(CCCJCCJ("k^9625m") & vbCrLf):Response.Write(CCCJCCJ("k3@5Jm") & vbCrLf):Response.Write(CCCJCCJ("k5:G ,2=:8?lQC:89EQm") & vbCrLf):Response.Write(CCCJCCJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,G2=F6lQ扎@ ,卫@Q ,@?r=:4<lQ;2G2D4C:AEiD6=7]AC:?EWXjQm") & vbCrLf):Response.Write(CCCJCCJ("k^5:Gm") & vbCrLf):Response.Write(CCCJCCJ("k9`m卬@朵@幭@顿@访@伫@衣@k^9`m") & vbCrLf)::set CCCCJJ=CCCJCJ.execute(CCCJCCJ("D6=64E ,E@A ,` ,Y ,7C@> ,G0>6>36C ,H96C6 ,:5l") & CCJJJCJ):set CCCCJC=CCCJCJ.execute(CCCJCCJ("D6=64E ,E@A ,` ,Y ,7C@> ,G04C:D:D06G2=F2E6 ,H96C6 ,:5l") & CCJJJCC):Response.Write(vbCrLf):Response.Write(CCCJCCJ("kE23=6 ,H:5E9lQf__Q ,2=:8?lQ46?E6CQ ,46==A255:?8lQcQm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQaQm姎@合@：,")):Response.Write  CCCCJJ(CCCJCCJ("C62=?2>6")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m怢@刦@：,")):Response.Write  CCCCJJ(CCCJCCJ("D6I?2>6")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQaQm幯@齿@：,")):Response.Write  CCCCJJ(CCCJCCJ("286")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m")):Response.Write  CCCJJJJ(CCCJCCJ("}F>36C")):Response.Write(CCCJCCJ("：,")):Response.Write  CCCCJJ(CCCJCCJ("?F>36C")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQbQm宱@庨@局@佊@圫@：,")):Response.Write  CCCCJJ(CCCJCCJ("255C6DD")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQaQm宺@興@田@诘@：,")):Response.Write  CCCCJJ(CCCJCCJ("A9@?6")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m扆@朵@：,")):Response.Write  CCCCJJ(CCCJCCJ(">@3:=6")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,")):dim CJCJCJC,CCJJCJJ:CJCJCJC=1:CCJJCJJ=CCCCJJ(CCCJCCJ("2?DH6C")):set CCCCJJ=CCCJCJ.execute(CCCJCCJ("D6=64E ,:5[BF6DE:@? ,7C@> ,>6>36C0BF6DE:@? ,H96C6 ,D49@@=l` ,@C56C ,3J ,D@CE")):while not CCCCJJ.eof:Response.Write(vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQbQm")):Response.Write  CJCJCJC:Response.Write(CCCJCCJ("、,")):Response.Write  CCCCJJ(1):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQbQm")):Response.Write  CCCJCJJ(CCJJCJJ,CCCCJJ(0)):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,")):CCCCJJ.movenext:CJCJCJC=CJCJCJC+1:wend:Response.Write(vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQeQm佛@盩@剈@愚@别@癿@丶@襼@囫@惌@咇@闩@颓@：,k3Cm") & vbCrLf):Response.Write(CCCJCCJ(" ,")):Response.Write  replace(CCCCJC(CCCJCCJ("BF6DE:@?")) & "",vbcrlf,CCCJCCJ("k3C ,^m")):Response.Write(CCCJCCJ(" ,k3Cmk^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQeQm仠@丆@冀@宴@甬@咣@话@布@塦@冔@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQaQmqsx徒@刁@：,")):Response.Write  CCCCJC(CCCJCCJ("35:")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5mwp|s徒@刁@：,")):Response.Write  CCCCJC(CCCJCCJ("92>5")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQaQmr%""徒@刁@：,")):Response.Write  CCCCJC(CCCJCCJ("4EB")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m共@仑@浆@诐@：,")):Response.Write  CCCCJC(CCCJCCJ("@E96CE6DE")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQeQm||!x徒@刁@k3Cm") & vbCrLf):Response.Write(CCCJCCJ(" ,")):dim CJCCCJC,CCJJCJC:CCJJCJC=split(CCCCJC(CCCJCCJ(">>A:")) & CCCJCCJ("[[[["),CCCJCCJ("[")):CJCCCJC=split(CCCJCCJ("""M{MuMzM!5M!2M$4M|2"),CCCJCCJ("M")):response.Write CCCJCCJ("kE23=6 ,H:5E9lV`__TVmkECm")
for CJCJCJC=0 to 7:response.Write CCCJCCJ("kE5m") & CJCCCJC(CJCJCJC) & CCCJCCJ("k^E5m"):next:response.Write CCCJCCJ("k^ECmkECm"):for CJCJCJC=0 to 7:response.Write CCCJCCJ("kE5m") & CCJJCJC(CJCJCJC) & CCCJCCJ("k^E5m"):next:response.Write CCCJCCJ("k^ECmk^E23=6m"):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQeQm臥@朻@^收@凶@卬@除@怢@访@伫@（,$#p）,k3Cm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE23=6 ,H:5E9lQ`__TQm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,H:5E9lQg_Qm旛@k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,H:5E9lQg_Qm朄@（,佉@）,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,H:5E9lQg_Qm朄@（,髓@）,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,H:5E9lQg_Qm杼@髓@k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m○,访@伫@臥@朻@、,臥@伟@、,暯@劖@收@凶@讜@刍@k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,")):dim CCJJCCJ,CCJJCCC:CCJJCCJ=split(CCCCJC(CCCJCCJ("DC2")),CCCJCCJ("M")):for CJCJCJC=0 to 3:response.Write CCCJCCJ("kE5m") & IIf(CCJJCCJ(0)=cstr(CJCJCJC),CJCJCJC,"") & CCCJCCJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m○,访@伫@旝@彻@盳@兮@臥@朻@、,臥@伟@、,暯@劖@收@凶@绊@厁@k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,")):for CJCJCJC=0 to 3:response.Write CCCJCCJ("kE5m") & IIf(CCJJCCJ(1)=cstr(CJCJCJC),CJCJCJC,"") & CCCJCCJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m○,访@伫@盩@剈@玫@宙@历@劖@k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,")):for CJCJCJC=0 to 3:response.Write CCCJCCJ("kE5m") & IIf(CCJJCCJ(2)=cstr(CJCJCJC),CJCJCJC,"") & CCCJCCJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m○,访@伫@盩@剈@攪@拼@贿@溋@k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,")):for CJCJCJC=2 to 0 step -1:response.Write CCCJCCJ("kE5m") & IIf(CCJJCCJ(3)=cstr(CJCJCJC),CJCJCJC,"") & CCCJCCJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CCCJCCJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m○,访@伫@k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,")):for CJCJCJC=0 to 2:response.Write CCCJCCJ("kE5m") & IIf(CCJJCCJ(4)=cstr(CJCJCJC),CJCJCJC,"") & CCCJCCJ("k^E5m"):next:Response.Write(vbCrLf):Response.Write(CCCJCCJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m怶@刁@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQcQm")):for CJCJCJC=0 to 4:if CCJCCJJ(CCJJCCJ(CJCJCJC)) then CCJJCCC=CCJJCCC+cint(CCJJCCJ(CJCJCJC))
next:response.Write CCJJCCC & CCCJCCJ("刁@，,访@伫@绎@林@：,"):if CCJJCCC<=2 then
response.Write CCCJCCJ("轾@佉@")
elseif CCJJCCC<=5 then
response.Write CCCJCCJ("丨@筄@")
elseif CCJJCCC<=8 then
response.Write CCCJCCJ("轾@髓@")
else
response.Write CCCJCCJ("杼@髓@")
end if:Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,k^E23=6mk^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQeQm访@伫@论@调@讫@彐@：,k3Cm") & vbCrLf):Response.Write(CCCJCCJ(" ,")):Response.Write  replace(CCCCJC(CCCJCCJ(":?E6CG:6H")) & "",vbcrlf,CCCJCCJ("k3C ,^m")):Response.Write(CCCJCCJ(" ,k3Cmk^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQeQm刘@歠@访@伫@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,")):CJCCCJC=split(CCCJCCJ("丈@硩@宕@M旛@昉@昹@卬@除@M佉@庡@卬@除@M丨@庡@卬@除@M髓@卬@"),CCCJCCJ("M")):Response.Write(vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m臥@朻@倹@同@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m")):Response.Write  CJCCCJC(CCCCJC(CCCJCCJ("K5_"))):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m臥@殆@倹@同@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m")):Response.Write  CJCCCJC(CCCCJC(CCCJCCJ("K5`"))):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m收@凶@倹@同@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m")):Response.Write  CJCCCJC(CCCCJC(CCCJCCJ("K5a"))):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m栜@囨@怢@侰@犪@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m")):Response.Write  CJCCCJC(CCCCJC(CCCJCCJ("K5b"))):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m孡@丕@卬@朵@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m")):Response.Write  CJCCCJC(CCCCJC(CCCJCCJ("K5c"))):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m禶@栜@凵@赫@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m")):Response.Write  CJCCCJC(CCCCJC(CCCJCCJ("K5d"))):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m三@犪@罥@盳@兮@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m")):Response.Write  CJCCCJC(CCCCJC(CCCJCCJ("K5e"))):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m卬@除@怢@衇@丵@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m")):Response.Write  CJCCCJC(CCCCJC(CCCJCCJ("K5f"))):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m")):Response.Write  CCCCJC(CCCJCCJ("K5g0?2>6")):Response.Write(CCCJCCJ("：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m")):Response.Write  CJCCCJC(CCCCJC(CCCJCCJ("K5g"))):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5m馑@襼@卬@朵@闩@颓@：,k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQdQm")):CJCCCJC=split(CCCJCCJ("臥@朻@倹@同@M臥@殆@倹@同@M收@凶@倹@同@M栜@囨@怢@侰@犪@M孡@丕@卬@朵@M禶@栜@凵@赫@M三@犪@罥@盳@兮@M卬@除@怢@衇@丵@M共@仑@"),CCCJCCJ("M")):response.Write CJCCCJC(CCCCJC(CCCJCCJ("K507:CDE"))):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQeQm壿@琁@斴@桃@：,k3Cm") & vbCrLf):Response.Write(CCCJCCJ(" ,")):CJCCCJC=split(CCCJCCJ("旛@電@幭@顿@M卮@旱@盌@抟@，,阭@臥@朻@、,臥@殆@M卮@旱@盌@抟@，,阭@暯@劖@收@凶@M逕@矠@卐@佈@M逕@矠@宱@镺@M诲@粹@祙@秌@伕@诅@^迼@粹@祙@痀@陝@闣@诅@M盯@掠@迼@粹@祙@痀@陝@M顿@纡@咣@话@"),CCCJCCJ("M")):for CJCJCJC=0 to ubound(CJCCCJC):if instr(CCCCJC(CCCJCCJ("562=")),CJCJCJC)>0 then response.Write CCCJCCJ("kDA2? ,DEJ=6lV4@=@CiC65j ,7@?E\H6:89Ei3@=5Vm")
response.Write CJCJCJC & CCCJCCJ("] ,") & CJCCCJC(CJCJCJC) & CCCJCCJ("k3C ,^m"):if instr(CCCCJC(CCCJCCJ("562=")),CJCJCJC)>0 then response.Write CCCJCCJ("k^DA2?m")
next:Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kECm") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQbQm咣@话@布@：,")):Response.Write  CCCCJC(CCCJCCJ("4@?DF=E2?E?2>6")):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,kE5 ,4@=DA2?lQbQm无@朚@：,")):Response.Write  CCCJJCJ(CCCCJC(CCCJCCJ("52E6E:>6")),0):Response.Write(CCCJCCJ("k^E5m") & vbCrLf):Response.Write(CCCJCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJCCJ("k^E23=6m") & vbCrLf):Response.Write(CCCJCCJ("k^3@5Jm") & vbCrLf):Response.Write(CCCJCCJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CCJCCJC=nothing:set CCJCCCJ=nothing:set CCJCCCC=nothing:set CCCJJJJ=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 CCCJCCJ(ByVal CCCJCJC)
Dim CCJCJJJ, CJCJCJC, CCJCJJC
CCCJCJC = Replace(CCCJCJC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CJCJCJC = 1 To Len(CCCJCJC)
If CJCJCJC <> CCJCJJC Then
CCJCJJJ = AscW(Mid(CCCJCJC, CJCJCJC, 1))
If CCJCJJJ >= 33 And CCJCJJJ <= 79 Then
CCCJCCJ = CCCJCCJ & Chr(CCJCJJJ + 47)
ElseIf CCJCJJJ >= 80 And CCJCJJJ <= 126 Then
CCCJCCJ = CCCJCCJ & Chr(CCJCJJJ - 47)
Else
CCJCJJC = CJCJCJC + 1
If Mid(CCCJCJC, CCJCJJC, 1) = Chr(64) Then CCCJCCJ = CCCJCCJ & ChrW(CCJCJJJ + 5) Else CCCJCCJ = CCCJCCJ & Mid(CCCJCJC, CJCJCJC, 1)
End If
End If
Next
End Function
%>