<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCCJCC, CCCCJJ,CCCCJC, CCCCCJ, CCCCCC:Set CCCJCC = server.CreateObject(CCCJJCJ("ps~sq]r@??64E:@?")):CCCJCC.open Application(CCCJJCJ("r@??64E:@?$EC:?8")):Set CCCCJJ=CCCJCC::Dim CJJJJJJ,CJJJJJC,CJJJJCJ,CJJJJCC,CJJJCJJ,CJJJCJC,CJJJCCJ,CJJJCCC,CJJCJJJ:Dim CJJCJJC,CJJCJCJ,CJJCJCC,CJJCCJJ,CJJCCJC,CJJCCCJ:Dim CJJCCCC,CJCJJJJ,CJCJJJC:Dim CJCJJCJ:CJCJJCJ=Trim(Request.Cookies(CCCJJCJ("!$*|t|qt#"))):if CJCJJCJ="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CJJJJJJ>0 then CCCCCC=CCCJJCJ("D6=64E ,E@A ,` ,:DD49@@=25>:?[:D4@?DF=E2?E[,C:89E.[EJA6[4FDE@>8C@FA[32=2?46[?F>36C[>@3:=6[>6>36C0EJA60A2E9[>6>36C0EJA60E@A[A9@E@[7246[286[C62=?2>6[EJA6?2>6[8C256 ,u#~| ,G0>6>36C ,H:E9 ,W?@=@40 then Call RedirectMessage(CCCJJCJ("弬@寁@矼@,,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,")) Call SetMemberCookie(CJJJJJJ,CJJJJJC) End IF end if:Sub CheckRight(CCCJJCC):dim CJCJJCC,CJCJCJJ:if CJJJJJJ=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CCCJJCJ("癶@彐@俜@恪@夬@敃@,,诲@釈@斫@癶@彐@。,")) elseIf not CCJJCCC(CCCJJCC) then Call RedirectMessage(CCCJJCJ("朾@陋@W") & CCCJJCC & CCCJJCJ("X袦@祼@歝@,,诲@三@糶@绚@箜@琁@呓@聏@糶@。,")) end if:End Sub:Function CCJJCCC(CCCJJCC):dim CJCJJCC,CJCJCJJ:CJCJCJJ=split(CCCJJCC,CCCJJCJ("[")):CCJJCCC=False:for CJCJJCC=0 to ubound(CJCJCJJ):If Mid(CJJJJCJ,CJCJCJJ(CJCJJCC),1)="1" then CCJJCCC=True:exit function end if:next:End Function::Sub ClearMemberCookie():Response.Cookies(CCCJJCJ("!$*|t|qt#"))="":CJJJJJJ=0:CJJJCJC=0:CJJJJJC=Empty:CJJJCJJ=0:CJJJCCC=0:CJJJCCJ=0:CJJJJCC=0:CJJCJJC=False:CJCJJJJ=False:CJCJJJC=Empty:End Sub:Sub CheckMemberCookie():dim CJCJCJC,CJCJCCJ,CJCJJCC,CJCJCCC,CJCCJJJ:CJCJCJC=split(CJCJJCJ,CCCJJCJ("]")):if ubound(CJCJCJC)<>2 then Call ClearMemberCookie elseif not isnumeric(CJCJCJC(0)) or len(CJCJCJC(1))<>32 or len(CJCJCJC(2))<>32 then Call ClearMemberCookie else CJCJCCJ=CJCJCJC(1):for CJCJJCC=1 to len(CJCJCCJ):CJCJCCC=mid(CJCJCCJ,CJCJJCC,1):if isnumeric(CJCJCCC) then CJCCJJJ=CJCCJJJ & CJCJCCC if len(CJCCJJJ)=7 then exit for next:CJCJCCJ=CJCJCJC(2):if CJCCJJJ<>mid(CJCJCCJ,6,7) then Call ClearMemberCookie else CJCJCCC=mid(CJCJCCJ,18,10)/2:if CJCJCCC6"), CCCJJCJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CCCJJCJ("kD4C:AE"), CCCJJCJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJCCJCJ=new RegExp:CJCCJCJ.Pattern=CCCJJCJ("@?W,2\K.ZXl"):CJCCJCJ.IgnoreCase = True:CJCCJCJ.Global=True:str=CJCCJCJ.Replace(str,CCCJJCJ("@?S`U6BF2=Dj")):set CJCCJCJ=nothing:CCJCJJJ=str End If:End Function:Function IIf(CCCJCCJ, CCCJCCC, CCCCJJJ):if isnull(CCCJCCJ) or isempty(CCCJCCJ) then IIf = CCCCJJJ elseif CCCJCCJ Then IIf = CCCJCCC Else IIf = CCCCJJJ end if:End Function:Const CCJJCCJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CCCCJJC,CCCCJCJ):dim CJCJCJC:CJCJCJC=CCCCJJC & "=" & CCCCJCJ & CCCJJCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CCCJJCJ("$6E\r@@<:6"),CJCJCJC):End Sub:::::Sub CheckValidPost():dim CJCCJCC:CJCCJCC=false:Dim CJCCCJJ : CJCCCJJ=lcase(Request.ServerVariables(CCCJJCJ("w%%!0#tut#t#"))):if(instr(CJCCCJJ,Application(CCCJJCJ("s@>2:?(9:E6{:DE")))>0) then CJCCJCC=true else Dim CJCCCJC : CJCCCJC=lcase(Request.ServerVariables(CCCJJCJ("$t#'t#0}p|t"))):Dim CJCCCCJ : CJCCCCJ=Request.ServerVariables(CCCJJCJ("{~rp{0pss#")):if Mid(CJCCCJJ,8,Len(CJCCCJC))=CJCCCJC or Mid(CJCCCJJ,9,Len(CJCCCJC))=CJCCCJC or CJCCCJC=CJCCCCJ then CJCCJCC=true end if:if not CJCCJCC then Call RedirectMessage(CCCJJCJ("寴@丈@赲@,,朧@糶@绚@丈@儼@讳@竔@夑@揋@亟@敫@捩@。,")) end sub:sub ShowMessage(CCCCJCC):response.Charset=CCCJJCJ("FE7\g"):Response.Write CCCJJCJ("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") & CCCCJCC & CCCJJCJ("k^5:Gmk^5:Gmk3Cm") end sub:Function CCJCJCJ(CCJJCJC):if isnull(CCJJCJC) or trim(CCJJCJC)="" or not isnumeric(CCJJCJC) then CCJCJCJ=false else Dim CJCCJCJ:Set CJCCJCJ = New RegExp:CJCCJCJ.Pattern = CCCJJCJ("/-5ZS"):CJCCJCJ.IgnoreCase = True:CCJCJCJ = CJCCJCJ.test(CCJJCJC):set CJCCJCJ=nothing end if:End Function:::::Sub ConnClose():On Error Resume Next:set CCJCJCC=nothing:set CCJCCJJ=nothing:set CCJCCJC=nothing:set CCJCCCJ=nothing:CCJCCCC.close : set CCJCCCC=nothing:CCCCCJ.Close : Set CCCCCJ=Nothing:CCCCJC.Close : Set CCCCJC=Nothing:CCCJJJJ.Close : Set CCCJJJJ = Nothing:CCCJCC.Close : Set CCCJCC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCCCJCC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CCCJJCJ("!$*0|6DD286"),server.URLEncode(CCCCJCC)):Response.Redirect CCCJJCJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::::::::::::::::::::Call CheckRight(25):dim CJCCCCC,CCJJJJJ,CCJJJJC:CJCCCCC=Request.QueryString(CCCJJCJ(":5")):CCJJJJJ=CCJCJJJ(Request.QueryString(CCCJJCJ("6?"))):CCJJJJC=Request.QueryString(CCCJJCJ("24E")):if CCJJJJC=CCCJJCJ("4964<6?") then if CCJJJJJ="" then response.Write CCCJJCJ("ECF6") elseif not CCJCJCJ(CJCCCCC) then response.Write CCCJJCJ("72=D6") else set CCCCJC=CCCJCC.execute(CCCJJCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,D49@@= ,H96C6 ,6?lV") & CCJJJJJ & CCCJJCJ("V")) if CCCCJC.eof then response.Write CCCJJCJ("ECF6") elseif cstr(CCCCJC(0))=CJCCCCC then response.Write CCCJJCJ("ECF6") else response.Write CCCJJCJ("72=D6") end if end if:response.End() end if:if not CCJCJCJ(CJCCCCC) then Call RedirectMessage(CCCJJCJ("糶@绚@揋@礵@M伛@兠@厽@敫@锔@诪@!,")) If Request.ServerVariables(CCCJJCJ("#t""&t$%0|t%w~s"))=CCCJJCJ("!~$%") then Call CheckValidPost:CCCCCC=CCCJJCJ("FA52E6 ,D49@@= ,D6E") & CCCJJCJ(" ,766l") & Request.Form(CCCJJCJ("EJA6a")) & CCCJJCJ("[>2I>6>36Cl") & CCJCJJJ(Request.Form(CCCJJCJ(">2I>6>36C"))) & CCCJJCJ("[6IA:C652E6lV") & Trim(Request.Form(CCCJJCJ("6IA:C652E6"))) & CCCJJCJ("V") & CCCJJCJ("[EJA6l") & Request.Form(CCCJJCJ("EJA6`")) & CCCJJCJ("[<6JDEClV") & CCJCJJJ(Request.Form(CCCJJCJ("<6JDEC"))) & CCCJJCJ("V") & CCCJJCJ("[D2?5E23=6l") & Request.Form(CCCJJCJ("D2?5E23=6")) & CCCJJCJ("[4C:D:Dl") & Request.Form(CCCJJCJ("4C:D:D")) & CCCJJCJ("[6IA6CEl") & Request.Form(CCCJJCJ("6IA6CE")) & CCCJJCJ("[6?lV") & CCJCJJJ(Request.Form(CCCJJCJ("6?"))) & CCCJJCJ("V") & CCCJJCJ("[4C:D:D=3l") & Request.Form(CCCJJCJ("4C:D:D=3")) & CCCJJCJ("[4C:D:D@=5l") & Request.Form(CCCJJCJ("4C:D:D@=5")) & CCCJJCJ("[vC@FAvF:52?46l") & Request.Form(CCCJJCJ("vC@FAvF:52?46")) & CCCJJCJ("[q:@u6653242?286C")):if CCJCJCJ(CCJJJCJ) then CCCCCC=CCCJJCJ("FA52E6 ,>6>36C ,D6E ,EJA6l") & CJCCCCC & CCCJJCJ("[:D$49@@=p5>:?l`"):if clng(CCJJJCJ)>1 then CCCCCC=CCCCCC & CCCJJCJ("[,C:89E.lV___________`_```_``___________`_`_`_____``_________________```````````_``````````````````````````````````````````_``V") CCCCCC=CCCCCC & CCCJJCJ(" ,H96C6 ,:5l") & CCJJJCJ:CCCJCC.execute CCCCCC end if:call showmessage(CCCJJCJ("擈@佗@宇@戋@!,")) End If:set CCCCJC=CCCJCC.execute(CCCJJCJ("D6=64E ,E@A ,` ,Y ,7C@> ,G0D49@@= ,H96C6 ,:5l") & CJCCCCC):dim CCJJJCC,CJCJJCC:CCJJJCC=split(CCCJJCJ("M尊@孡@M丨@孡@M夢@孡@M匶@陝@M仼@丕@M咣@话@朵@板@M郣@阚@M右@泐@M敔@布@M內@宄@M攺@店@朵@兮@M囸@宄@M郣@阚@陝@栜@M礹@匵@M盌@独@M丨@聇@"),CCCJJCJ("M")):Response.Write(vbCrLf):Response.Write(CCCJJCJ("kP5@4EJA6 ,9E>=m") & vbCrLf):Response.Write(CCCJJCJ("k9E>=m") & vbCrLf):Response.Write(CCCJJCJ("k9625m") & vbCrLf):Response.Write(CCCJJCJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CCCJJCJ("kE:E=6m讹@罩@孡@栜@俜@恪@k^E:E=6m") & vbCrLf):Response.Write(CCCJJCJ("k=:?< ,9C67lQ]]^DEJ=6]4DDQ ,C6=lQDEJ=6D966EQm") & vbCrLf):Response.Write(CCCJJCJ("k^9625m") & vbCrLf):Response.Write(CCCJJCJ("k3@5Jm") & vbCrLf):Response.Write(CCCJJCJ("k7@C> ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQ ,:5lQ7@C>`Qm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE23=6 ,H:5E9lQ`__TQm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm合@秫@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE9 ,2=:8?lQ=67EQm")):Response.Write CCCCJC(CCCJJCJ(">6>36C0EJA60?2>6")):Response.Write(CCCJJCJ("k^E9m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm産@戲@宕@乄@合@秫@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5m")):Response.Write CCCCJC(CCCJJCJ("E:E=6")):Response.Write(CCCJJCJ("k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm苬@斂@筻@秫@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk:?AFE ,?2>6lQ6?Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,:5lQ6?Q ,G2=F6lQ")):Response.Write CCCCJC(CCCJJCJ("6?")):Response.Write(CCCJJCJ("Qm") & vbCrLf):Response.Write(CCCJJCJ(" ,(,産@争@矨@罌@圻@,,孒@毈@敫@孒@我@共@线@吃@,,丈@胸@丵@纪@敫@孒@,,只@仠@畔@穵@),k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm籶@垆@`:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mkD6=64E ,?2>6lQEJA6`Qm") & vbCrLf):Response.Write(CCCJJCJ(" ,")):for CJCJJCC=1 to ubound(CCJJJCC):response.Write CCCJJCJ("k@AE:@? ,G2=F6lV") & CJCJJCC & CCCJJCJ("V") & IIf(CJCJJCC=CCCCJC(CCCJJCJ("EJA6")),CCCJJCJ(" ,D6=64E65"),"") & CCCJJCJ("m") & CCJJJCC(CJCJJCC) & CCCJJCJ("k^@AE:@?m") next:Response.Write(vbCrLf):Response.Write(CCCJJCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCCJJCJ(" ,(,冮@宕@糶@绚@斂@孒@误@泐@),k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm籶@垆@a:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mkD6=64E ,?2>6lQEJA6aQm") & vbCrLf):Response.Write(CCCJJCJ(" ,")):dim CJCJCJJ:CJCJCJJ=split(CCCJJCJ("M粹@筻@M先@贴@M攱@贴@"),CCCJJCJ("M")):for CJCJJCC=1 to ubound(CJCJCJJ):response.Write CCCJJCJ("k@AE:@? ,G2=F6lV") & CJCJJCC & CCCJJCJ("V") & IIf(CJCJJCC=CCCCJC(CCCJJCJ("766")),CCCJJCJ(" ,D6=64E65"),"") & CCCJJCJ("m") & CJCJCJJ(CJCJJCC) & CCCJJCJ("k^@AE:@?m") next:Response.Write(vbCrLf):Response.Write(CCCJJCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCCJJCJ(" ,(,冮@宕@糶@绚@劚@胸@夕@尌@),k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm陋@刱@泣@冇@亵@敫@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk:?AFE ,?2>6lQ>2I>6>36CQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,G2=F6lQ")):Response.Write CCCCJC(CCCJJCJ(">2I>6>36C")):Response.Write(CCCJJCJ("Qm") & vbCrLf):Response.Write(CCCJJCJ(" ,(,塦@兠@敯@敫@,,丈@陋@刱@刔@塦@兠@_),k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm别@朚@旱@闯@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk:?AFE ,?2>6lQ6IA:C652E6Q ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,G2=F6lQ")):Response.Write CCCCJC(CCCJJCJ("6IA:C652E6")):Response.Write(CCCJJCJ("Qm") & vbCrLf):Response.Write(CCCJJCJ(" ,(,样@弊@:,JJJJ\>>\55,,丈@陋@刱@刔@畔@穵@),k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm孡@甚@敫@捩@雁@戋@月@劜@z6J:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk:?AFE ,?2>6lQ<6JDECQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,G2=F6lQ")):Response.Write CCCCJC(CCCJJCJ("<6JDEC")):Response.Write(CCCJJCJ("Qm") & vbCrLf):Response.Write(CCCJJCJ(" ,(,孒@毈@我@敫@孒@,,丈@胸@昪@汄@孒@,,丈@廻@逕@我@发@涃@雁@戋@月@劜@诲@畔@穵@),k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm昪@吡@釂@産@斫@牃@畇@靝@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQ:D?6HQ ,G2=F6lQ`Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ(":D?6H")),CCCJJCJ("4964<65"),""):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,昪@k^=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQ:D?6HQ ,G2=F6lQ_Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ(":D?6H")),"",CCCJJCJ("4964<65")):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,既@牃@k^=236=mk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm昪@吡@兲@朄@沔@盓@渳@戊@箜@琁@劚@胸@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQD2?5E23=6Q ,G2=F6lQ`Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("D2?5E23=6")),CCCJJCJ("4964<65"),""):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,朄@k^=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQD2?5E23=6Q ,G2=F6lQ_Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("D2?5E23=6")),"",CCCJJCJ("4964<65")):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,沜@朄@k^=236=mk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm兲@朄@卬@朵@幭@顿@糶@绚@箜@琁@劚@胸@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQ4C:D:DQ ,G2=F6lQ`Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("4C:D:D")),CCCJJCJ("4964<65"),""):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,朄@k^=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQ4C:D:DQ ,G2=F6lQ_Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("4C:D:D")),"",CCCJJCJ("4964<65")):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,沜@朄@k^=236=mk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm卬@朵@幭@顿@访@伫@低@糶@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQ4C:D:D@=5Q ,G2=F6lQ_Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("4C:D:D@=5")),"",CCCJJCJ("4964<65")):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,斫@k^=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQ4C:D:D@=5Q ,G2=F6lQ`Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("4C:D:D@=5")),CCCJJCJ("4964<65"),""):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,既@癿@k^=236=mk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm廻@逕@孡@甚@策@柠@释@衣@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQ4C:D:D=3Q ,G2=F6lQ`Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("4C:D:D=3")),CCCJJCJ("4964<65"),""):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,廻@k^=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQ4C:D:D=3Q ,G2=F6lQ_Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("4C:D:D=3")),"",CCCJJCJ("4964<65")):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,兮@门@k^=236=mk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm兲@朄@与@宱@闩@筏@糶@绚@劚@胸@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQ6IA6CEQ ,G2=F6lQ`Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("6IA6CE")),CCCJJCJ("4964<65"),""):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,朄@k^=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQ6IA6CEQ ,G2=F6lQ_Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("6IA6CE")),"",CCCJJCJ("4964<65")):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,沜@朄@k^=236=mk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm兲@朄@囝@低@徾@琁@辀@寷@劚@胸@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQvC@FAvF:52?46Q ,G2=F6lQ`Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("vC@FAvF:52?46")),CCCJJCJ("4964<65"),""):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,朄@k^=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQvC@FAvF:52?46Q ,G2=F6lQ_Q ,")):Response.Write IIf(CCCCJC(CCCJJCJ("vC@FAvF:52?46")),"",CCCJJCJ("4964<65")):Response.Write(CCCJJCJ("m") & vbCrLf):Response.Write(CCCJJCJ(" ,沜@朄@k^=236=mk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm兲@朄@甚@牤@又@馃@以@劚@胸@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk=236=m") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQC25:@Q ,?2>6lQq:@u6653246lQq:@u6653246lQ286?EQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQ ,G2=F6lQ")):Response.Write CCCCJC(CCCJJCJ("286?E")):Response.Write(CCCJJCJ("Qm") & vbCrLf):Response.Write(CCCJJCJ(" ,(,辎@兠@丕@劜@呓@姎@合@),k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm墙@力@箜@琁@呓@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk:?AFE ,?2>6lQ>2?286CQ ,EJA6lQE6IEQ ,4=2DDlQE6IEQm") & vbCrLf):Response.Write(CCCJJCJ(" ,(,塦@兠@伕@呓@缑@史@,,丈@墙@力@刔@畔@穵@),k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm厚@朄@箜@琁@呓@:,k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5m")):set CCCCCJ=CCCJCC.execute(CCCJJCJ("D6=64E ,:5[?:46 ,7C@> ,>6>36C ,H96C6 ,EJA6l") & CJCCCCC & CCCJJCJ(" ,2?5 ,:D$49@@=p5>:?l`")):while not CCCCCJ.eof:response.Write CCCJJCJ("k2 ,9C67lV]]^>6>36C^>@5:7J]2DAn:5l") & CCCCCJ(0) & CCCJJCJ("Vm") & CCCCCJ(1) & CCCJJCJ("W") & CCCCCJ(0) & CCCJJCJ("Xk^2mk3Cm") CCCCCJ.movenext:wend:Response.Write(CCCJJCJ("k^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,2=:8?lQC:89EQmU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5 ,4@=DA2?lQaQmU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mU?3DAjk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,kE5mk:?AFE ,EJA6lQDF3>:EQ ,4=2DDlQ3FEE@?Q ,G2=F6lQ揋@ ,亟@Qm") & vbCrLf):Response.Write(CCCJJCJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,4=2DDlQ3FEE@?Q ,:5lQ3E?04=@D6Q ,G2=F6lQ兮@ ,门@Qmk^E5m") & vbCrLf):Response.Write(CCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CCCJJCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCCJJCJ("k^7@C>m") & vbCrLf):Response.Write(CCCJJCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCJJCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]G2=:52E6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCJJCJ("kD4C:AEm") & vbCrLf):Response.Write(CCCJJCJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CCCJJCJ(" ,SWVR7@C>`VX]G2=:52E6WL") & vbCrLf):Response.Write(CCCJJCJ(" ,CF=6DiL6?iLC6>@E6iVn24El4964<6?U:5l")):Response.Write CJCCCCC:Response.Write(CCCJJCJ("VNN[") & vbCrLf):Response.Write(CCCJJCJ(" ,>6DD286DiL6?iLC6>@E6iV诠@合@秫@巭@绊@孓@圣@!,VNN") & vbCrLf):Response.Write(CCCJJCJ(" ,NX") & vbCrLf):Response.Write(CCCJJCJ(" ,SWVR3E?04=@D6VX]@?WV4=:4=m") & vbCrLf)::On Error Resume Next:set CCJCJCC=nothing:set CCJCCJJ=nothing:set CCJCCJC=nothing:set CCJCCCJ=nothing:CCCCCJ.Close:Set CCCCCJ=Nothing:CCCCJC.Close:Set CCCCJC=Nothing:CCCJCC.Close:Set CCCJCC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CCCJJCJ(ByVal CCCJJJC) Dim CCJJCJJ, CJCJJCC, CCJJCJC CCCJJJC = Replace(CCCJJJC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJCJJCC = 1 To Len(CCCJJJC) If CJCJJCC <> CCJJCJC Then CCJJCJJ = AscW(Mid(CCCJJJC, CJCJJCC, 1)) If CCJJCJJ >= 33 And CCJJCJJ <= 79 Then CCCJJCJ = CCCJJCJ & Chr(CCJJCJJ + 47) ElseIf CCJJCJJ >= 80 And CCJJCJJ <= 126 Then CCCJJCJ = CCCJJCJ & Chr(CCJJCJJ - 47) Else CCJJCJC = CJCJJCC + 1 If Mid(CCCJJJC, CCJJCJC, 1) = Chr(64) Then CCCJJCJ = CCCJJCJ & ChrW(CCJJCJJ + 5) Else CCCJJCJ = CCCJJCJ & Mid(CCCJJJC, CJCJJCC, 1) End If End If Next End Function %>