<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCJJC, CCJCJ,CCJCC, CCCJJ, CCCJC:Set CCJJC = server.CreateObject(CJCJJJC("ps~sq]r@??64E:@?")):CCJJC.open Application(CJCJJJC("r@??64E:@?$EC:?8")):Set CCJCJ=CCJJC::Dim CCCCJ,CCCCC,CJJJJJ,CJJJJC,CJJJCJ,CJJJCC,CJJCJJ,CJJCJC,CJJCCJ:Dim CJJCCC,CJCJJJ,CJCJJC,CJCJCJ,CJCJCC,CJCCJJ:Dim CJCCJC,CJCCCJ,CJCCCC:Dim CCJJJJ:CCJJJJ=Trim(Request.Cookies(CJCJJJC("!$*|t|qt#"))):if CCJJJJ="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CCCCJ>0 then CCCJC=CJCJJJC("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(CJCJJJC("弬@寁@矼@,,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,")) Call SetMemberCookie(CCCCJ,CCCCC) End IF end if:::Sub CheckLogined():if CCCCJ=0 then Call ClearMemberCookie:Call ConnClose:dim CCJJJC:CCJJJC=trim(request.QueryString(CJCJJJC("D49@@="))):if isnumeric(CCJJJC) then response.Redirect CJCJJJC("^>^G2?E^R^D49@@=^") & CCJJJC & CJCJJJC("^DEF56?E^=@8:?nC65:C64El") & url else Call RedirectMessage(CJCJJJC("癶@彐@俜@恪@夬@敃@,,诲@釈@斫@癶@彐@。,")) end if end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CJCJJJC("!$*|t|qt#"))="":CCCCJ=0:CJJJCC=0:CCCCC=Empty:CJJJCJ=0:CJJCJC=0:CJJCJJ=0:CJJJJC=0:CJJCCC=False:CJCCCJ=False:CJCCCC=Empty:End Sub:Sub CheckMemberCookie():dim CCJJCJ,CCJJCC,CCJCJJ,CCJCJC,CCJCCJ:CCJJCJ=split(CCJJJJ,CJCJJJC("]")):if ubound(CCJJCJ)<>2 then Call ClearMemberCookie elseif not isnumeric(CCJJCJ(0)) or len(CCJJCJ(1))<>32 or len(CCJJCJ(2))<>32 then Call ClearMemberCookie else CCJJCC=CCJJCJ(1):for CCJCJJ=1 to len(CCJJCC):CCJCJC=mid(CCJJCC,CCJCJJ,1):if isnumeric(CCJCJC) then CCJCCJ=CCJCCJ & CCJCJC if len(CCJCCJ)=7 then exit for next:CCJJCC=CCJJCJ(2):if CCJCCJ<>mid(CCJJCC,6,7) then Call ClearMemberCookie else CCJCJC=mid(CCJJCC,18,10)/2:if CCJCJC2:?(9:E6{:DE")))>0) then CCJCCC=true else Dim CCCJJC : CCCJJC=lcase(Request.ServerVariables(CJCJJJC("$t#'t#0}p|t"))):Dim CCCJCJ : CCCJCJ=Request.ServerVariables(CJCJJJC("{~rp{0pss#")):if Mid(CCCJJJ,8,Len(CCCJJC))=CCCJJC or Mid(CCCJJJ,9,Len(CCCJJC))=CCCJJC or CCCJJC=CCCJCJ then CCJCCC=true end if:if not CCJCCC then Call RedirectMessage(CJCJJJC("寴@丈@赲@,,朧@糶@绚@丈@儼@讳@竔@夑@揋@亟@敫@捩@。,")) end sub:::::::Sub ConnClose():On Error Resume Next:set CJJCJJJ=nothing:set CJJCJJC=nothing:set CJJCJCJ=nothing:set CJJCJCC=nothing:CJJCCJJ.close : set CJJCCJJ=nothing:CCCJJ.Close : Set CCCJJ=Nothing:CCJCC.Close : Set CCJCC=Nothing:CJJCCJC.Close : Set CJJCCJC = Nothing:CCJJC.Close : Set CCJJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJCJCJC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJCJJJC("!$*0|6DD286"),server.URLEncode(CJCJCJC)):Response.Redirect CJCJJJC("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::Function CJJCCCJ(ByVal CJJCCCC,style):if not isdate(CJJCCCC) then CJJCCCJ=CJJCCCC:exit function end if:dim CCCJCC,CCCCJJ,CCCCJC,CCCCCJ:CJJCCCC=cdate(CJJCCCC):CCCJCC=Year(CJJCCCC):CCCCJJ=Month(CJJCCCC):CCCCJC=Day(CJJCCCC):select case style:case 0:CJJCCCJ=CCCJCC & CJCJJJC("\") & right(0 & CCCCJJ,2) & CJCJJJC("\") & right(0 & CCCCJC,2):case 1:CJJCCCJ=CCCJCC & right(0 & CCCCJJ,2) & right(0 & CCCCJC,2):case 2:CJJCCCJ=right(CCCJCC,2) & CJCJJJC("\") & right(0 & CCCCJJ,2) & CJCJJJC("\") & right(0 & CCCCJC,2):case 3:CJJCCCJ=CCCJCC & CJCJJJC("\") & right(0 & CCCCJJ,2):case 4:CJJCCCJ=right(0 & CCCCJJ,2) & CJCJJJC("\") & right(0 & CCCCJC,2):case 5:CJJCCCJ=right(0 & CCCCJC,2):case 6:CJJCCCJ=CCCJCC & CJCJJJC("幯@") & right(0 & CCCCJJ,2) & CJCJJJC("會@") & right(0 & CCCCJC,2) & CJCJJJC("无@"):case else CJJCCCJ=CJJCCCC:end select:End Function::::::::::::::::::::::dim CCCCCC,CJJJJJJ,str:str=CJJCCCJ(Date,1):Call CheckLogined:CCCCCC=CCCCJ:CJJJJJJ=CJCJJJ:if instr(CJJJJJJ,CJCJJJC("]"))<1 then CJJJJJJ=CJCCJC If Request.ServerVariables(CJCJJJC("#t""&t$%0|t%w~s"))=CJCJJJC("!~$%") then Call CheckValidPost:CJJJJJJ=request.Form(CJCJJJC("7246")):if instr(CJJJJJJ,CJCJJJC("52E2i:>286^;A68j32D6ec["))=1 then CJJJJJJ=Mid(CJJJJJJ,instr(CJJJJJJ,CJCJJJC("["))+1):dim CJJJJCJ:CJJJJCJ=CJCJJJC("k52E2m") & CJJJJJJ & CJCJJJC("k^52E2m"):Dim CJJJJCC : Set CJJJJCC=Server.CreateObject(CJCJJJC("|$)|{a]s~|s@4F>6?E")):Dim CJJJCJJ : Set CJJJCJJ=Server.CreateObject(CJCJJJC("ps~sq]$EC62>")):CJJJJCC.resolveExternals=False:CJJJJCC.loadxml(CJJJJCJ):CJJJJCC.documentElement.setAttribute CJCJJJC("I>=?Di5E"),CJCJJJC("FC?iD496>2D\>:4C@D@7E\4@>i52E2EJA6D"):CJJJJCC.documentElement.dataType = CJCJJJC("3:?]32D6ec"):CJJJCJJ.Type=1:CJJJCJJ.Open:CJJJCJJ.Write CJJJJCC.documentElement.nodeTypedValue:CJJJCJJ.SaveToFile Server.MapPath(CJCJJJC("^2EE249>6?ED^7246^") & CCCCCC & CJCJJJC("];A8")),2:CJJJCJJ.Close:Set CJJJJCC=Nothing:Set CJJJCJJ=Nothing:CCJJC.execute CJCJJJC("FA52E6 ,>6>36C ,D6E ,7246lV^2EE249>6?ED^7246^") & CCCCCC & CJCJJJC("];A8V ,H96C6 ,:5l") & CCCCCC end if:Call ConnClose:response.End() end if:Response.Write(vbCrLf):Response.Write(CJCJJJC("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJCJJJC("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJCJJJC("k9625m") & vbCrLf):Response.Write(CJCJJJC("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCJJJC("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJCJJJC("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJCJJJC("kE:E=6m夯@僊@俩@攴@k^E:E=6m") & vbCrLf):Response.Write(CJCJJJC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2>2K6F:^4DD^2>2K6F:]>:?]4DDQm") & vbCrLf):Response.Write(CJCJJJC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^4C@AA6C^4C@AA6C]>:?]4DDQm") & vbCrLf):Response.Write(CJCJJJC("kDEJ=6m") & vbCrLf):Response.Write(CJCJJJC("]2>\8 ,L ,>2C8:?\E@Ai ,dAIj ,N") & vbCrLf):Response.Write(CJCJJJC("R7:=6 ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CJCJJJC(":>8 ,L ,>2I\H:5E9i ,`__Tj ,>2I\96:89Ei ,c__AIj ,N") & vbCrLf):Response.Write(CJCJJJC("RBC4@56 ,L ,E6IE\2=:8?i ,46?E6Cj ,N") & vbCrLf):Response.Write(CJCJJJC("RBC4@56 ,]EIE ,L ,7@?E\D:K6i ,`]aC6>j ,N") & vbCrLf):Response.Write(CJCJJJC("]AC6G:6H ,L ,H:5E9i ,`__AIj ,96:89Ei ,`__AIj ,@G6C7=@Hi ,9:556?j ,>2C8:?\3@EE@>i ,`_AIj ,>2C8:?\=67Ei ,2FE@j ,>2C8:?\C:89Ei ,2FE@j ,N") & vbCrLf):Response.Write(CJCJJJC("k^DEJ=6m") & vbCrLf):Response.Write(CJCJJJC("k^9625m") & vbCrLf):Response.Write(CJCJJJC("k3@5Jm") & vbCrLf):Response.Write(CJCJJJC("kP\\顰@夯@\\m") & vbCrLf):Response.Write(CJCJJJC("k96256C ,52E2\2>\H:586ElQ96256CQ ,4=2DDlQ2>\D9@H\D>\5@H? ,2>\96256C ,2>\96256C\5672F=EQm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQ2>\96256C\=67E ,2>\96256C\?2GQmk2 ,9C67lQ;2G2D4C:AEi9:DE@CJ]324\96256C\:4@? ,2>\:4@?\2?8=6\=67EQmk^:mk^2mk^5:Gm") & vbCrLf):Response.Write(CJCJJJC(" ,k9` ,4=2DDlQ2>\96256C\E:E=6 ,2>\E6IE\ECF?42E6Qm俩@攴@夯@僊@k^9`m") & vbCrLf):Response.Write(CJCJJJC("k^96256Cm") & vbCrLf):Response.Write(CJCJJJC("k5:G ,4=2DDlQ2>\8Qm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQ2>\F\D>\`a ,2>\F\>5\`_Qmk:>8 ,:5lQ:>286Q ,DC4lQ")):Response.Write CJJJJJJ:Response.Write(CJCJJJC("Qmk^5:Gm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQ2>\D9@H\>5\FA ,2>\F\>5\aQm") & vbCrLf):Response.Write(CJCJJJC(" ,k9C ,52E2\2>\H:586ElQ5:G:56CQ ,4=2DDlQ2>\5:G:56C ,2>\5:G:56C\5@EE65Qm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQAC6G:6H ,2>\C25:FDQmk^5:Gm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQAC6G:6H ,2>\4:C4=6Qmk^5:Gm") & vbCrLf):Response.Write(CJCJJJC(" ,k^5:Gm") & vbCrLf):Response.Write(CJCJJJC("k^5:Gm") & vbCrLf):Response.Write(CJCJJJC("k5:G ,4=2DDlQ2>\8 ,2>\2?:>2E:@?\D=:56\=67EQm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQ2>\F\D>\`aQm") & vbCrLf):Response.Write(CJCJJJC(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\C25:FD ,2>\3E?\DF446DD ,2>\3E?\D>Q ,:5lQD6=64EQmk: ,4=2DDlQ2>\:4@?\4=@F5\FA=@25Qmk^:m ,逄@拤@囹@牂@k^3FEE@?m") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQ2>\3E?\8C@FA ,2>\3E?\8C@FA\D>Qm") & vbCrLf):Response.Write(CJCJJJC(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\C25:FD ,2>\3E?\AC:>2CJQ ,:5lQK@@>\:?Qmk: ,4=2DDlQ2>\:4@?\D62C49\A=FDQmk^:m ,改@夢@k^3FEE@?m") & vbCrLf):Response.Write(CJCJJJC(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\C25:FD ,2>\3E?\AC:>2CJQ ,:5lQK@@>\@FEQmk: ,4=2DDlQ2>\:4@?\D62C49\>:?FDQmk^:m ,缤@尊@k^3FEE@?m") & vbCrLf):Response.Write(CJCJJJC(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\C25:FD ,2>\3E?\AC:>2CJQ ,:5lQD42=6)Qmk: ,4=2DDlQ2>\:4@?\2CC@HD\9Qmk^:m ,氯@幮@翶@轧@k^3FEE@?m") & vbCrLf):Response.Write(CJCJJJC(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\C25:FD ,2>\3E?\AC:>2CJQ ,:5lQD42=6*Qmk: ,4=2DDlQ2>\:4@?\2CC@HD\GQmk^:m ,坽@盯@翶@轧@k^3FEE@?m") & vbCrLf):Response.Write(CJCJJJC(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\C25:FD ,2>\3E?\AC:>2CJQ ,:5lQC6D6EQmk: ,4=2DDlQ2>\:4@?\C67C6D9 ,Qmk^:m ,迓@厚@k^3FEE@?m") & vbCrLf):Response.Write(CJCJJJC(" ,k^5:Gm") & vbCrLf):Response.Write(CJCJJJC(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\C25:FD ,2>\3E?\H2C?:?8 ,2>\3E?\D>Q ,:5lQD2G6Qmk: ,4=2DDlQ2>\:4@?\42>6C2Qmk^:m ,俘@孓@k^3FEE@?m") & vbCrLf):Response.Write(CJCJJJC(" ,k^5:Gm") & vbCrLf):Response.Write(CJCJJJC("k^5:Gm") & vbCrLf):Response.Write(CJCJJJC("k:?AFE ,EJA6lQ7:=6Q ,:5lQ7:=6Q ,?2>6lQFA=@25Q ,2446AElQ:>286^YQm") & vbCrLf):Response.Write(CJCJJJC("k5:G ,4=2DDlQ2>\>@52= ,2>\>@52=\2=6CEQ ,E23:?56IlQ\`Q ,:5lQ>J\2=6CEQm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQ2>\>@52=\5:2=@8Qm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQ2>\>@52=\35Qmk^5:Gm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQ2>\>@52=\7@@E6CQmkDA2? ,4=2DDlQ2>\>@52=\3E?Qm硩@宕@k^DA2?mk^5:Gm") & vbCrLf):Response.Write(CJCJJJC(" ,k^5:Gm") & vbCrLf):Response.Write(CJCJJJC("k^5:Gm") & vbCrLf):Response.Write(CJCJJJC("k5:G ,4=2DDlQ2>\>@52= ,2>\>@52=\=@25:?8 ,2>\>@52=\?@\3E?Q ,E23:?56IlQ\`Q ,:5lQ>J\>@52=\=@25:?8Qm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQ2>\>@52=\5:2=@8Qm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQ2>\>@52=\95Qm歞@圣@俘@孓@]]]k^5:Gm") & vbCrLf):Response.Write(CJCJJJC(" ,k5:G ,4=2DDlQ2>\>@52=\35QmkDA2? ,4=2DDlQ2>\:4@?\DA:??6C ,2>\:4@?\DA:?Qmk^DA2?mk^5:Gm") & vbCrLf):Response.Write(CJCJJJC(" ,k^5:Gm") & vbCrLf):Response.Write(CJCJJJC("k^5:Gm") & vbCrLf):Response.Write(CJCJJJC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJC("kD4C:AE ,DC4lQ^$4C:AED^2>2K6F:^;D^2>2K6F:]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJC("kD4C:AE ,DC4lQ^$4C:AED^4C@AA6C^4C@AA6C]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJC("kD4C:AEm") & vbCrLf):Response.Write(CJCJJJC("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJCJJJC(" ,VFD6 ,DEC:4EVj") & vbCrLf):Response.Write(CJCJJJC(" ,:7WSWH:?5@HX]H:5E9WXklec_XLSWV5:G]2>\3E?\8C@FAVX]C6>@G6WXjN") & vbCrLf):Response.Write(CJCJJJC(" ,G2C ,&#{ ,l ,H:?5@H]&#{ ,MM ,H:?5@H]H63<:E&#{j") & vbCrLf):Response.Write(CJCJJJC(" ,G2C ,S:>286 ,l ,SWVR:>286VXj") & vbCrLf):Response.Write(CJCJJJC(" ,G2C ,S7:=6lSWVR7:=6VXj") & vbCrLf):Response.Write(CJCJJJC(" ,G2C ,D42=6)l\`j") & vbCrLf):Response.Write(CJCJJJC(" ,G2C ,D42=6*l\`j") & vbCrLf):Response.Write(CJCJJJC(" ,^^逄@拤@囹@牂@") & vbCrLf):Response.Write(CJCJJJC(" ,SWVRD6=64EVX]@?WV4=:4286]4C@AA6CWL") & vbCrLf):Response.Write(CJCJJJC(" ,2DA64E#2E:@i ,`[") & vbCrLf):Response.Write(CJCJJJC(" ,AC6G:6HiV]AC6G:6HV") & vbCrLf):Response.Write(CJCJJJC(" ,NXj") & vbCrLf):Response.Write(CJCJJJC(" ,^^改@夢@") & vbCrLf):Response.Write(CJCJJJC(" ,SWVRK@@>\:?VX]@?WV4=:4286]4C@AA6CWVK@@>V[_]`XjNXj") & vbCrLf):Response.Write(CJCJJJC(" ,^^缤@尊@") & vbCrLf):Response.Write(CJCJJJC(" ,SWVRK@@>\@FEVX]@?WV4=:4286]4C@AA6CWVK@@>V[\_]`XjNXj") & vbCrLf):Response.Write(CJCJJJC(" ,^^氯@幮@翶@轧@") & vbCrLf):Response.Write(CJCJJJC(" ,SWVRD42=6)VX]@?WV4=:4286]4C@AA6CWVD42=6)V[D42=6)XjD42=6)lD42=6)Y\`jNXj") & vbCrLf):Response.Write(CJCJJJC(" ,^^坽@盯@翶@轧@") & vbCrLf):Response.Write(CJCJJJC(" ,SWVRD42=6*VX]@?WV4=:4286]4C@AA6CWVD42=6*V[D42=6*XjD42=6*lD42=6*Y\`jNXj") & vbCrLf):Response.Write(CJCJJJC(" ,^^迓@厚@") & vbCrLf):Response.Write(CJCJJJC(" ,SWVRC6D6EVX]@?WV4=:4286]4C@AA6CWVC6D6EVXjNXj") & vbCrLf):Response.Write(CJCJJJC(" ,^^俘@孓@") & vbCrLf):Response.Write(CJCJJJC(" ,SWVRD2G6VX]@?WV4=:4J\>@52=\=@25:?8VX]>@52=WXj") & vbCrLf):Response.Write(CJCJJJC(" ,G2C ,:>8lS:>286]4C@AA6CWQ86ErC@AA65r2?G2DQ[LH:5E9i`__[96:89Ei`__NX]E@s2E2&#{WV:>286^;A68VXj") & vbCrLf):Response.Write(CJCJJJC(" ,S]A@DEWVV[L7246i:>8N[7F?4E:@?WXL") & vbCrLf):Response.Write(CJCJJJC(" ,SWVR>J\>@52=\=@25:?8VX]>@52=WV4=@D6VXj") & vbCrLf):Response.Write(CJCJJJC(" ,SWVR>J\2=6CEVX]7:?5WV]2>\>@52=\35VX]E6IEWV夯@僊@俘@孓@戋@劚@!,VX]6?5WX]>@52=WXj") & vbCrLf):Response.Write(CJCJJJC(" ,NXj") & vbCrLf):Response.Write(CJCJJJC(" ,NXj") & vbCrLf):Response.Write(CJCJJJC(" ,^^浊@觃@斂@仱@") & vbCrLf):Response.Write(CJCJJJC(" ,S7:=6]@?WV492?86V[7F?4E:@? ,WX ,L") & vbCrLf):Response.Write(CJCJJJC(" ,G2C ,7:=6D ,l ,E9:D]7:=6Dj") & vbCrLf):Response.Write(CJCJJJC(" ,:7 ,W7:=6D ,UU ,7:=6D]=6?8E9X ,L") & vbCrLf):Response.Write(CJCJJJC(" ,G2C ,7:=6 ,l ,7:=6D,_.j") & vbCrLf):Response.Write(CJCJJJC(" ,:7 ,W^/:>286-^-HZS^]E6DEW7:=6]EJA6XX ,L") & vbCrLf):Response.Write(CJCJJJC(" ,G2C ,3=@3&#{ ,l ,&#{]4C62E6~3;64E&#{W7:=6Xj") & vbCrLf):Response.Write(CJCJJJC(" ,S:>286]@?6WV3F:=EV[ ,7F?4E:@? ,WX ,L&#{]C6G@<6~3;64E&#{W3=@3&#{XjNX]4C@AA6CWVC6D6EVX]4C@AA6CWVC6A=246V[ ,3=@3&#{Xj") & vbCrLf):Response.Write(CJCJJJC(" ,N") & vbCrLf):Response.Write(CJCJJJC(" ,6=D6 ,L ,SWVR>J\2=6CEVX]7:?5WV]2>\>@52=\35VX]E6IEWV诲@逄@拤@囹@牂@斂@仱@!,VX]6?5WX]>@52=WXjN") & vbCrLf):Response.Write(CJCJJJC(" ,N") & vbCrLf):Response.Write(CJCJJJC(" ,NXj") & vbCrLf):Response.Write(CJCJJJC("NXj") & vbCrLf):Response.Write(CJCJJJC("k^D4C:AEm") & vbCrLf):Response.Write(CJCJJJC("k^3@5Jm") & vbCrLf):Response.Write(CJCJJJC("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJCJJJ=nothing:set CJJCJJC=nothing:set CJJCJCJ=nothing:set CJJCJCC=nothing:CCCJJ.Close:Set CCCJJ=Nothing:CCJCC.Close:Set CCJCC=Nothing:CCJJC.Close:Set CCJJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJCJJJC(ByVal CJCJJJJ) Dim CJJJCJC, CCJCJJ, CJJJCCJ CJCJJJJ = Replace(CJCJJJJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CCJCJJ = 1 To Len(CJCJJJJ) If CCJCJJ <> CJJJCCJ Then CJJJCJC = AscW(Mid(CJCJJJJ, CCJCJJ, 1)) If CJJJCJC >= 33 And CJJJCJC <= 79 Then CJCJJJC = CJCJJJC & Chr(CJJJCJC + 47) ElseIf CJJJCJC >= 80 And CJJJCJC <= 126 Then CJCJJJC = CJCJJJC & Chr(CJJJCJC - 47) Else CJJJCCJ = CCJCJJ + 1 If Mid(CJCJJJJ, CJJJCCJ, 1) = Chr(64) Then CJCJJJC = CJCJJJC & ChrW(CJJJCJC + 5) Else CJCJJJC = CJCJJJC & Mid(CJCJJJJ, CCJCJJ, 1) End If End If Next End Function %>