<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CCCJC, CCCCJ,CCCCC, CJJJJJ, CJJJJC:Set CCCJC = server.CreateObject(CJCCJCC("ps~sq]r@??64E:@?")):CCCJC.open Application(CJCCJCC("r@??64E:@?$EC:?8")):Set CCCCJ=CCCJC::Function CJJCCCJ(CJCCCJJ):Dim str,CJJJCC:str = Trim(CJCCCJJ):If IsNull(str) Or str = "" Then
CJJCCCJ = ""
else
str=Replace(str, CJCCJCC("V"), "")
str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CJCCJCC("k:7C2>6"), CJCCJCC("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJCCJCC("kD4C:AE"), CJCCJCC("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJJJCC=new RegExp:CJJJCC.Pattern=CJCCJCC("@?W,2\K.ZXl"):CJJJCC.IgnoreCase = True:CJJJCC.Global=True:str=CJJJCC.Replace(str,CJCCJCC("@?S`U6BF2=Dj")):set CJJJCC=nothing:CJJCCCJ=str
End If:End Function::Const CJJCCJJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CJCCCJC,CJCCCCJ):dim CJJCJJ:CJJCJJ=CJCCCJC & "=" & CJCCCCJ & CJCCJCC("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJCCJCC("$6E\r@@<:6"),CJJCJJ):End Sub:::Function CJJCCCC(ByVal Str, ByVal StrLen):Dim CJJCJC, CJJCCJ, CJJCCC, CJCJJJ:if isnull(str) then
CJJCCCC=""
else
CJJCJC = Len(Str):CJJCCJ = 0:For CJCJJJ = 1 To CJJCJC:CJJCCC = AscW(Mid(Str, CJCJJJ, 1)):If CJJCCC < 0 Or CJJCCC > 255 Then CJJCCJ = CJJCCJ + 2 Else CJJCCJ = CJJCCJ + 1
If CJJCCJ >= StrLen Then
CJJCCCC = Left(Str, CJCJJJ) & CJCCJCC("]]]"):Exit For
Else
CJJCCCC = Str
End If:Next
end if:End Function::::Function CJCJJJJ(CJCCCC):if isnull(CJCCCC) or trim(CJCCCC)="" or not isnumeric(CJCCCC) then
CJCJJJJ=false
else
Dim CJJJCC:Set CJJJCC = New RegExp:CJJJCC.Pattern = CJCCJCC("/-5ZS"):CJJJCC.IgnoreCase = True:CJCJJJJ = CJJJCC.test(CJCCCC):set CJJJCC=nothing
end if:End Function:Function CJCJJJC(CJCCCCC):dim CJCJJC,CJCJCJ:CJCJJC=CJCCJCC("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CJCCCCC & CJCCJCC("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJCJCJ=CCCJC.execute(CJCJJC):CJCJJJC = CJCJCJ(0):if isnull(CJCJJJC) then CJCJJJC=1
CJCJCJ.close : set CJCJCJ=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CJCJJCJ=nothing:set CJCJJCC=nothing:set CJCJCJJ=nothing:set CJCJCJC=nothing:CJCJCJ.close : set CJCJCJ=nothing:CJJJJJ.Close : Set CJJJJJ=Nothing:CCCCC.Close : Set CCCCC=Nothing:CJCJCCJ.Close : Set CJCJCCJ = Nothing:CCCJC.Close : Set CCCJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCJJJJJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJCCJCC("!$*0|6DD286"),server.URLEncode(CCJJJJJ)):Response.Redirect CJCCJCC("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::Function CJCJCCC():Dim CJCJCJ, CJCJCC(), CJCJJJ, CJCCJJ, CJCCJC,CJCCCJ:If Not IsArray(Application(CJCCJCC("!$*0%6DED"))) Then
CJJJJC=CJCCJCC("D6=64E ,:5[?2>6049[?2>606?[BF6DE4@F?E[E6DEE:A[E:>60>2I[:?EC@`[2?DH6C[>6>36CEJA6[2860>2I[24E[>@?6J[5@4[?F==[?2>607C[724E@C`[E:>60>:?[2860>:?[724E@Ca[:?EC@a[:D4FDE@>[?F==[A:4EFC6[2CE:4=6 ,7C@> ,=3 ,H96C6 ,2G2:=23=6l` ,@C56C ,3J ,D@CE"):set CJCJCJ=server.createobject(CJCCJCC("25@53]C64@C5D6E")):CJCJCJ.open CJJJJC,CCCJC,1:CJCCJC = CJCJCJ.RecordCount:CJCCCJ=CJCJCJ.fields.count-1:ReDim CJCJCC(CJCCJC, CJCCCJ):If CJCCJC > 0 Then
For CJCJJJ = 1 To CJCCJC:For CJCCJJ = 0 To CJCCCJ:if CJCCJJ=4 or CJCCJJ=6 or CJCCJJ=19 then
CJCJCC(CJCJJJ, CJCCJJ) = CJCCJJC(CJCJCJ(CJCCJJ))
else
CJCJCC(CJCJJJ, CJCCJJ) = CJCJCJ(CJCCJJ):if CJCJCJ(CJCCJJ).type<>11 and isnull(CJCJCC(CJCJJJ, CJCCJJ)) then CJCJCC(CJCJJJ, CJCCJJ)=""
end if:Next:CJCJCJ.MoveNext:Next
End If:CJCJCJ.Close: Set CJCJCJ = Nothing:Application(CJCCJCC("!$*0%6DED")) = CJCJCC
End If:CJCJCCC = Application(CJCCJCC("!$*0%6DED")):End Function::::::::::function CJCCJJJ(str):dim CJCJJJ,CJJCCC,CJCCCC,CCJJJJ:if isnull(str) then exit function
str=trim(str):for CJCJJJ=1 to len(str):CJJCCC=mid(str,CJCJJJ,1):CJCCCC=AscW(CJJCCC):if CJCCCC=12288 then
CJJCCC=chrw(32)
elseif CJCCCC=-29 then
CJJCCC=chrw(CJCCCC+155)
elseif CJCCCC<0 then
CJJCCC=chrw(CJCCCC+288)
end if:CCJJJJ=CCJJJJ & CJJCCC:next:CJCCJJJ=CCJJJJ:end function::::::::::::::::::::Function CJCCJJC(CCJJJJC):if isnull(CCJJJJC) then
CJCCJJC=""
else
On Error Resume Next:CJCCJJC=CCJJJJC:if err.number=-2147352567 then
CJCCJJC="":err.Clear
end if
end if:End Function::::::Dim CCJJJC,CCJJCJ,CCJJCC,CCJCJJ,CCJCJC,CCJCCJ,CCJCCC,CCCJJJ,CCCJJC:Dim CCCJCJ,CCCJCC,CCCCJJ,CCCCJC,CCCCCJ,CCCCCC:Dim CJJJJJJ,CJJJJJC,CJJJJCJ:Dim CJJJJCC:CJJJJCC=Trim(Request.Cookies(CJCCJCC("!$*|t|qt#"))):if CJJJJCC="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CCJJJC>0 then
CJJJJC=CJCCJCC("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") & CCJJCJ & CJCCJCC("V ,2?5 ,:5l") & CCJJJC
set CCCCC=CCCJC.execute(CJJJJC):If CCCCC.EOF Then
Call ClearMemberCookie
Else
CCJJCC=CCCCC(2) & "":CCJCJJ=CCCCC(3):CCJCJC=CCCCC(5):CCJCCJ=CCCCC(6):CCJCCC=CCCCC(9):CCCJJJ=CCCCC(15):CCCJCJ=CCCCC(0):CJJJJJC=CCCCC(1):CJJJJJJ=CCCCC(11) & "":CCCJCC=CCCCC(10) & "":CCCJJC=CCCCC(12):CCCCJJ=CCCCC(14):CCCCJC=CCCCC(13):CCCCCJ=CCCCC(7) & "":CCCCCC=CCCCC(4):CJJJJCJ=CCCCC(8):if isnull(CCCJJJ) then CCCJJJ=0
if isnull(CCJCCC) or CCJCCC=0 then CCJCCC=CCJCJJ
if isnull(CCCCCC) then CCCCCC=0
if isnull(CCJCJC) then CCJCJC=0
if instr(CJCCJCC("6`_254bhch32dh2336de6_df7a_7ggb6"),CCJJCJ)>0 then Call RedirectMessage(CJCCJCC("弬@寁@矼@，,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,"))
Call SetMemberCookie(CCJJJC,CCJJCJ)
End IF
end if:Sub CheckRight(CJCCJC):dim CJCJJJ,CJJJCJJ:if CCJJJC=0 then
Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJCCJCC("癶@彐@俜@恪@夬@敃@，,诲@釈@斫@癶@彐@。,"))
elseIf not CJCCJCJ(CJCCJC) then
Call RedirectMessage(CJCCJCC("朾@陋@W") & CJCCJC & CJCCJCC("X袦@祼@歝@，,诲@三@糶@绚@箜@琁@呓@聏@糶@。,"))
end if:End Sub:Function CJCCJCJ(CJCCJC):dim CJCJJJ,CJJJCJJ:CJJJCJJ=split(CJCCJC,CJCCJCC("[")):CJCCJCJ=False:for CJCJJJ=0 to ubound(CJJJCJJ):If Mid(CCJJCC,CJJJCJJ(CJCJJJ),1)="1" then
CJCCJCJ=True:exit function
end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CJCCJCC("!$*|t|qt#"))="":CCJJJC=0:CCJCCJ=0:CCJJCJ=Empty:CCJCJC=0:CCCJJJ=0:CCJCCC=0:CCJCJJ=0:CCCJCJ=False:CJJJJJC=False:CJJJJCJ=Empty:End Sub:Sub CheckMemberCookie():dim CJJCJJ,CJJJCJC,CJCJJJ,CJCCJJ,CJJJCCJ:CJJCJJ=split(CJJJJCC,CJCCJCC("]")):if ubound(CJJCJJ)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CJJCJJ(0)) or len(CJJCJJ(1))<>32 or len(CJJCJJ(2))<>32 then
Call ClearMemberCookie
else
CJJJCJC=CJJCJJ(1):for CJCJJJ=1 to len(CJJJCJC):CJCCJJ=mid(CJJJCJC,CJCJJJ,1):if isnumeric(CJCCJJ) then CJJJCCJ=CJJJCCJ & CJCCJJ
if len(CJJJCCJ)=7 then exit for
next:CJJJCJC=CJJCJJ(2):if CJJJCCJ<>mid(CJJJCJC,6,7) then
Call ClearMemberCookie
else
CJCCJJ=mid(CJJJCJC,18,10)/2:if CJCCJJ<DateDiff(CJCCJCC("D"), CJCCJCC("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CCJJJC=Clng(CJJCJJ(0)):CCJJCJ=CJJCJJ(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CJJCJJC,CCJJJCJ):dim CJCJJJ,CJCCJJ,CJJJCCJ:for CJCJJJ=1 to len(CCJJJCJ):CJCCJJ=mid(CCJJJCJ,CJCJJJ,1):if isnumeric(CJCCJJ) then CJJJCCJ=CJJJCCJ & CJCCJJ
if len(CJJJCCJ)=7 then exit for
next:CJJJCCJ=CJJCJJC & CJCCJCC("]") & CCJJJCJ & CJCCJCC("]") & Fix(10000*(Rnd+1)) & CJJJCCJ & Fix(10000*(Rnd+1)) & DateDiff(CJCCJCC("D"), CJCCJCC("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJCCJCC("!$*|t|qt#"))=CJJJCCJ:End Sub::Call CheckRight(13):Const CJJCCJC="lbfactor":dim CJJJCCC,CJJCJJJ,CJJCJJC:CJJJCCC=Request.QueryString("lbid"):CJJCJJJ=Request.QueryString(CJCCJCC("24E")):CJJCJJC=Request.QueryString(CJCCJCC(":5")):if not CJCJJJJ(CJJJCCC) then Call RedirectMessage(CJCCJCC("寴@丈@赲@，,糶@绚@厽@敫@丝@夬@！,"))
if CJJCJJJ=CJCCJCC("56=") and CJCJJJJ(CJJCJJC) then
CCCJC.execute(CJCCJCC("56=6E6 ,7C@> ,") & CJJCCJC & CJCCJCC(" ,H96C6 ,:5l") & CJJCJJC)
end if:if Request.ServerVariables(CJCCJCC("#t""&t$%0|t%w~s"))=CJCCJCC("!~$%") then
if CJJCJJJ=CJCCJCC("255") then
CJJJJC=CJCCJCC(":?D6CE ,:?E@ ,") & CJJCCJC & CJCCJCC("W:5[?2>6[6?[D9@CE[6IA=2:?[BF6DE:@?`[BF6DE:@?a[D@CE[=3X ,G2=F6DW") & CJCJJJC(CJJCCJC) & CJCCJCC("[V") & CJJCCCJ(Request.Form(CJCCJCC("?2>6"))) & CJCCJCC("V") & CJCCJCC("[V") & CJJCCCJ(Request.Form(CJCCJCC("6?"))) & CJCCJCC("V") & CJCCJCC("[V") & CJJCCCJ(Request.Form(CJCCJCC("D9@CE"))) & CJCCJCC("V") & CJCCJCC("[V") & CJJCCCJ(Request.Form(CJCCJCC("6IA=2:?"))) & CJCCJCC("V") & CJCCJCC("[V") & CJCCJJJ(Request.Form(CJCCJCC("BF6DE:@?`"))) & CJCCJCC("V") & CJCCJCC("[V") & CJCCJJJ(Request.Form(CJCCJCC("BF6DE:@?a"))) & CJCCJCC("V") & CJCCJCC("[") & Request.Form(CJCCJCC("D@CE")) & CJCCJCC("[") & CJJJCCC  & CJCCJCC("X")
CCCJC.execute CJJJJC
elseif CJJCJJJ=CJCCJCC(">@5") and CJCJJJJ(CJJCJJC) then
CJJJJC=CJCCJCC("FA52E6 ,") & CJJCCJC & CJCCJCC(" ,D6E") & CJCCJCC(" ,?2>6lV") & CJJCCCJ(Request.Form(CJCCJCC("?2>6"))) & CJCCJCC("V") & CJCCJCC("[6?lV") &  CJJCCCJ(Request.Form(CJCCJCC("6?"))) & CJCCJCC("V") & CJCCJCC("[D9@CElV") &  CJJCCCJ(Request.Form(CJCCJCC("D9@CE"))) & CJCCJCC("V")  & CJCCJCC("[6IA=2:?lV") & CJJCCCJ(Request.Form(CJCCJCC("6IA=2:?"))) & CJCCJCC("V") & CJCCJCC("[BF6DE:@?`lV") & CJCCJJJ(Request.Form(CJCCJCC("BF6DE:@?`"))) & CJCCJCC("V") & CJCCJCC("[BF6DE:@?alV") & CJCCJJJ(Request.Form(CJCCJCC("BF6DE:@?a"))) & CJCCJCC("V") & CJCCJCC("[D@CEl") & Request.Form(CJCCJCC("D@CE")) & CJCCJCC(" ,H96C6 ,:5l") & CJJCJJC
CCCJC.execute CJJJJC:CJJCJJJ=""
end if
end if:dim CJCJCC,CJJCJCJ,CJCJJJ:CJCJCC=CJCJCCC:for CJCJJJ=1 to ubound(CJCJCC):if CJCJCC(CJCJJJ,0)=cint(CJJJCCC) then
CJJCJCJ=CJCJCC(CJCJJJ,1):exit for
end if:next:Response.Write(vbCrLf):Response.Write(CJCCJCC("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJCCJCC("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJCCJCC("k9625m") & vbCrLf):Response.Write(CJCCJCC("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCCJCC("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJCCJCC("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJCCJCC("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJCCJCC("kE:E=6m旛@栂@颓@斂@桞@k^E:E=6m") & vbCrLf):Response.Write(CJCCJCC("k=:?< ,9C67lQ]]^DEJ=6]4DDQ ,C6=lQDEJ=6D966EQm") & vbCrLf):Response.Write(CJCCJCC("kDEJ=6m") & vbCrLf):Response.Write(CJCCJCC("E5 ,L ,G6CE:42=\2=:8?i ,E@Aj ,N") & vbCrLf):Response.Write(CJCCJCC("k^DEJ=6m") & vbCrLf):Response.Write(CJCCJCC("k^9625m") & vbCrLf):Response.Write(CJCCJCC("k3@5Jm") & vbCrLf):Response.Write(CJCCJCC("k5:G ,4=2DDlQE:E=6Qm")):Response.Write  CJJCJCJ:Response.Write(CJCCJCC("k^5:Gm") & vbCrLf):Response.Write(CJCCJCC("kF= ,4=2DDlQE23Qm") & vbCrLf):Response.Write(CJCCJCC(" ,k=:mk2 ,9C67lQ>@5:7J]2DAn:5l")):Response.Write  CJJJCCC:Response.Write(CJCCJCC("Qm埵@朧@俜@恪@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCC(" ,k=:mk2 ,9C67lQBF6DE:@?]2DAn=3:5l")):Response.Write  CJJJCCC:Response.Write(CJCCJCC("Qm闩@颓@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCC(" ,k=: ,4=2DDlQ4FCC6?EQmk2 ,9C67lQ724E@C]2DAn=3:5l")):Response.Write  CJJJCCC:Response.Write(CJCCJCC("Qm四@孋@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCC(" ,k=:mk2 ,9C67lQ6IA=2:?]2DAn=3:5l")):Response.Write  CJJJCCC:Response.Write(CJCCJCC("Qm觞@釅@^廵@让@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCC(" ,k=:mk2 ,9C67lQ=:DE]2DAn:5l")):Response.Write  CJJJCCC:Response.Write(CJCCJCC("UA@DEl`Qm释@衣@划@衣@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCC("k^F=m") & vbCrLf):Response.Write(CJCCJCC("k7@C> ,:5lQ7@C>`Q ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQm") & vbCrLf):Response.Write(CJCCJCC(" ,（,好@林@释@衣@句@朄@四@孋@合@秫@，,沜@朄@共@仑@冀@宴@，,刔@诠@顰@畔@穵@，,轧@臮@,k2 ,9C67lQ>@5:7J]2DAn:5l")):Response.Write  CJJJCCC:Response.Write(CJCCJCC("Qm释@衣@埵@朧@俜@恪@k^2m.塦@冔@）,") & vbCrLf):Response.Write(CJCCJCC(" ,kE23=6 ,4=2DDlQE30=:DEQm") & vbCrLf):Response.Write(CJCCJCC(" ,kECm") & vbCrLf):Response.Write(CJCCJCC(" ,kE9 ,E:E=6lQ,D@CE.页@床@仉@“,_”,廻@姆@，,这@绨@缑@史@丏@丈@胸@釈@夈@。,掍@划@页@床@丈@胸@轶@明@课@敯@，,吡@刔@彬@哈@浆@诐@绎@林@Qm页@床@k^E9m") & vbCrLf):Response.Write(CJCCJCC(" ,kE9 ,E:E=6lQ,?2>6.丨@斂@合@秫@Qm丨@斂@合@秫@k^E9m") & vbCrLf):Response.Write(CJCCJCC(" ,kE9 ,E:E=6lQ,6?.只@仠@畔@穵@Qm苬@斂@k^E9m") & vbCrLf):Response.Write(CJCCJCC(" ,kE9 ,E:E=6lQ,D9@CE.只@仠@畔@穵@Qm苬@斂@筻@秫@k^E9m") & vbCrLf):Response.Write(CJCCJCC(" ,kE9 ,E:E=6lQ,6IA=2:?.Qm觞@釅@k^E9m") & vbCrLf):Response.Write(CJCCJCC(" ,kE9 ,E:E=6lQ,BF6DE:@?`.好@林@柋@亖@闩@颓@屙@争@丄@严@我@仠@丅@四@孋@癿@，,圣@歟@塦@冔@闩@颓@癿@床@史@，,産@竑@纺@随@廻@；,一,严@闩@颓@句@彍@屙@一,严@我@丟@严@四@孋@癿@诲@轧@臮@“,闩@颓@”,顰@淶@力@Qm杜@盩@划@衣@`k^E9m") & vbCrLf):Response.Write(CJCCJCC(" ,kE9 ,E:E=6lQ,BF6DE:@?a.靍@幯@亵@样@闩@卲@Wr!xX^儺@章@臥@戌@愊@证@释@衣@W!wr$$X囙@筏@“,吡@”,力@刁@癿@颓@盩@（,囙@筏@“,昪@”,力@刁@癿@颓@盩@淶@力@别@杜@盩@划@衣@`）,Qm杜@盩@划@衣@ak^E9m") & vbCrLf):Response.Write(CJCCJCC(" ,kE9m擈@佗@k^E9m") & vbCrLf):Response.Write(CJCCJCC(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCC(" ,")):CJCJJJ=1:set CCCCC=CCCJC.execute(CJCCJCC("D6=64E ,:5[?2>6[6?[D9@CE[6IA=2:?[D@CE[BF6DE:@?`[BF6DE:@?a ,7C@> ,") & CJJCCJC & CJCCJCC(" ,H96C6 ,=3l") & CJJJCCC & CJCCJCC(" ,@C56C ,3J ,D@CE")):while not CCCCC.eof:if CJJCJJJ=CJCCJCC(">@5") and CJJCJJC=cstr(CCCCC(0)) then
Response.Write(vbCrLf):Response.Write(CJCCJCC(" ,kECm") & vbCrLf):Response.Write(CJCCJCC(" ,kE5 ,2=:8?lQ46?E6CQmk:?AFE ,?2>6lQD@CEQ ,EJA6lQE6IEQ ,D:K6lQaQ ,G2=F6lQ")):Response.Write  CCCCC(5):Response.Write(CJCCJCC("Qmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:?AFE ,?2>6lQ?2>6Q ,EJA6lQE6IEQ ,D:K6lQa_Q ,G2=F6lQ")):Response.Write  CCCCC(1):Response.Write(CJCCJCC("Qmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:?AFE ,?2>6lQ6?Q ,EJA6lQE6IEQ ,D:K6lQa_Q ,G2=F6lQ")):Response.Write  CCCCC(2):Response.Write(CJCCJCC("Qmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:?AFE ,?2>6lQD9@CEQ ,EJA6lQE6IEQ ,D:K6lQdQ ,G2=F6lQ")):Response.Write  CCCCC(3):Response.Write(CJCCJCC("Qmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mkE6IE2C62 ,?2>6lQ6IA=2:?Q ,4@=DlQb_Qm")):Response.Write  CCCCC(4):Response.Write(CJCCJCC("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:?AFE ,?2>6lQBF6DE:@?`Q ,EJA6lQE6IEQ ,D:K6lQb_Q ,G2=F6lQ")):Response.Write  CCCCC(6):Response.Write(CJCCJCC("Qmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:?AFE ,?2>6lQBF6DE:@?aQ ,EJA6lQE6IEQ ,D:K6lQb_Q ,G2=F6lQ")):Response.Write  CCCCC(7):Response.Write(CJCCJCC("Qmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5 ,2=:8?lQC:89EQ ,?@HC2Am") & vbCrLf):Response.Write(CJCCJCC(" ,k2 ,9C67lQ;2G2D4C:AEi5@4F>6?E]7@C>`]DF3>:EWXjQm硩@宕@k^2m") & vbCrLf):Response.Write(CJCCJCC(" ,k2 ,9C67lQn=3:5l")):Response.Write  CJJJCCC:Response.Write(CJCCJCC("Qm发@涃@k^2m") & vbCrLf):Response.Write(CJCCJCC(" ,k^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCC(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CJCCJCC(" ,kECm") & vbCrLf):Response.Write(CJCCJCC(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CCCCC(5):Response.Write(CJCCJCC("k^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5m")):Response.Write  CCCCC(1):Response.Write(CJCCJCC("k^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5m")):Response.Write  CCCCC(2):Response.Write(CJCCJCC("k^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5m")):Response.Write  CCCCC(3):Response.Write(CJCCJCC("k^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5m")):Response.Write  replace(CCCCC(4),vbcrlf,CJCCJCC("k3Cm")):Response.Write(CJCCJCC("k^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:>8 ,4=2DDlQG:6HQ ,DC4lQ]]^]]^:>286D^G:6H]8:7Q ,E:E=6lQ")):Response.Write  CCCCC(6):Response.Write(CJCCJCC("Qm")):Response.Write  CJJCCCC(CCCCC(6),40):Response.Write(CJCCJCC("k^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:>8 ,4=2DDlQG:6HQ ,DC4lQ]]^]]^:>286D^G:6H]8:7Q ,E:E=6lQ")):Response.Write  CCCCC(7):Response.Write(CJCCJCC("Qm")):Response.Write  CJJCCCC(CCCCC(7),40):Response.Write(CJCCJCC("k^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5 ,2=:8?lQC:89EQ ,?@HC2Am") & vbCrLf):Response.Write(CJCCJCC(" ,k2 ,9C67lQn=3:5l")):Response.Write  CJJJCCC:Response.Write(CJCCJCC("U24El>@5U:5l")):Response.Write  CCCCC(0):Response.Write(CJCCJCC("Qm俩@攴@k^2m") & vbCrLf):Response.Write(CJCCJCC(" ,k2 ,9C67lQn=3:5l")):Response.Write  CJJJCCC:Response.Write(CJCCJCC("U24El56=U:5l")):Response.Write  CCCCC(0):Response.Write(CJCCJCC("Qm创@陟@k^2m") & vbCrLf):Response.Write(CJCCJCC(" ,k^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCC(" ,"))
end if:CCCCC.movenext:CJCJJJ=CJCJJJ+1:wend:if CJJCJJJ=CJCCJCC("255") then
Response.Write(vbCrLf):Response.Write(CJCCJCC(" ,kECm") & vbCrLf):Response.Write(CJCCJCC(" ,kE5 ,2=:8?lQ46?E6CQmk:?AFE ,?2>6lQD@CEQ ,EJA6lQE6IEQ ,D:K6lQaQ ,G2=F6lQ")):Response.Write  CJCJJJ:Response.Write(CJCCJCC("Qmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:?AFE ,?2>6lQ?2>6Q ,EJA6lQE6IEQ ,D:K6lQa_Qmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:?AFE ,?2>6lQ6?Q ,EJA6lQE6IEQ ,D:K6lQa_Qmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:?AFE ,?2>6lQD9@CEQ ,EJA6lQE6IEQ ,D:K6lQdQmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mkE6IE2C62 ,?2>6lQ6IA=2:?Q ,4@=DlQb_Qmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:?AFE ,?2>6lQBF6DE:@?`Q ,EJA6lQE6IEQ ,D:K6lQb_Qmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5mk:?AFE ,?2>6lQBF6DE:@?aQ ,EJA6lQE6IEQ ,D:K6lQb_Qmk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,kE5 ,2=:8?lQC:89EQ ,?@HC2Am") & vbCrLf):Response.Write(CJCCJCC(" ,k2 ,9C67lQ;2G2D4C:AEi5@4F>6?E]7@C>`]DF3>:EWXjQm硩@宕@k^2m") & vbCrLf):Response.Write(CJCCJCC(" ,k2 ,9C67lQn=3:5l")):Response.Write  CJJJCCC:Response.Write(CJCCJCC("Qm发@涃@k^2m") & vbCrLf):Response.Write(CJCCJCC(" ,k^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCC(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CJCCJCC(" ,kECm") & vbCrLf):Response.Write(CJCCJCC(" ,kE5 ,4@=DA2?lQgQ ,2=:8?lQC:89EQmk2 ,9C67lQn=3:5l")):Response.Write  CJJJCCC:Response.Write(CJCCJCC("U24El255Qm淶@力@k^2mk^E5m") & vbCrLf):Response.Write(CJCCJCC(" ,k^ECm") & vbCrLf):Response.Write(CJCCJCC(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJCCJCC(" ,k^E23=6m") & vbCrLf):Response.Write(CJCCJCC("k^7@C>m") & vbCrLf):Response.Write(CJCCJCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCC("kD4C:AE ,DC4lQ^$4C:AED^2FE@D:K6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E23=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E:E=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCC("kD4C:AEm") & vbCrLf):Response.Write(CJCCJCC("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCJCC(" ,SWVE23=6]E30=:DEVX];%23=6WX") & vbCrLf):Response.Write(CJCCJCC(" ,SWVE9,E:E=6.VX];%:E=6WLDEJ=6iV3=24<VNX") & vbCrLf):Response.Write(CJCCJCC(" ,SWV:>8,E:E=6.VX];%:E=6WLDEJ=6iV3=F6VNX") & vbCrLf):Response.Write(CJCCJCC(" ,SWV2i4@?E2:?DWQ创@陟@QXV[SWVE23=6]E30=:DEVXX]4=:4<W7F?4E:@?WXLC6EFC? ,4@?7:C>WV硩@讟@：,患@昪@眚@癿@襼@创@陟@诠@顴@盩@吒@？,VXNX") & vbCrLf):Response.Write(CJCCJCC(" ,2FE@D:K6WSWVE6IE2C62VXX") & vbCrLf):Response.Write(CJCCJCC("NX") & vbCrLf):Response.Write(CJCCJCC("k^D4C:AEm") & vbCrLf):Response.Write(CJCCJCC("k^3@5Jm") & vbCrLf):Response.Write(CJCCJCC("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJCJJCJ=nothing:set CJCJJCC=nothing:set CJCJCJJ=nothing:set CJCJCJC=nothing:CJJJJJ.Close:Set CJJJJJ=Nothing:CCCCC.Close:Set CCCCC=Nothing:CCCJC.Close:Set CCCJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CJCCJCC(ByVal CJJCCC)
Dim CJJCJCC, CJCJJJ, CJCCCC
CJJCCC = Replace(CJJCCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CJCJJJ = 1 To Len(CJJCCC)
If CJCJJJ <> CJCCCC Then
CJJCJCC = AscW(Mid(CJJCCC, CJCJJJ, 1))
If CJJCJCC >= 33 And CJJCJCC <= 79 Then
CJCCJCC = CJCCJCC & Chr(CJJCJCC + 47)
ElseIf CJJCJCC >= 80 And CJJCJCC <= 126 Then
CJCCJCC = CJCCJCC & Chr(CJJCJCC - 47)
Else
CJCCCC = CJCJJJ + 1
If Mid(CJJCCC, CJCCCC, 1) = Chr(64) Then CJCCJCC = CJCCJCC & ChrW(CJJCJCC + 5) Else CJCCJCC = CJCCJCC & Mid(CJJCCC, CJCJJJ, 1)
End If
End If
Next
End Function
%>