<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CJJCJC, CJJCCJ,CJJCCC, CJCJJJ, CJCJJC:Set CJJCJC = server.CreateObject(CCJJJJJ("ps~sq]r@??64E:@?")):CJJCJC.open Application(CCJJJJJ("r@??64E:@?$EC:?8")):Set CJJCCJ=CJJCJC::Dim CJCJCJ,CJCJCC,CJCCJJ,CJCCJC,CJCCCJ,CJCCCC,CCJJJJ,CCJJJC,CCJJCJ:Dim CCJJCC,CCJCJJ,CCJCJC,CCJCCJ,CCJCCC,CCCJJJ:Dim CCCJJC,CCCJCJ,CCCJCC:Dim CCCCJJ:CCCCJJ=Trim(Request.Cookies(CCJJJJJ("!$*|t|qt#"))):if CCCCJJ="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CJCJCJ>0 then
CJCJJC=CCJJJJJ("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") & CJCJCC & CCJJJJJ("V ,2?5 ,:5l") & CJCJCJ
set CJJCCC=CJJCJC.execute(CJCJJC):If CJJCCC.EOF Then
Call ClearMemberCookie
Else
CJCCJJ=CJJCCC(2) & "":CJCCJC=CJJCCC(3):CJCCCJ=CJJCCC(5):CJCCCC=CJJCCC(6):CCJJJJ=CJJCCC(9):CCJJJC=CJJCCC(15):CCJJCC=CJJCCC(0):CCCJCJ=CJJCCC(1):CCCJJC=CJJCCC(11) & "":CCJCJJ=CJJCCC(10) & "":CCJJCJ=CJJCCC(12):CCJCJC=CJJCCC(14):CCJCCJ=CJJCCC(13):CCJCCC=CJJCCC(7) & "":CCCJJJ=CJJCCC(4):CCCJCC=CJJCCC(8):if isnull(CCJJJC) then CCJJJC=0
if isnull(CCJJJJ) or CCJJJJ=0 then CCJJJJ=CJCCJC
if isnull(CCCJJJ) then CCCJJJ=0
if isnull(CJCCCJ) then CJCCCJ=0
if instr(CCJJJJJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CJCJCC)>0 then Call RedirectMessage(CCJJJJJ("弬@寁@矼@，,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,"))
Call SetMemberCookie(CJCJCJ,CJCJCC)
End IF
end if:Sub CheckRight(CJJCJJJ):dim CCCCJC,CCCCCJ:if CJCJCJ=0 then
Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CCJJJJJ("癶@彐@俜@恪@夬@敃@，,诲@釈@斫@癶@彐@。,"))
elseIf not CJCJCJJ(CJJCJJJ) then
Call RedirectMessage(CCJJJJJ("朾@陋@W") & CJJCJJJ & CCJJJJJ("X袦@祼@歝@，,诲@三@糶@绚@箜@琁@呓@聏@糶@。,"))
end if:End Sub:Function CJCJCJJ(CJJCJJJ):dim CCCCJC,CCCCCJ:CCCCCJ=split(CJJCJJJ,CCJJJJJ("[")):CJCJCJJ=False:for CCCCJC=0 to ubound(CCCCCJ):If Mid(CJCCJJ,CCCCCJ(CCCCJC),1)="1" then
CJCJCJJ=True:exit function
end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CCJJJJJ("!$*|t|qt#"))="":CJCJCJ=0:CJCCCC=0:CJCJCC=Empty:CJCCCJ=0:CCJJJC=0:CCJJJJ=0:CJCCJC=0:CCJJCC=False:CCCJCJ=False:CCCJCC=Empty:End Sub:Sub CheckMemberCookie():dim CCCCCC,CJJJJJJ,CCCCJC,CJJJJJC,CJJJJCJ:CCCCCC=split(CCCCJJ,CCJJJJJ("]")):if ubound(CCCCCC)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CCCCCC(0)) or len(CCCCCC(1))<>32 or len(CCCCCC(2))<>32 then
Call ClearMemberCookie
else
CJJJJJJ=CCCCCC(1):for CCCCJC=1 to len(CJJJJJJ):CJJJJJC=mid(CJJJJJJ,CCCCJC,1):if isnumeric(CJJJJJC) then CJJJJCJ=CJJJJCJ & CJJJJJC
if len(CJJJJCJ)=7 then exit for
next:CJJJJJJ=CCCCCC(2):if CJJJJCJ<>mid(CJJJJJJ,6,7) then
Call ClearMemberCookie
else
CJJJJJC=mid(CJJJJJJ,18,10)/2:if CJJJJJC<DateDiff(CCJJJJJ("D"), CCJJJJJ("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CJCJCJ=Clng(CCCCCC(0)):CJCJCC=CCCCCC(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CJJCCJJ,CCJJJJC):dim CCCCJC,CJJJJJC,CJJJJCJ:for CCCCJC=1 to len(CCJJJJC):CJJJJJC=mid(CCJJJJC,CCCCJC,1):if isnumeric(CJJJJJC) then CJJJJCJ=CJJJJCJ & CJJJJJC
if len(CJJJJCJ)=7 then exit for
next:CJJJJCJ=CJJCCJJ & CCJJJJJ("]") & CCJJJJC & CCJJJJJ("]") & Fix(10000*(Rnd+1)) & CJJJJCJ & Fix(10000*(Rnd+1)) & DateDiff(CCJJJJJ("D"), CCJJJJJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CCJJJJJ("!$*|t|qt#"))=CJJJJCJ:End Sub::Function CJCJCJC(CCJJJCJ):Dim str,CJJJCJJ:str = Trim(CCJJJCJ):If IsNull(str) Or str = "" Then
CJCJCJC = ""
else
str=Replace(str, CCJJJJJ("V"), "")
str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CCJJJJJ("k:7C2>6"), CCJJJJJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CCJJJJJ("kD4C:AE"), CCJJJJJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJJJCJJ=new RegExp:CJJJCJJ.Pattern=CCJJJJJ("@?W,2\K.ZXl"):CJJJCJJ.IgnoreCase = True:CJJJCJJ.Global=True:str=CJJJCJJ.Replace(str,CCJJJJJ("@?S`U6BF2=Dj")):set CJJJCJJ=nothing:CJCJCJC=str
End If:End Function::Const CJCJJCJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CCJJJCC,CCJJCJJ):dim CCCCCC:CCCCCC=CCJJJCC & "=" & CCJJCJJ & CCJJJJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CCJJJJJ("$6E\r@@<:6"),CCCCCC):End Sub:::::::Function CJCJCCJ(CJCJJJC):if isnull(CJCJJJC) or trim(CJCJJJC)="" or not isnumeric(CJCJJJC) then
CJCJCCJ=false
else
Dim CJJJCJJ:Set CJJJCJJ = New RegExp:CJJJCJJ.Pattern = CCJJJJJ("/-5ZS"):CJJJCJJ.IgnoreCase = True:CJCJCCJ = CJJJCJJ.test(CJCJJJC):set CJJJCJJ=nothing
end if:End Function:Function CJCJCCC(CCJJCJC):dim CJJJCJC,CJJJCCJ:CJJJCJC=CCJJJJJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CCJJCJC & CCJJJJJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJJJCCJ=CJJCJC.execute(CJJJCJC):CJCJCCC = CJJJCCJ(0):if isnull(CJCJCCC) then CJCJCCC=1
CJJJCCJ.close : set CJJJCCJ=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CJCCJJJ=nothing:set CJCCJJC=nothing:set CJCCJCJ=nothing:set CJCCJCC=nothing:CJJJCCJ.close : set CJJJCCJ=nothing:CJCJJJ.Close : Set CJCJJJ=Nothing:CJJCCC.Close : Set CJJCCC=Nothing:CJCCCJJ.Close : Set CJCCCJJ = Nothing:CJJCJC.Close : Set CJJCJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCJJCCJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CCJJJJJ("!$*0|6DD286"),server.URLEncode(CCJJCCJ)):Response.Redirect CCJJJJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::Function CJCCCJC():Dim CJJJCCJ, CJJJCCC(), CCCCJC, CJJJJJC, CJJCJJJ,CJJCJJC:If Not IsArray(Application(CCJJJJJ("!$*0%6DED"))) Then
CJCJJC=CCJJJJJ("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 CJJJCCJ=server.createobject(CCJJJJJ("25@53]C64@C5D6E")):CJJJCCJ.open CJCJJC,CJJCJC,1:CJJCJJJ = CJJJCCJ.RecordCount:CJJCJJC=CJJJCCJ.fields.count-1:ReDim CJJJCCC(CJJCJJJ, CJJCJJC):If CJJCJJJ > 0 Then
For CCCCJC = 1 To CJJCJJJ:For CJJJJJC = 0 To CJJCJJC:if CJJJJJC=4 or CJJJJJC=6 or CJJJJJC=19 then
CJJJCCC(CCCCJC, CJJJJJC) = CJCCCCJ(CJJJCCJ(CJJJJJC))
else
CJJJCCC(CCCCJC, CJJJJJC) = CJJJCCJ(CJJJJJC):if CJJJCCJ(CJJJJJC).type<>11 and isnull(CJJJCCC(CCCCJC, CJJJJJC)) then CJJJCCC(CCCCJC, CJJJJJC)=""
end if:Next:CJJJCCJ.MoveNext:Next
End If:CJJJCCJ.Close: Set CJJJCCJ = Nothing:Application(CCJJJJJ("!$*0%6DED")) = CJJJCCC
End If:CJCCCJC = Application(CCJJJJJ("!$*0%6DED")):End Function::::::::::::::::::::::::::::::Function CJCCCCJ(CCJJCCC):if isnull(CCJJCCC) then
CJCCCCJ=""
else
On Error Resume Next:CJCCCCJ=CCJJCCC:if err.number=-2147352567 then
CJCCCCJ="":err.Clear
end if
end if:End Function::::::Call CheckRight(13):Const CJCJJCC="lbexplain":dim CJJCJCJ,CJJCJCC,CJJCCJJ:CJJCJCJ=Request.QueryString("lbid"):CJJCJCC=Request.QueryString(CCJJJJJ("24E")):CJJCCJJ=Request.QueryString(CCJJJJJ(":5")):if not CJCJCCJ(CJJCJCJ) then Call RedirectMessage(CCJJJJJ("揋@礵@俜@恪@M寴@丈@赲@，,糶@绚@厽@敫@丝@夬@！,"))
if CJJCJCC=CCJJJJJ("56=") and CJCJCCJ(CJJCCJJ) then
CJJCJC.execute(CCJJJJJ("56=6E6 ,7C@> ,") & CJCJJCC & CCJJJJJ(" ,H96C6 ,:5l") & CJJCCJJ)
end if:if Request.ServerVariables(CCJJJJJ("#t""&t$%0|t%w~s"))=CCJJJJJ("!~$%") then
dim CJJCCJC,CJJCCCJ:CJJCCJC=Request.Form(CCJJJJJ("724E@C")):CJJCCCJ=Request.Form(CCJJJJJ("8C256")):if not CJCJCCJ(CJJCCJC) then CJJCCJC=CCJJJJJ("}F==")
if not CJCJCCJ(CJJCCCJ) then CJJCCJC=CCJJJJJ("}F==")
if CJJCJCC=CCJJJJJ("255") then
CJCJJC=CCJJJJJ(":?D6CE ,") & CJCJJCC & CCJJJJJ("W:5[6IA=2:?`[6IA=2:?a[724E@C[724E@Ca[724E@C?2>6[8C256[D@CE[=3X ,G2=F6DW") & CJCJCCC(CJCJJCC) & CCJJJJJ("[V") & CJCJCJC(Request.Form(CCJJJJJ("6IA=2:?`"))) & CCJJJJJ("V") & CCJJJJJ("[V") & CJCJCJC(Request.Form(CCJJJJJ("6IA=2:?a"))) & CCJJJJJ("V") & CCJJJJJ("[") & CJJCCJC  & CCJJJJJ("[V") & CJCJCJC(Request.Form(CCJJJJJ("724E@Ca"))) & CCJJJJJ("V") & CCJJJJJ("[V") & CJCJCJC(Request.Form(CCJJJJJ("724E@C?2>6"))) & CCJJJJJ("V") & CCJJJJJ("[") & CJJCCCJ  & CCJJJJJ("[") & Request.Form(CCJJJJJ("D@CE")) & CCJJJJJ("[") & CJJCJCJ  & CCJJJJJ("X")
CJJCJC.execute CJCJJC
elseif CJJCJCC=CCJJJJJ(">@5") and CJCJCCJ(CJJCCJJ) then
CJCJJC=CCJJJJJ("FA52E6 ,") & CJCJJCC & CCJJJJJ(" ,D6E") & CCJJJJJ(" ,6IA=2:?`lV") & CJCJCJC(Request.Form(CCJJJJJ("6IA=2:?`"))) & CCJJJJJ("V")  & CCJJJJJ("[6IA=2:?alV") & CJCJCJC(Request.Form(CCJJJJJ("6IA=2:?a"))) & CCJJJJJ("V")  & CCJJJJJ("[724E@Cl") & CJJCCJC  & CCJJJJJ("[724E@CalV") & CJCJCJC(Request.Form(CCJJJJJ("724E@Ca"))) & CCJJJJJ("V") & CCJJJJJ("[724E@C?2>6lV") &  CJCJCJC(Request.Form(CCJJJJJ("724E@C?2>6"))) & CCJJJJJ("V")  & CCJJJJJ("[8C256l") &  CJJCCCJ  & CCJJJJJ("[D@CEl") & Request.Form(CCJJJJJ("D@CE")) & CCJJJJJ(" ,H96C6 ,:5l") & CJJCCJJ
CJJCJC.execute CJCJJC:CJJCJCC=""
end if
end if:dim CJJJCCC,CJJCCCC,CCCCJC:CJJJCCC=CJCCCJC:for CCCCJC=1 to ubound(CJJJCCC):if CJJJCCC(CCCCJC,0)=cint(CJJCJCJ) then
CJJCCCC=CJJJCCC(CCCCJC,1):exit for
end if:next:Response.Write(vbCrLf):Response.Write(CCJJJJJ("kP5@4EJA6 ,9E>=m") & vbCrLf):Response.Write(CCJJJJJ("k9E>=m") & vbCrLf):Response.Write(CCJJJJJ("k9625m") & vbCrLf):Response.Write(CCJJJJJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CCJJJJJ("kE:E=6m旛@栂@颓@斂@桞@k^E:E=6m") & vbCrLf):Response.Write(CCJJJJJ("k=:?< ,9C67lQ]]^DEJ=6]4DDQ ,C6=lQDEJ=6D966EQ ,^m") & vbCrLf):Response.Write(CCJJJJJ("kDEJ=6m") & vbCrLf):Response.Write(CCJJJJJ("E5 ,L ,G6CE:42=\2=:8?i ,E@Aj ,N") & vbCrLf):Response.Write(CCJJJJJ("k^DEJ=6m") & vbCrLf):Response.Write(CCJJJJJ("k^9625m") & vbCrLf):Response.Write(CCJJJJJ("k3@5Jm") & vbCrLf):Response.Write(CCJJJJJ("k5:G ,4=2DDlQE:E=6Qm")):Response.Write  CJJCCCC:Response.Write(CCJJJJJ("k^5:Gm") & vbCrLf):Response.Write(CCJJJJJ("kF= ,4=2DDlQE23Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,k=:mk2 ,9C67lQ>@5:7J]2DAn:5l")):Response.Write  CJJCJCJ:Response.Write(CCJJJJJ("Qm埵@朧@俜@恪@k^2mk^=:m") & vbCrLf):Response.Write(CCJJJJJ(" ,k=:mk2 ,9C67lQBF6DE:@?]2DAn=3:5l")):Response.Write  CJJCJCJ:Response.Write(CCJJJJJ("Qm闩@颓@k^2mk^=:m") & vbCrLf):Response.Write(CCJJJJJ(" ,k=:mk2 ,9C67lQ724E@C]2DAn=3:5l")):Response.Write  CJJCJCJ:Response.Write(CCJJJJJ("Qm四@孋@k^2mk^=:m") & vbCrLf):Response.Write(CCJJJJJ(" ,k=: ,4=2DDlQ4FCC6?EQmk2 ,9C67lQ6IA=2:?]2DAn=3:5l")):Response.Write  CJJCJCJ:Response.Write(CCJJJJJ("Qm觞@釅@k^2mk^=:m") & vbCrLf):Response.Write(CCJJJJJ(" ,k=:mk2 ,9C67lQ=:DE]2DAQm释@衣@划@衣@k^2mk^=:m") & vbCrLf):Response.Write(CCJJJJJ("k^F=m") & vbCrLf):Response.Write(CCJJJJJ("k7@C> ,:5lQ7@C>`Q ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQm") & vbCrLf):Response.Write(CCJJJJJ(" ,k5:G ,2=:8?lQC:89EQmk:?AFE ,EJA6lQ3FEE@?Q ,G2=F6lQ寷@ ,凵@Q ,:5lQ3E?\6IA@CEQ ,4=2DDlQ3FEE@?Qmk^5:Gm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE23=6 ,4=2DDlQE30=:DEQm") & vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE9 ,E:E=6lQ,D@CE.掍@床@敫@孒@仉@`廻@姆@，,忀@顶@这@绨@丏@丈@胸@釈@夈@，,觞@釅@页@床@挄@煢@四@孋@掍@划@页@床@Qm页@床@k^E9m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE9 ,E:E=6lQ,6IA=2:?`.觞@釅@斂@孒@癿@戻@朄@殰@萸@殰@馑@丈@襼@穵@样@，,殰@尹@丈@襼@穵@衇@，,`e!u释@衣@句@儼@讳@一,殰@斂@孒@Qm帳@覿@觞@釅@k^E9m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE9 ,E:E=6lQ,6IA=2:?a.一,舧@産@争@袦@诐@耀@柠@眆@癿@觞@釅@，,好@林@释@衣@旛@歟@電@氽@刔@畔@穵@Qm叆@奸@觞@釅@k^E9m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE9 ,E:E=6lQ,724E@C.厽@力@绎@林@讜@箒@，,丈@襼@轶@明@俩@攴@，,塦@冔@敫@孒@我@畔@穵@Qm四@孋@敫@孒@k^E9m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE9 ,E:E=6lQ,724E@Ca.厽@力@绎@林@讜@箒@，,柋@亖@释@衣@産@孒@毈@衣@礵@四@孋@，,一,舧@释@衣@畔@穵@Qm四@孋@孒@毈@k^E9m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE9 ,E:E=6lQ,724E@C?2>6.四@孋@误@昉@孒@殰@句@赲@揋@礵@佗@産@，,只@仠@筻@冔@我@耀@畔@穵@Qm四@孋@误@昉@k^E9m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE9 ,E:E=6lQ,8C256.刁@殰@衣@礵@髓@丨@佉@我@耀@佉@丨@髓@，,郸@仉@_廻@姆@，,丈@刁@殰@癿@觞@釅@畔@穵@Qm刁@殰@k^E9m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE9m擈@佗@k^E9m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,")):CCCCJC=1:set CJJCCC=CJJCJC.execute(CCJJJJJ("D6=64E ,:5[6IA=2:?`[724E@C?2>6[8C256[D@CE[724E@C[6IA=2:?a[724E@Ca ,7C@> ,") & CJCJJCC & CCJJJJJ(" ,H96C6 ,=3l") & CJJCJCJ & CCJJJJJ(" ,@C56C ,3J ,D@CE")):while not CJJCCC.eof:if CJJCJCC=CCJJJJJ(">@5") and CJJCCJJ=cstr(CJJCCC(0)) then
Response.Write(vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5 ,2=:8?lQ46?E6CQmk2 ,?2>6lQ")):Response.Write  CJJCCC(0):Response.Write(CCJJJJJ("Q ,^m") & vbCrLf):Response.Write(CCJJJJJ(" ,k:?AFE ,?2>6lQD@CEQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQbQ ,G2=F6lQ")):Response.Write  CJJCCC(4):Response.Write(CCJJJJJ("Q ,^mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQ6IA=2:?`Q ,4@=DlQd_Q ,C@HDlQcQ ,4=2DDlQE6IEQm")):Response.Write  CJJCCC(1):Response.Write(CCJJJJJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQ6IA=2:?aQ ,4@=DlQb_Q ,C@HDlQcQ ,4=2DDlQE6IEQm")):Response.Write  CJJCCC(6):Response.Write(CCJJJJJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ724E@CQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQdQ ,G2=F6lQ")):Response.Write  CJJCCC(5):Response.Write(CCJJJJJ("Q ,^mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ724E@CaQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQdQ ,G2=F6lQ")):Response.Write  CJJCCC(7):Response.Write(CCJJJJJ("Q ,^mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ724E@C?2>6Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQ`dQ ,G2=F6lQ")):Response.Write  CJJCCC(2):Response.Write(CCJJJJJ("Q ,^mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ8C256Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQaQ ,G2=F6lQ")):Response.Write  CJJCCC(3):Response.Write(CCJJJJJ("Q ,^mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5 ,2=:8?lQC:89EQmk2 ,9C67lQ;2G2D4C:AEi5@4F>6?E]7@C>`]DF3>:EWXjQm硩@宕@k^2m ,k2 ,9C67lQn=3:5l")):Response.Write  CJJCJCJ:Response.Write(CCJJJJJ("Qm发@涃@k^2mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CJJCCC(4):Response.Write(CCJJJJJ("k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m")):Response.Write  CJJCCC(1):Response.Write(CCJJJJJ("k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m")):Response.Write  CJJCCC(6):Response.Write(CCJJJJJ("k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CJJCCC(5):Response.Write(CCJJJJJ("k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m")):Response.Write  CJJCCC(7):Response.Write(CCJJJJJ("k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5 ,?@HC2Am")):Response.Write  CJJCCC(2):Response.Write(CCJJJJJ("k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5m")):Response.Write  CJJCCC(3):Response.Write(CCJJJJJ("k^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5 ,2=:8?lQC:89EQ ,?@HC2Amk2 ,9C67lQn=3:5l")):Response.Write  CJJCJCJ:Response.Write(CCJJJJJ("U24El>@5U:5l")):Response.Write  CJJCCC(0):Response.Write(CCJJJJJ("R")):Response.Write  CJJCCC(0):Response.Write(CCJJJJJ("Qm俩@攴@k^2m ,k2 ,9C67lQn=3:5l")):Response.Write  CJJCJCJ:Response.Write(CCJJJJJ("U24El56=U:5l")):Response.Write  CJJCCC(0):Response.Write(CCJJJJJ("Qm创@陟@k^2mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,"))
end if:CJJCCC.movenext:CCCCJC=CCCCJC+1:wend:if CJJCJCC=CCJJJJJ("255") then
Response.Write(vbCrLf):Response.Write(CCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5 ,2=:8?lQ46?E6CQmk2 ,?2>6lQ_Q ,^m") & vbCrLf):Response.Write(CCJJJJJ(" ,k:?AFE ,?2>6lQD@CEQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQbQ ,G2=F6lQ")):Response.Write  CCCCJC:Response.Write(CCJJJJJ("Q ,^mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQ6IA=2:?`Q ,4@=DlQd_Q ,C@HDlQcQ ,4=2DDlQE6IEQmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQ6IA=2:?aQ ,4@=DlQb_Q ,C@HDlQcQ ,4=2DDlQE6IEQmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ724E@CQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQdQ ,^mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ724E@CaQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQdQ ,^mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ724E@C?2>6Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,D:K6lQ`dQ ,^mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ8C256Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,G2=F6lQ_Q ,D:K6lQaQ ,^mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5 ,2=:8?lQC:89EQmk2 ,9C67lQ;2G2D4C:AEi5@4F>6?E]7@C>`]DF3>:EWXjQm硩@宕@k^2m ,k2 ,9C67lQn=3:5l")):Response.Write  CJJCJCJ:Response.Write(CCJJJJJ("Qm发@涃@k^2mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,"))
Else
Response.Write(vbCrLf):Response.Write(CCJJJJJ(" ,kEC ,4=2DDlQ?@tI=Qm") & vbCrLf):Response.Write(CCJJJJJ(" ,kE5 ,4@=DA2?lQgQ ,2=:8?lQC:89EQmk2 ,9C67lQn=3:5l")):Response.Write  CJJCJCJ:Response.Write(CCJJJJJ("U24El255R_Qm淶@力@k^2mk^E5m") & vbCrLf):Response.Write(CCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CCJJJJJ(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CCJJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCJJJJJ("k^7@C>m") & vbCrLf):Response.Write(CCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E23=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E:E=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]E23=6a6I46=];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("kD4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CCJJJJJ(" ,SWQE23=6]E30=:DEQX];%23=6WXj") & vbCrLf):Response.Write(CCJJJJJ(" ,SWQE9,E:E=6.QX];%:E=6WLDEJ=6iQ3=24<QNXj") & vbCrLf):Response.Write(CCJJJJJ(" ,SWQ:>8,E:E=6.QX];%:E=6WLDEJ=6iQ3=F6QNXj") & vbCrLf):Response.Write(CCJJJJJ(" ,SWQ2i4@?E2:?DWV创@陟@VXQX]4=:4<W7F?4E:@?WXLC6EFC? ,4@?7:C>WQ硩@讟@：,患@昪@眚@癿@襼@创@陟@诠@顴@盩@吒@？,QXjNXj") & vbCrLf):Response.Write(CCJJJJJ(" ,^^寷@凵@") & vbCrLf):Response.Write(CCJJJJJ(" ,SWVR3E?\6IA@CEVX]@?WV4=:4<V[7F?4E:@?WXLSWVE23=6]E30=:DEVX]E23=6a6I46=WL7:=66IEiV]I=DVNXjNXj") & vbCrLf):Response.Write(CCJJJJJ("NXj") & vbCrLf):Response.Write(CCJJJJJ("k^D4C:AEm") & vbCrLf):Response.Write(CCJJJJJ("k^3@5Jm") & vbCrLf):Response.Write(CCJJJJJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJCCJJJ=nothing:set CJCCJJC=nothing:set CJCCJCJ=nothing:set CJCCJCC=nothing:CJCJJJ.Close:Set CJCJJJ=Nothing:CJJCCC.Close:Set CJJCCC=Nothing:CJJCJC.Close:Set CJJCJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CCJJJJJ(ByVal CJCCCCC)
Dim CJCJJJJ, CCCCJC, CJCJJJC
CJCCCCC = Replace(CJCCCCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CCCCJC = 1 To Len(CJCCCCC)
If CCCCJC <> CJCJJJC Then
CJCJJJJ = AscW(Mid(CJCCCCC, CCCCJC, 1))
If CJCJJJJ >= 33 And CJCJJJJ <= 79 Then
CCJJJJJ = CCJJJJJ & Chr(CJCJJJJ + 47)
ElseIf CJCJJJJ >= 80 And CJCJJJJ <= 126 Then
CCJJJJJ = CCJJJJJ & Chr(CJCJJJJ - 47)
Else
CJCJJJC = CCCCJC + 1
If Mid(CJCCCCC, CJCJJJC, 1) = Chr(64) Then CCJJJJJ = CCJJJJJ & ChrW(CJCJJJJ + 5) Else CCJJJJJ = CCJJJJJ & Mid(CJCCCCC, CCCCJC, 1)
End If
End If
Next
End Function
%>