<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCJJJC, CCJJCJ,CCJJCC, CCJCJJ, CCJCJC:Set CCJJJC = server.CreateObject(CCJCCCCJ("ps~sq]r@??64E:@?")):CCJJJC.open Application(CCJCCCCJ("r@??64E:@?$EC:?8")):Set CCJJCJ=CCJJJC::Dim CCJCCJ,CCJCCC,CCCJJJ,CCCJJC,CCCJCJ,CCCJCC,CCCCJJ,CCCCJC,CCCCCJ:Dim CCCCCC,CJJJJJJ,CJJJJJC,CJJJJCJ,CJJJJCC,CJJJCJJ:Dim CJJJCJC,CJJJCCJ,CJJJCCC:Dim CJJCJJJ:CJJCJJJ=Trim(Request.Cookies(CCJCCCCJ("!$*|t|qt#"))):if CJJCJJJ="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CCJCCJ>0 then CCJCJC=CCJCCCCJ("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(CCJCCCCJ("弬@寁@矼@，,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,")) Call SetMemberCookie(CCJCCJ,CCJCCC) End IF end if:Sub CheckRight(CCJJJJJ):dim CJJCJJC,CJJCJCJ:if CCJCCJ=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CCJCCCCJ("癶@彐@俜@恪@夬@敃@，,诲@釈@斫@癶@彐@。,")) elseIf not CJCCJCJC(CCJJJJJ) then Call RedirectMessage(CCJCCCCJ("朾@陋@W") & CCJJJJJ & CCJCCCCJ("X袦@祼@歝@，,诲@三@糶@绚@箜@琁@呓@聏@糶@。,")) end if:End Sub:Function CJCCJCJC(CCJJJJJ):dim CJJCJJC,CJJCJCJ:CJJCJCJ=split(CCJJJJJ,CCJCCCCJ("[")):CJCCJCJC=False:for CJJCJJC=0 to ubound(CJJCJCJ):If Mid(CCCJJJ,CJJCJCJ(CJJCJJC),1)="1" then CJCCJCJC=True:exit function end if:next:End Function:Sub CheckLogined():if CCJCCJ=0 then Call ClearMemberCookie:Call ConnClose:dim CJJCJCC:CJJCJCC=trim(request.QueryString(CCJCCCCJ("D49@@="))):if isnumeric(CJJCJCC) then response.Redirect CCJCCCCJ("^>^G2?E^R^D49@@=^") & CJJCJCC & CCJCCCCJ("^DEF56?E^=@8:?nC65:C64El") & CJCJCJC else Call RedirectMessage(CCJCCCCJ("癶@彐@俜@恪@夬@敃@，,诲@釈@斫@癶@彐@。,")) end if end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CCJCCCCJ("!$*|t|qt#"))="":CCJCCJ=0:CCCJCC=0:CCJCCC=Empty:CCCJCJ=0:CCCCJC=0:CCCCJJ=0:CCCJJC=0:CCCCCC=False:CJJJCCJ=False:CJJJCCC=Empty:End Sub:Sub CheckMemberCookie():dim CJJCCJJ,CJJCCJC,CJJCJJC,CJJCCCJ,CJJCCCC:CJJCCJJ=split(CJJCJJJ,CCJCCCCJ("]")):if ubound(CJJCCJJ)<>2 then Call ClearMemberCookie elseif not isnumeric(CJJCCJJ(0)) or len(CJJCCJJ(1))<>32 or len(CJJCCJJ(2))<>32 then Call ClearMemberCookie else CJJCCJC=CJJCCJJ(1):for CJJCJJC=1 to len(CJJCCJC):CJJCCCJ=mid(CJJCCJC,CJJCJJC,1):if isnumeric(CJJCCCJ) then CJJCCCC=CJJCCCC & CJJCCCJ if len(CJJCCCC)=7 then exit for next:CJJCCJC=CJJCCJJ(2):if CJJCCCC<>mid(CJJCCJC,6,7) then Call ClearMemberCookie else CJJCCCJ=mid(CJJCCJC,18,10)/2:if CJJCCCJ6"), CCJCCCCJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CCJCCCCJ("kD4C:AE"), CCJCCCCJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJCJJJC=new RegExp:CJCJJJC.Pattern=CCJCCCCJ("@?W,2\K.ZXl"):CJCJJJC.IgnoreCase = True:CJCJJJC.Global=True:str=CJCJJJC.Replace(str,CCJCCCCJ("@?S`U6BF2=Dj")):set CJCJJJC=nothing:CJCCJCCJ=str End If:End Function:Function IIf(CCCJJJJJ, CCCJJJJC, CCCJJJCJ):if isnull(CCCJJJJJ) or isempty(CCCJJJJJ) then IIf = CCCJJJCJ elseif CCCJJJJJ Then IIf = CCCJJJJC Else IIf = CCCJJJCJ end if:End Function:Const CJJCCCCC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$"::Function CJCCCJJJ():dim CJCJJCJ:CJCJJCJ = Cstr(Request.ServerVariables("HTTP_X_FORWARDED_FOR")):If CJCJJCJ = "" Then CJCJJCJ = Cstr(Request.ServerVariables(CCJCCCCJ("#t|~%t0pss#"))) if instr(CJCJJCJ,CCJCCCCJ("i"))>0 then CJCJJCJ=left(CJCJJCJ,instr(CJCJJCJ,CCJCCCCJ("i"))-1) elseif instr(CJCJJCJ,CCJCCCCJ("["))>0 then CJCJJCJ=left(CJCJJCJ,instr(CJCJJCJ,CCJCCCCJ("["))-1) end if:CJCCCJJJ=left(CJCJJCJ,15):End Function:Sub Debug(str):response.Charset=CCJCCCCJ("FE7\g"):dim CJJCJJC,CJJCCCJ,CJCJJCC:if isarray(str) then on error resume next:CJJCJJC=ubound(str,2):CJCJJCC=err.number:err.clear:on error goto 0:if CJCJJCC<>0 then for CJJCJJC=0 to ubound(str):if CJJCJJC>0 then response.Write CCJCCCCJ("k3C ,^m") response.Write CJJCJJC & CCJCCCCJ("i ,") & str(CJJCJJC):next else response.Write CCJCCCCJ("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m") for CJJCJJC=0 to ubound(str,2):response.Write CCJCCCCJ("kE9 ,2=:8?lV=67EVm") & CJJCJJC & CCJCCCCJ("k^E9m") next:response.Write CCJCCCCJ("k^ECm"):for CJJCJJC=0 to ubound(str):response.Write CCJCCCCJ("kECmkE9m") & CJJCJJC & CCJCCCCJ("k^E9m"):for CJJCCCJ=0 to ubound(str,2):response.Write CCJCCCCJ("kE5m") & str(CJJCJJC,CJJCCCJ) & CCJCCCCJ("k^E5m"):next:response.Write CCJCCCCJ("k^ECm"):next:response.Write CCJCCCCJ("k^E23=6m") end if elseif isnull(str) then response.Write CCJCCCCJ(",}F==.") else Response.Write replace(str,vbcrlf,CCJCCCCJ("k3Cm")) end if:Call ConnClose:Response.End:End Sub:Public Function CJCCCJJC():Dim CJCJCJJ, CJCJCJC:CJCJCJC = Request.ServerVariables(CCJCCCCJ("!p%w0x}u~")):CJCJCJJ = Request.ServerVariables(CCJCCCCJ("""&t#*0$%#x}v")):If CJCJCJJ <> Empty Then if instr(lcase(CJCJCJJ),CCJCCCCJ("Tb4:7C2>6"))>0 or instr(lcase(CJCJCJJ),CCJCCCCJ("Tb4D4C:AE"))>0 then Call RedirectMessage(CCJCCCCJ("寴@丈@赲@，,患@癿@圫@圻@栊@否@朄@静@泐@孒@笡@！,！,！,")) CJCJCJC = CJCJCJC & CCJCCCCJ("n") & CJCJCJJ end if:CJCCCJJC = CJCJCJC:End Function:Sub SetHttpOnlyCookie(CCCJJJCC,CCCJJCJJ):dim CJJCCJJ:CJJCCJJ=CCCJJJCC & CCJCCCCJ("l") & CCCJJCJJ & CCJCCCCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CCJCCCCJ("$6E\r@@<:6"),CJJCCJJ):End Sub:::::Sub CheckValidPost():dim CJCJCCJ:CJCJCCJ=false:Dim CJCJCCC : CJCJCCC=lcase(Request.ServerVariables(CCJCCCCJ("w%%!0#tut#t#"))):if(instr(CJCJCCC,Application(CCJCCCCJ("s@>2:?(9:E6{:DE")))>0) then CJCJCCJ=true else Dim CJCCJJJ : CJCCJJJ=lcase(Request.ServerVariables(CCJCCCCJ("$t#'t#0}p|t"))):Dim CJCCJJC : CJCCJJC=Request.ServerVariables(CCJCCCCJ("{~rp{0pss#")):if Mid(CJCJCCC,8,Len(CJCCJJJ))=CJCCJJJ or Mid(CJCJCCC,9,Len(CJCCJJJ))=CJCCJJJ or CJCCJJJ=CJCCJJC then CJCJCCJ=true end if:if not CJCJCCJ then Call RedirectMessage(CCJCCCCJ("寴@丈@赲@，,朧@糶@绚@丈@儼@讳@竔@夑@揋@亟@敫@捩@。,")) end sub::Function CJCCCJCJ(CJCJJCC):if isnull(CJCJJCC) or trim(CJCJJCC)="" or not isnumeric(CJCJJCC) then CJCCCJCJ=false else Dim CJCJJJC:Set CJCJJJC = New RegExp:CJCJJJC.Pattern = CCJCCCCJ("/-5ZS"):CJCJJJC.IgnoreCase = True:CJCCCJCJ = CJCJJJC.test(CJCJJCC):set CJCJJJC=nothing end if:End Function:Function CJCCCJCC(CCCJJCJC):dim CJCCJCJ,CJCCJCC:CJCCJCJ=CCJCCCCJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CCCJJCJC & CCJCCCCJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJCCJCC=CCJJJC.execute(CJCCJCJ):CJCCCJCC = CJCCJCC(0):if isnull(CJCCCJCC) then CJCCCJCC=1 CJCCJCC.close : set CJCCJCC=nothing:End Function::::Sub ConnClose():On Error Resume Next:set CCJJCCJ=nothing:set CJCCCCJJ=nothing:set CJCCCCJC=nothing:set CJCCCCCJ=nothing:CJCCJCC.close : set CJCCJCC=nothing:CCJCJJ.Close : Set CCJCJJ=Nothing:CCJJCC.Close : Set CCJJCC=Nothing:CJCCCCCC.Close : Set CJCCCCCC = Nothing:CCJJJC.Close : Set CCJJJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCCJJCCJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CCJCCCCJ("!$*0|6DD286"),server.URLEncode(CCCJJCCJ)):Response.Redirect CCJCCCCJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::Function CCJJJJJJ(ByVal CCJJJJJC,style):if not isdate(CCJJJJJC) then CCJJJJJJ=CCJJJJJC:exit function end if:dim CJCCCJJ,CJCCCJC,CJCCCCJ,CJCCCCC:CCJJJJJC=cdate(CCJJJJJC):CJCCCJJ=Year(CCJJJJJC):CJCCCJC=Month(CCJJJJJC):CJCCCCJ=Day(CCJJJJJC):select case style:case 0:CCJJJJJJ=CJCCCJJ & CCJCCCCJ("\") & right(0 & CJCCCJC,2) & CCJCCCCJ("\") & right(0 & CJCCCCJ,2):case 1:CCJJJJJJ=CJCCCJJ & right(0 & CJCCCJC,2) & right(0 & CJCCCCJ,2):case 2:CCJJJJJJ=right(CJCCCJJ,2) & CCJCCCCJ("\") & right(0 & CJCCCJC,2) & CCJCCCCJ("\") & right(0 & CJCCCCJ,2):case 3:CCJJJJJJ=CJCCCJJ & CCJCCCCJ("\") & right(0 & CJCCCJC,2):case 4:CCJJJJJJ=right(0 & CJCCCJC,2) & CCJCCCCJ("\") & right(0 & CJCCCCJ,2):case 5:CCJJJJJJ=right(0 & CJCCCCJ,2):case 6:CCJJJJJJ=CJCCCJJ & CCJCCCCJ("幯@") & right(0 & CJCCCJC,2) & CCJCCCCJ("會@") & right(0 & CJCCCCJ,2) & CCJCCCCJ("无@"):case else CCJJJJJJ=CCJJJJJC:end select:End Function:Function CCJJJJCJ(Table):Dim CJCCJCC, CCJJJJJ, str(), CJJCJJC,CJJCCCJ,CCJJJJC:CCJJJJC=UCase(Table):If Not IsArray(Application(CCJCCCCJ("!$*0") & CCJJJJC)) Then CCJCJC=CCJCCCCJ("D6=64E ,:5[?2>6[>6>36CEJA6 ,7C@> ,,") & Table & CCJCCCCJ(". ,@C56C ,3J ,D@CE[:5"):set CJCCJCC=server.createobject(CCJCCCCJ("25@53]C64@C5D6E")):CJCCJCC.open CCJCJC,CCJJJC,1:CCJJJJJ = CJCCJCC.RecordCount:ReDim str(CCJJJJJ, 2):If CCJJJJJ > 0 Then For CJJCJJC = 1 To CCJJJJJ:for CJJCCCJ=0 to 2:str(CJJCJJC, CJJCCCJ) = CJCCJCC(CJJCCCJ):next:CJCCJCC.MoveNext:Next End If:CJCCJCC.Close: Set CJCCJCC = Nothing:Application(CCJCCCCJ("!$*0") & CCJJJJC) = str End If:CCJJJJCJ = Application(CCJCCCCJ("!$*0") & CCJJJJC):End Function:Sub ShowListSelect(CCCJJCJC,CCCJJCCC,CCCJCJJJ):Dim str, CJJCJJC, CCJJJCJ:CCJJJCJ = CCJJJJCJ(CCCJJCJC):For CJJCJJC = 1 To UBound(CCJJJCJ):if Cstr(CCJJJCJ(CJJCJJC,2))=Cstr(CCCJJCCC) then str = str & CCJCCCCJ("k@AE:@? ,G2=F6lV") & CCJJJCJ(CJJCJJC, 0) & CCJCCCCJ("V") If CStr(CCJJJCJ(CJJCJJC, 0)) = CCCJCJJJ & "" Then str = str & CCJCCCCJ(" ,D6=64E65lVD6=64E65V") str = str & CCJCCCCJ("m") & CCJJJCJ(CJJCJJC, 1) & CCJCCCCJ("k^@AE:@?m") end if:Next:Response.Write str:End Sub:Function CCJJJJCC(CCCJJCJC,CCCJJCCC,CJJJCCJC):Dim str, CJJCJJC, CCJJJCJ:CCJJJCJ = CCJJJJCJ(CCCJJCJC):For CJJCJJC = 1 To UBound(CCJJJCJ):if Cstr(CCJJJCJ(CJJCJJC,2))=Cstr(CCCJJCCC) and CStr(CCJJJCJ(CJJCJJC, 0)) = CJJJCCJC & "" then str=CCJJJCJ(CJJCJJC,1):exit for end if:Next:if str="" then str=CCJCCCCJ(",朥@矠@.") CCJJJJCC=str:End Function:Sub InsertLog(CCCJCJJC,CJJJCJJC):dim CJCCJCJ:CJCCJCJ=CCJCCCCJ("x?D6CE ,:?E@ ,=@8W>6>36C[:A[4@?E6?E[EJA6[FC=X ,G2=F6DW") & CCJCCJ & CCJCCCCJ("[V") & CJCCCJJJ & CCJCCCCJ("V") & CCJCCCCJ("[V") & CJCCJCCJ(CJJJCJJC) & CCJCCCCJ("V") & CCJCCCCJ("[") & CCCJCJJC & CCJCCCCJ("[V") & CJCCCJJC & CCJCCCCJ("V") & CCJCCCCJ("X") CCJJJC.execute CJCCJCJ:End Sub::function CCJJJCJJ(CJJCCJCC,CJJJCCJC):dim CJJCJCJ,CJJCJJC:if isArray(CJJCCJCC) then CJJCJCJ=CJJCCJCC else CJJCJCJ=split(CJJCCJCC & "",CCJCCCCJ("M")) for CJJCJJC=0 to ubound(CJJCJCJ)-1 step 2:if CJJCJCJ(CJJCJJC)=cstr(CJJJCCJC) then CCJJJCJJ=server.htmlencode(CJJCJCJ(CJJCJJC+1)):exit for end if:next:end function::::::::::::Function CCJJJCJC(CCCJCJCJ,str):dim CJJCJJC,CCJJJCC,CCJJCJJ,CJCCCJC,CJCJJCC,CCJJCJC,CJJCCCC:CJJCCCC=ucase(CCCJCJCJ):CCJJCJC=str:if CCJJCJC="" then CCJJCJC=request.cookies(CJJCCCC):if CCJJCJC="" then CCJJJCJC="" else CCJJCJC=strreverse(CCJJCJC):CCJJJCC=len(CCJJCJC):for CJJCJJC=1 to CCJJJCC-1 step 2:CJCCCJC=mid(CCJJCJC,CJJCJJC,1):CJCJJCC=mid(CCJJCJC,CJJCJJC+1,1):CCJJCJJ=CCJJCJJ & CJCJJCC & CJCCCJC:next:CCJJCJJ=replace(CCJJCJJ,CCJCCCCJ("L0N"),CCJCCCCJ(" ,")):CCJJCJJ=replace(CCJJCJJ,CCJCCCCJ("LIN"),CCJCCCCJ("Y")):CCJJCJJ=replace(CCJJCJJ,CCJCCCCJ("L:N"),CCJCCCCJ("^")):CCJJJCJC=trim(CCJJCJJ) end if else if Len(CCJJCJC) Mod 2=1 then CCJJCJC=CCJJCJC & CCJCCCCJ(" ,") CCJJCJC=replace(CCJJCJC,CCJCCCCJ(" ,"),CCJCCCCJ("L0N")):CCJJCJC=replace(CCJJCJC,CCJCCCCJ("Y"),CCJCCCCJ("LIN")):CCJJCJC=replace(CCJJCJC,CCJCCCCJ("^"),CCJCCCCJ("L:N")):CCJJJCC=len(CCJJCJC):for CJJCJJC=1 to CCJJJCC-1 step 2:CJCCCJC=mid(CCJJCJC,CJJCJJC,1):CJCJJCC=mid(CCJJCJC,CJJCJJC+1,1):CCJJCJJ=CCJJCJJ & CJCJJCC & CJCCCJC:next:CCJJCJJ=Trim(strreverse(CCJJCJJ)):CCJJJCJC=CCJJCJJ:response.cookies(CJJCCCC)=CCJJCJJ end if:End Function:Function CCJJJCCJ(str,CCCJCJCC):if isnull(str) or str="" or CCCJCJCC="" then CCJJJCCJ=False:exit function end if:Dim CJCJJJC:Set CJCJJJC = New RegExp:CJCJJJC.Pattern = CCCJCJCC:CJCJJJC.IgnoreCase = True:CCJJJCCJ = CJCJJJC.test(str):set CJCJJJC=nothing:End Function:Sub ClearCache(CCCJCCJJ):Application.Contents.Remove CCCJCCJJ End Sub::Class jTree:Private CCJCJC, CCJJCCJ, CCJJCCC, CCJCJJJ,CCJCJJC,CCJCJCJ,CCJCJCC,CCJCCJJ:Private Sub Class_Initialize():CCJJCCC = 0:CCJCJJJ = 0:CCJCCJJ=10:End Sub:Public Property Let Table(CCCJCCJC):if CCCJCCJC="" then Call RedirectMessage(CCJCCCCJ("寴@丈@赲@，,;%C66籶@宙@來@匑@旱@沜@朄@讹@罩@忀@襼@癿@屙@怢@！,")) CCJCJJC=CCCJCCJC:CCJCJCJ=CCJCCCCJ("!$*0") & UCase(CCJCJJC):Call GetTreeArray:End Property:Public Property Get Table():Table=CCJCJJC:End Property:::Private Sub GetTreeArray():Dim CJJCJJC, CJJCCCJ, CCJCCJC,RecordCount:CCJJCCJ = Application(CCJCJCJ):If Not IsArray(CCJJCCJ) Then CCJCJC = CCJCCCCJ("D6=64E ,4@F?EW:5X ,7C@> ,") & CCJCJJC:if CCJCJCC<>"" then CCJCJC=CCJCJC & CCJCCCCJ(" ,H96C6 ,") & CCJCJCC set CCJCCJC=CCJJJC.execute(CCJCJC):RecordCount=CCJCCJC(0):if RecordCount=0 then Call RedirectMessage(CCJCCCCJ("柠@话@W") & CCJCJJC & CCJCCCCJ("^") & CCJCJCC & CCJCCCCJ("X沜@朄@绎@林@敫@捩@")) CCJCJJJ=RecordCount+CCJCCJJ:ReDim CCJJCCJ(CCJCJJJ, 4):CCJCJC = CCJCCCCJ("D6=64E ,:5[A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCJCJJC & CCJCCCCJ(" ,H:E9 ,W?@=@4"" then CCJCJC=CCJCJC & CCJCCCCJ(" ,H96C6 ,") & CCJCJCC CCJCJC=CCJCJC & CCJCCCCJ(" ,@C56C ,3J ,D@CE[:5"):set CCJCCJC=CCJJJC.execute(CCJCJC):For CJJCJJC = 1 To RecordCount:For CJJCCCJ = 0 To 4:CCJJCCJ(CJJCJJC, CJJCCCJ) = CCJCCJC(CJJCCCJ):if IsNull(CCJJCCJ(CJJCJJC,4)) then CCJJCCJ(CJJCJJC,4)=0 If CCJJCCJ(CJJCJJC,2)="" then CCJJCCJ(CJJCJJC,2)=CCJCCCCJ(",穵@.") Next:CCJCCJC.MoveNext:Next:CCJCCJC.Close: Set CCJCCJC = Nothing:for CJJCJJC=CCJCJJJ-(CCJCCJJ-1) to CCJCJJJ:CCJJCCJ(CJJCJJC,0)=CJJCJJC:next:Application.Lock():Application(CCJCJCJ) = CCJJCCJ:Application.UnLock() else CCJCJJJ=Ubound(CCJJCCJ) End If:End Sub:::::Private Function CCJJCJJJ(CJJJCCJC):dim CJJCJJC,CCJCCCC:CCJJCJJJ=0:CCJCCCC=CStr(CJJJCCJC):if CCJCCCC<>"0" then for CJJCJJC=1 to CCJCJJJ:If CStr(CCJJCCJ(CJJCJJC, 0))=CCJCCCC Then CCJJCJJJ = CJJCJJC:Exit For End If:Next end if:End Function:Public Function CCJJCJJC(CJJJCCJC):if Cstr(CJJJCCJC)="0" then CCJJCJJC=CCJCCCCJ("栴@") else Dim CJJCJJC,CCJCCJC:CJJCJJC=CCJJCJJJ(CJJJCCJC):if CJJCJJC>0 then CCJJCJJC=CCJJCCJ(CJJCJJC,2):if CCJJCJJC="" then set CCJCCJC=CCJJJC.execute(CCJCCCCJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCJCJJC & CCJCCCCJ(" ,H96C6 ,:5l") & CJJJCCJC):if CCJCCJC.eof then Call RedirectMessage(CCJCCCCJ("xs（,") & CJJJCCJC & CCJCCCCJ("）,朥@批@别@")) CCJJCJJC=CCJCCJC(1):Call UpdateCache(CJJJCCJC,CCJCCJC(0),CCJJCJJC,CCJCCJC(2),CCJCCJC(3)):CCJCCJC.Close: Set CCJCCJC = Nothing end if else set CCJCCJC=CCJJJC.execute(CCJCCCCJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCJCJJC & CCJCCCCJ(" ,H96C6 ,:5l") & CJJJCCJC):if CCJCCJC.eof then Call RedirectMessage(CCJCCCCJ("xs（,") & CJJJCCJC & CCJCCCCJ("）,朥@批@别@")) CCJJCJJC=CCJCCJC(1):Call UpdateCache(CJJJCCJC,CCJCCJC(0),CCJJCJJC,CCJCCJC(2),CCJCCJC(3)):CCJCCJC.Close: Set CCJCCJC = Nothing end if end if:End Function:::Public Function CCJJCJCJ(CJJJCCJC):Dim CJJCJJC,CCCJJJJ:CJJCJJC=CCJJCJJJ(CJJJCCJC):if CJJCJJC=0 then CCCJJJJ=CCJJCJCC(CJJJCCJC) else CCCJJJJ=CCJJCCJ(CJJCJJC,3):if isnull(CCCJJJJ) or CCCJJJJ="" then CCCJJJJ=CCJJCJCC(CJJJCCJC) elseif Mid(CCCJJJJ,instrrev(CCCJJJJ,CCJCCCCJ("["))+1)<>CStr(CJJJCCJC) then CCCJJJJ=CCJJCJCC(CJJJCCJC) elseif Left(CCCJJJJ,1)=CCJCCCCJ("[") then CCCJJJJ=CCJJCJCC(CJJJCCJC) end if end if:CCJJCJCJ=CCCJJJJ:End Function:Private Function CCJJCJCC(CJJJCCJC):dim CCJCCCC:CCJCCCC=CStr(CJJJCCJC):if CCJCCCC="0" then CCJJCJCC="" else dim CCJCCJC:set CCJCCJC=CCJJJC.execute(CCJCCCCJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCJCJJC & CCJCCCCJ(" ,H96C6 ,:5l") & CJJJCCJC):if CCJCCJC.eof then Call UpdateCache(CJJJCCJC,"","","",""):Call RedirectMessage(CCJCCCCJ("顴@盩@（,xs：,") & CJJJCCJC & CCJCCCCJ("）,丈@孓@圣@，,诲@患@迏@囙@吉@釈@斫@擈@佗@。,")) else if CCJCCJC(0)=0 then CCJJCJCC="0," & CJJJCCJC else CCJJCJCC=CCJJCJCJ(CCJCCJC(0)) & CCJCCCCJ("[") & CJJJCCJC end if:if CCJCCJC(2)<>CCJJCJCC then CCJJJC.execute CCJCCCCJ("FA52E6 ,") & CCJCJJC & CCJCCCCJ(" ,D6E ,A2E9lV") & CCJJCJCC & CCJCCCCJ("V ,H96C6 ,:5l") & CJJJCCJC else CCJJCJCC=CCJCCJC(2) end if end if:Call UpdateCache(CJJJCCJC,CCJCCJC(0),CCJCCJC(1),CCJJCJCC,CCJCCJC(3)):CCJCCJC.Close: Set CCJCCJC = Nothing end if:End Function::Public Function CCJJCCJJ(CJJJCCJC):CCJJCCJJ = Mid(CCJJCJCJ(CJJJCCJC), 3):End Function:Public Function CCJJCCJC(CJJJCCJC):Dim CJJCJJC, CJJCCCJ, CCCJJJC,Str, CCCJJJJ, CCJJJJJ, CJJCJCJ():CCCJJJJ = CCJJCCJJ(CJJJCCJC):CCCJJJJ = Split(CCCJJJJ, CCJCCCCJ("[")):for CJJCJJC=0 to Ubound(CCCJJJJ):CCCJJJC=CCCJJJJ(CJJCJJC):str=str & CCJCCCCJ("M") & CCCJJJC & CCJCCCCJ("M") & CCJJCJJC(CCCJJJC):next:if str<>"" then str=Mid(str,2) CCJJCCJC=str:End Function:::::::::Public Function Sql_GetChildren(CJJJCCJC):dim CCCJJJJ:CCCJJJJ=CCJJCJCJ(CJJJCCJC):Sql_GetChildren = CCJCJJC & CCJCCCCJ("0A2E9ZV[V ,=:<6 ,V") & CCCJJJJ & CCJCCCCJ("[TV") End Function:::Public Function GetPositionStr_From(CJJJCCJC, CCJCJJJJ):if isnull(CJJJCCJC) or isnull(CCJCJJJJ) then GetPositionStr_From=CCJCCCCJ(",厽@敫@锔@诪@."):exit function end if:Dim Str, CJJCJJC, CJJCJCJ, CCJJJJJ, CCCJJCJ:CCJCJJJJ = CStr(CCJCJJJJ):If CCJCJJJJ = "0" or CCJCJJJJ = CStr(CJJJCCJC) Then Str = CCJJCJJC(CJJJCCJC) Else CJJCJCJ = Split(CCJJCCJC(CJJJCCJC), CCJCCCCJ("M")):CCJJJJJ = UBound(CJJCJCJ):CCCJJCJ = False:For CJJCJJC = 0 To CCJJJJJ Step 2:If CJJCJCJ(CJJCJJC) = CCJCJJJJ And Not CCCJJCJ Then CCCJJCJ = True If CCCJJCJ Then If Str <> "" Then Str = Str & CCJCCCCJ("→,") Str = Str & CJJCJCJ(CJJCJJC + 1) End If:Next End If:str=Mid(str,instr(str,CCJCCCCJ("→,"))+1):GetPositionStr_From = Str:End Function:::::::Public Sub ClearCache():Application.Contents.Remove CCJCJCJ End Sub:Public Sub UpdateCache(CJJJCCJC,CCCJJJC,CCCJCCCJ,CCCJJJJ,CCCJCCCC):dim CJJCJJC,CJJCCCJ:CJJJCCJC=CLng(CJJJCCJC):CJJCJJC=CCJJCJJJ(CJJJCCJC):if CCCJJJC="" and CCCJCCCJ="" and CCCJJJJ="" and CCCJCCCC="" then if CJJCJJC>0 then for CJJCCCJ=1 to 4:CCJJCCJ(CJJCJJC,CJJCCCJ)=Null:next end if else if CJJCJJC=0 then for CJJCCCJ=1 to CCJCJJJ:if CCJJCCJ(CJJCCCJ,1) & ""="" then CJJCJJC=CJJCCCJ:exit for end if:next end if:if CJJCJJC=0 then Call ClearCache else CCJJCCJ(CJJCJJC,0)=CLng(CJJJCCJC):if CCCJJJC<>"" then CCJJCCJ(CJJCJJC,1)=CLng(CCCJJJC) if CCCJCCCJ<>"" then CCJJCCJ(CJJCJJC,2)=CCCJCCCJ if CCCJJJJ<>"" then CCJJCCJ(CJJCJJC,3)=CCCJJJJ if CCCJCCCC<>"" then CCJJCCJ(CJJCJJC,4)=CLng(CCCJCCCC) end if end if:if CJJCJJC>0 then Application.Lock():Application(CCJCJCJ) = CCJJCCJ:Application.UnLock() end if:End Sub:Private Sub Debug(CCCJJCCJ):Call ConnClose:Response.Write CCCJJCCJ:Response.End:End Sub:Private Function CJCCCJCC():CJCCCJCC=CCJCJJJC+1:End Function:Private Function CCJCJJJC():dim CJCCJCC:set CJCCJCC=CCJJJC.execute(CCJCCCCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,") & CCJCJJC & CCJCCCCJ(" ,@C56C ,3J ,:5 ,56D4")):CCJCJJJC=CJCCJCC(0):CJCCJCC.Close: Set CJCCJCC = Nothing:End Function:Private Sub Class_Terminate():End Sub:End Class::Private Const CJCJJJJJ =8:Private Const CJCJJJJC =4:Private Const CJCJJJCJ =32:Private CCCJJCC(30):Private CCCJCJJ(30):Private Function CCJCJJCJ(CCCCJJJJ, CCCCJJJC):If CCCCJJJC = 0 Then CCJCJJCJ = CCCCJJJJ:Exit Function ElseIf CCCCJJJC = 31 Then If CCCCJJJJ And 1 Then CCJCJJCJ = &H80000000 Else CCJCJJCJ = 0 End If:Exit Function ElseIf CCCCJJJC < 0 Or CCCCJJJC > 31 Then Err.Raise 6 End If:If (CCCCJJJJ And CCCJCJJ(31 - CCCCJJJC)) Then CCJCJJCJ = ((CCCCJJJJ And CCCJJCC(31 - (CCCCJJJC + 1))) * CCCJCJJ(CCCCJJJC)) Or &H80000000 Else CCJCJJCJ = ((CCCCJJJJ And CCCJJCC(31 - CCCCJJJC)) * CCCJCJJ(CCCCJJJC)) End If:End Function:Private Function CCJCJJCC(CCCCJJJJ, CCCCJJJC):If CCCCJJJC = 0 Then CCJCJJCC = CCCCJJJJ:Exit Function ElseIf CCCCJJJC = 31 Then If CCCCJJJJ And &H80000000 Then CCJCJJCC = 1 Else CCJCJJCC = 0 End If:Exit Function ElseIf CCCCJJJC < 0 Or CCCCJJJC > 31 Then Err.Raise 6 End If:CCJCJJCC = (CCCCJJJJ And &H7FFFFFFE) \ CCCJCJJ(CCCCJJJC):If (CCCCJJJJ And &H80000000) Then CCJCJJCC = (CCJCJJCC Or (&H40000000 \ CCCJCJJ(CCCCJJJC - 1))) End If:End Function:Private Function CCJCJCJJ(CCCCJJJJ, CCCCJJJC):CCJCJCJJ = CCJCJJCJ(CCCCJJJJ, CCCCJJJC) Or CCJCJJCC(CCCCJJJJ, (32 - CCCCJJJC)):End Function:Private Function CCJCJCJC(CCCCJJCJ, CCCCJJCC):Dim CCCJCJC:Dim CCCJCCJ:Dim CCCJCCC:Dim CCCCJJJ:Dim CCCCJJC:CCCJCCC = CCCCJJCJ And &H80000000:CCCCJJJ = CCCCJJCC And &H80000000:CCCJCJC = CCCCJJCJ And &H40000000:CCCJCCJ = CCCCJJCC And &H40000000:CCCCJJC = (CCCCJJCJ And &H3FFFFFFF) + (CCCCJJCC And &H3FFFFFFF):If CCCJCJC And CCCJCCJ Then CCCCJJC = CCCCJJC Xor &H80000000 Xor CCCJCCC Xor CCCCJJJ ElseIf CCCJCJC Or CCCJCCJ Then If CCCCJJC And &H40000000 Then CCCCJJC = CCCCJJC Xor &HC0000000 Xor CCCJCCC Xor CCCCJJJ Else CCCCJJC = CCCCJJC Xor &H40000000 Xor CCCJCCC Xor CCCCJJJ End If Else CCCCJJC = CCCCJJC Xor CCCJCCC Xor CCCCJJJ End If:CCJCJCJC = CCCCJJC:End Function:Private Function CCJCJCCJ(CJJJJJCJ, CJCCCJJ, CCCCJCJJ):CCJCJCCJ = (CJJJJJCJ And CJCCCJJ) Or ((Not CJJJJJCJ) And CCCCJCJJ):End Function:Private Function CCJCJCCC(CJJJJJCJ, CJCCCJJ, CCCCJCJJ):CCJCJCCC = (CJJJJJCJ And CCCCJCJJ) Or (CJCCCJJ And (Not CCCCJCJJ)):End Function:Private Function CCJCCJJJ(CJJJJJCJ, CJCCCJJ, CCCCJCJJ):CCJCCJJJ = (CJJJJJCJ Xor CJCCCJJ Xor CCCCJCJJ):End Function:Private Function CCJCCJJC(CJJJJJCJ, CJCCCJJ, CCCCJCJJ):CCJCCJJC = (CJCCCJJ Xor (CJJJJJCJ Or (Not CCCCJCJJ))):End Function:Private Sub md5_FF(CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ, CCJJCJC, CCCCJCJC):CJJJJCCC = CCJCJCJC(CJJJJCCC, CCJCJCJC(CCJCJCJC(CCJCJCCJ(CJJJCJJJ, CJJJCJJC, CJCCCCJ), CJJJJJCJ), CCCCJCJC)):CJJJJCCC = CCJCJCJJ(CJJJJCCC, CCJJCJC):CJJJJCCC = CCJCJCJC(CJJJJCCC, CJJJCJJJ):End Sub:Private Sub md5_GG(CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ, CCJJCJC, CCCCJCJC):CJJJJCCC = CCJCJCJC(CJJJJCCC, CCJCJCJC(CCJCJCJC(CCJCJCCC(CJJJCJJJ, CJJJCJJC, CJCCCCJ), CJJJJJCJ), CCCCJCJC)):CJJJJCCC = CCJCJCJJ(CJJJJCCC, CCJJCJC):CJJJJCCC = CCJCJCJC(CJJJJCCC, CJJJCJJJ):End Sub:Private Sub md5_HH(CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ, CCJJCJC, CCCCJCJC):CJJJJCCC = CCJCJCJC(CJJJJCCC, CCJCJCJC(CCJCJCJC(CCJCCJJJ(CJJJCJJJ, CJJJCJJC, CJCCCCJ), CJJJJJCJ), CCCCJCJC)):CJJJJCCC = CCJCJCJJ(CJJJJCCC, CCJJCJC):CJJJJCCC = CCJCJCJC(CJJJJCCC, CJJJCJJJ):End Sub:Private Sub md5_II(CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ, CCJJCJC, CCCCJCJC):CJJJJCCC = CCJCJCJC(CJJJJCCC, CCJCJCJC(CCJCJCJC(CCJCCJJC(CJJJCJJJ, CJJJCJJC, CJCCCCJ), CJJJJJCJ), CCCCJCJC)):CJJJJCCC = CCJCJCJJ(CJJJJCCC, CCJJCJC):CJJJJCCC = CCJCJCJC(CJJJJCCC, CJJJCJJJ):End Sub:Private Function CCJCCJCJ(CCCCJCCJ):Dim CCCCJCJ:Dim CCCCJCC:Dim CCCCCJJ():Dim CCCCCJC:Dim CCCCCCJ:Dim CCCCCCC:Const CJCJJJCC =512:Const CJCJJCJJ =448:CCCCJCJ = Len(CCCCJCCJ):CCCCJCC = (((CCCCJCJ + ((CJCJJJCC - CJCJJCJJ) \ CJCJJJJJ)) \ (CJCJJJCC \ CJCJJJJJ)) + 1) * (CJCJJJCC \ CJCJJJCJ):ReDim CCCCCJJ(CCCCJCC - 1):CCCCCJC = 0:CCCCCCJ = 0:Do Until CCCCCCJ >= CCCCJCJ:CCCCCCC = CCCCCCJ \ CJCJJJJC:CCCCCJC = (CCCCCCJ Mod CJCJJJJC) * CJCJJJJJ:CCCCCJJ(CCCCCCC) = CCCCCJJ(CCCCCCC) Or CCJCJJCJ(Asc(Mid(CCCCJCCJ, CCCCCCJ + 1, 1)), CCCCCJC):CCCCCCJ = CCCCCCJ + 1:Loop:CCCCCCC = CCCCCCJ \ CJCJJJJC:CCCCCJC = (CCCCCCJ Mod CJCJJJJC) * CJCJJJJJ:CCCCCJJ(CCCCCCC) = CCCCCJJ(CCCCCCC) Or CCJCJJCJ(&H80, CCCCCJC):CCCCCJJ(CCCCJCC - 2) = CCJCJJCJ(CCCCJCJ, 3):CCCCCJJ(CCCCJCC - 1) = CCJCJJCC(CCCCJCJ, 29):CCJCCJCJ = CCCCCJJ:End Function:Private Function CCJCCJCC(CCCCJJJJ):Dim CJJJJJJJ:Dim CJJJJJJC:For CJJJJJJC = 0 To 3:CJJJJJJJ = CCJCJJCC(CCCCJJJJ, CJJJJJJC * CJCJJJJJ) And CCCJJCC(CJCJJJJJ - 1):CCJCCJCC = CCJCCJCC & Right("0" & Hex(CJJJJJJJ), 2):Next:End Function:Public Function CCJCCCJJ(CCCCJCCJ):CCCJJCC(0) = CLng(1):CCCJJCC(1) = CLng(3):CCCJJCC(2) = CLng(7):CCCJJCC(3) = CLng(15):CCCJJCC(4) = CLng(31):CCCJJCC(5) = CLng(63):CCCJJCC(6) = CLng(127):CCCJJCC(7) = CLng(255):CCCJJCC(8) = CLng(511):CCCJJCC(9) = CLng(1023):CCCJJCC(10) = CLng(2047):CCCJJCC(11) = CLng(4095):CCCJJCC(12) = CLng(8191):CCCJJCC(13) = CLng(16383):CCCJJCC(14) = CLng(32767):CCCJJCC(15) = CLng(65535):CCCJJCC(16) = CLng(131071):CCCJJCC(17) = CLng(262143):CCCJJCC(18) = CLng(524287):CCCJJCC(19) = CLng(1048575):CCCJJCC(20) = CLng(2097151):CCCJJCC(21) = CLng(4194303):CCCJJCC(22) = CLng(8388607):CCCJJCC(23) = CLng(16777215):CCCJJCC(24) = CLng(33554431):CCCJJCC(25) = CLng(67108863):CCCJJCC(26) = CLng(134217727):CCCJJCC(27) = CLng(268435455):CCCJJCC(28) = CLng(536870911):CCCJJCC(29) = CLng(1073741823):CCCJJCC(30) = CLng(2147483647):CCCJCJJ(0) = CLng(1):CCCJCJJ(1) = CLng(2):CCCJCJJ(2) = CLng(4):CCCJCJJ(3) = CLng(8):CCCJCJJ(4) = CLng(16):CCCJCJJ(5) = CLng(32):CCCJCJJ(6) = CLng(64):CCCJCJJ(7) = CLng(128):CCCJCJJ(8) = CLng(256):CCCJCJJ(9) = CLng(512):CCCJCJJ(10) = CLng(1024):CCCJCJJ(11) = CLng(2048):CCCJCJJ(12) = CLng(4096):CCCJCJJ(13) = CLng(8192):CCCJCJJ(14) = CLng(16384):CCCJCJJ(15) = CLng(32768):CCCJCJJ(16) = CLng(65536):CCCJCJJ(17) = CLng(131072):CCCJCJJ(18) = CLng(262144):CCCJCJJ(19) = CLng(524288):CCCJCJJ(20) = CLng(1048576):CCCJCJJ(21) = CLng(2097152):CCCJCJJ(22) = CLng(4194304):CCCJCJJ(23) = CLng(8388608):CCCJCJJ(24) = CLng(16777216):CCCJCJJ(25) = CLng(33554432):CCCJCJJ(26) = CLng(67108864):CCCJCJJ(27) = CLng(134217728):CCCJCJJ(28) = CLng(268435456):CCCJCJJ(29) = CLng(536870912):CCCJCJJ(30) = CLng(1073741824):Dim CJJJJJCJ:Dim CJJCCCC:Dim CJJJJJCC:Dim CJJJJCJJ:Dim CJJJJCJC:Dim CJJJJCCJ:Dim CJJJJCCC:Dim CJJJCJJJ:Dim CJJJCJJC:Dim CJCCCCJ:Const CJCJJCJC =7:Const CJCJJCCJ =12:Const CJCJJCCC =17:Const CJCJCJJJ =22:Const CJCJCJJC =5:Const CJCJCJCJ =9:Const CJCJCJCC =14:Const CJCJCCJJ =20:Const CJCJCCJC =4:Const CJCJCCCJ =11:Const CJCJCCCC =16:Const CJCCJJJJ =23:Const CJCCJJJC =6:Const CJCCJJCJ =10:Const CJCCJJCC =15:Const CJCCJCJJ =21:CJJJJJCJ = CCJCCJCJ(CCCCJCCJ):CJJJJCCC = &H67452301:CJJJCJJJ = &HEFCDAB89:CJJJCJJC = &H98BADCFE:CJCCCCJ = &H10325476:For CJJCCCC = 0 To UBound(CJJJJJCJ) Step 16:CJJJJJCC = CJJJJCCC:CJJJJCJJ = CJJJCJJJ:CJJJJCJC = CJJJCJJC:CJJJJCCJ = CJCCCCJ:md5_FF CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 0), CJCJJCJC, &HD76AA478:md5_FF CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 1), CJCJJCCJ, &HE8C7B756:md5_FF CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 2), CJCJJCCC, &H242070DB:md5_FF CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 3), CJCJCJJJ, &HC1BDCEEE:md5_FF CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 4), CJCJJCJC, &HF57C0FAF:md5_FF CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 5), CJCJJCCJ, &H4787C62A:md5_FF CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 6), CJCJJCCC, &HA8304613:md5_FF CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 7), CJCJCJJJ, &HFD469501:md5_FF CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 8), CJCJJCJC, &H698098D8:md5_FF CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 9), CJCJJCCJ, &H8B44F7AF:md5_FF CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 10), CJCJJCCC, &HFFFF5BB1:md5_FF CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 11), CJCJCJJJ, &H895CD7BE:md5_FF CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 12), CJCJJCJC, &H6B901122:md5_FF CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 13), CJCJJCCJ, &HFD987193:md5_FF CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 14), CJCJJCCC, &HA679438E:md5_FF CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 15), CJCJCJJJ, &H49B40821:md5_GG CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 1), CJCJCJJC, &HF61E2562:md5_GG CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 6), CJCJCJCJ, &HC040B340:md5_GG CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 11), CJCJCJCC, &H265E5A51:md5_GG CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 0), CJCJCCJJ, &HE9B6C7AA:md5_GG CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 5), CJCJCJJC, &HD62F105D:md5_GG CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 10), CJCJCJCJ, &H2441453:md5_GG CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 15), CJCJCJCC, &HD8A1E681:md5_GG CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 4), CJCJCCJJ, &HE7D3FBC8:md5_GG CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 9), CJCJCJJC, &H21E1CDE6:md5_GG CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 14), CJCJCJCJ, &HC33707D6:md5_GG CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 3), CJCJCJCC, &HF4D50D87:md5_GG CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 8), CJCJCCJJ, &H455A14ED:md5_GG CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 13), CJCJCJJC, &HA9E3E905:md5_GG CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 2), CJCJCJCJ, &HFCEFA3F8:md5_GG CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 7), CJCJCJCC, &H676F02D9:md5_GG CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 12), CJCJCCJJ, &H8D2A4C8A:md5_HH CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 5), CJCJCCJC, &HFFFA3942:md5_HH CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 8), CJCJCCCJ, &H8771F681:md5_HH CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 11), CJCJCCCC, &H6D9D6122:md5_HH CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 14), CJCCJJJJ, &HFDE5380C:md5_HH CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 1), CJCJCCJC, &HA4BEEA44:md5_HH CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 4), CJCJCCCJ, &H4BDECFA9:md5_HH CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 7), CJCJCCCC, &HF6BB4B60:md5_HH CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 10), CJCCJJJJ, &HBEBFBC70:md5_HH CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 13), CJCJCCJC, &H289B7EC6:md5_HH CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 0), CJCJCCCJ, &HEAA127FA:md5_HH CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 3), CJCJCCCC, &HD4EF3085:md5_HH CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 6), CJCCJJJJ, &H4881D05:md5_HH CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 9), CJCJCCJC, &HD9D4D039:md5_HH CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 12), CJCJCCCJ, &HE6DB99E5:md5_HH CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 15), CJCJCCCC, &H1FA27CF8:md5_HH CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 2), CJCCJJJJ, &HC4AC5665:md5_II CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 0), CJCCJJJC, &HF4292244:md5_II CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 7), CJCCJJCJ, &H432AFF97:md5_II CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 14), CJCCJJCC, &HAB9423A7:md5_II CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 5), CJCCJCJJ, &HFC93A039:md5_II CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 12), CJCCJJJC, &H655B59C3:md5_II CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 3), CJCCJJCJ, &H8F0CCC92:md5_II CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 10), CJCCJJCC, &HFFEFF47D:md5_II CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 1), CJCCJCJJ, &H85845DD1:md5_II CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 8), CJCCJJJC, &H6FA87E4F:md5_II CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 15), CJCCJJCJ, &HFE2CE6E0:md5_II CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 6), CJCCJJCC, &HA3014314:md5_II CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 13), CJCCJCJJ, &H4E0811A1:md5_II CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJJCJ(CJJCCCC + 4), CJCCJJJC, &HF7537E82:md5_II CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJCJJC, CJJJJJCJ(CJJCCCC + 11), CJCCJJCJ, &HBD3AF235:md5_II CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJCJJJ, CJJJJJCJ(CJJCCCC + 2), CJCCJJCC, &H2AD7D2BB:md5_II CJJJCJJJ, CJJJCJJC, CJCCCCJ, CJJJJCCC, CJJJJJCJ(CJJCCCC + 9), CJCCJCJJ, &HEB86D391:CJJJJCCC = CCJCJCJC(CJJJJCCC, CJJJJJCC):CJJJCJJJ = CCJCJCJC(CJJJCJJJ, CJJJJCJJ):CJJJCJJC = CCJCJCJC(CJJJCJJC, CJJJJCJC):CJCCCCJ = CCJCJCJC(CJCCCCJ, CJJJJCCJ):Next:CCJCCCJJ = LCase(CCJCCJCC(CJJJJCCC) & CCJCCJCC(CJJJCJJJ) & CCJCCJCC(CJJJCJJC) & CCJCCJCC(CJCCCCJ)):End Function::dim CJJCJCC:CCJCJC=Request.ServerVariables(CCJCCCCJ("!p%w0x}u~")):if instr(CCJCJC,CCJCCCCJ("^D49@@=^25>:?^"))>0 then Call CheckLogined:if not CCCCCC and not CJJJCCJ then Call RedirectMessage(CCJCCCCJ("寴@丈@赲@，,患@沜@朄@迖@兠@诠@顰@靝@癿@朾@陋@。,")) CJJCJCC=CCCCJJ elseif instr(CCJCJC,CCJCCCCJ("^>^D49@@=^DEF56?E^"))>0 or instr(CCJCJC,CCJCCCCJ("^DEF56?E^"))>0 then Call CheckLogined:CJJCJCC=CCCCJJ elseif instr(CCJCJC,CCJCCCCJ("^D49@@="))>0 then CJJCJCC=Request.QueryString(CCJCCCCJ("D49@@=")):if not CJCCCJCJ(CJJCJCC) then CJJCJCC=Request.QueryString(CCJCCCCJ("F")) if not CJCCCJCJ(CJJCJCC) then CJJCJCC=Request.QueryString(CCJCCCCJ("D4")) if not CJCCCJCJ(CJJCJCC) then Call RedirectMessage(CCJCCCCJ("糶@绚@厽@敫@W$49@@=X忀@顶@丵@敫@孒@。,")) CJJCJCC=csng(CJJCJCC) end if:if CJJCJCC=0 then Call RedirectMessage(CCJCCCCJ("糶@绚@厽@敫@W$49@@=X锔@诪@W_X。,")) Dim CJJJCJCJ:Call SetConfig:Sub SetConfig():dim CJJCJCJ,CJCCJCC:CCJCJC=CCJCCCCJ("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 ,D49@@= ,H:E9 ,W?@=@4D")):CJJCJCJ(3)=CJCCJCC(CCJCCCCJ("4FDE@>8C@FA")) & "":CJJCJCJ(4)=CJCCJCC(CCJCCCCJ("D:5632C0@E96C")) & "":CJJCJCJ(5)=IIf(isnull(CJCCJCC(CCJCCCCJ("E6DEC6DF=EG:6H"))),0,CJCCJCC(CCJCCCCJ("E6DEC6DF=EG:6H"))):CJJCJCJ(6)=CJCCJCC(CCJCCCCJ("K:IF?E:>6")):CJJCJCJ(7)=CJCCJCC(CCJCCCCJ("766")):CJJCJCJ(8)=CJCCJCC(CCJCCCCJ("C6E6DE52J")):CJJCJCJ(9)=CJCCJCC(CCJCCCCJ("6IA:C652E6")):CJJCJCJ(10)=CJCCJCC(CCJCCCCJ("E:E=6")):CJJCJCJ(11)=CJCCJCC(CCJCCCCJ(":?EC@")) & "":CJJCJCJ(12)=CJCCJCC(CCJCCCCJ("A:4EFC6")) & "":CJJCJCJ(13)=CJCCJCC(CCJCCCCJ("72>:=J")):CJJCJCJ(14)=CJCCJCC(CCJCCCCJ("4@AJC:89E")) & "":CJJCJCJ(15)=IIf(isnull(CJCCJCC(CCJCCCCJ("D6>6DE6C0DE2CE052E6"))),CCJCCCCJ("`h__\`\`"),CJCCJCC(CCJCCCCJ("D6>6DE6C0DE2CE052E6"))):CJJCJCJ(16)=IIf(isnull(CJCCJCC(CCJCCCCJ("K:IF?0E:>6D09:89=:89E"))),0,CJCCJCC(CCJCCCCJ("K:IF?0E:>6D09:89=:89E"))):CJJCJCJ(17)=CJCCJCC(CCJCCCCJ("4@?E24E")) & "":CJJCJCJ(18)=CJCCJCC(CCJCCCCJ("D2?5E23=6")):CJJCJCJ(19)=CJCCJCC(CCJCCCCJ("4C:D:D")):CJJCJCJ(20)=CJCCJCC(CCJCCCCJ("JJ52E6")):CJJCJCJ(21)=CJCCJCC(CCJCCCCJ("BB")):CJJCJCJ(22)=CJCCJCC(CCJCCCCJ("JFJF60D>D0EA=")) & "":CJJCJCJ(23)=CJCCJCC(CCJCCCCJ("JFJF60E6DE0=3")) & "":CJJCJCJ(25)=CJCCJCC(CCJCCCCJ("6IA6CE")):CJJCJCJ(26)=CJCCJCC(CCJCCCCJ(">@5:?7@")):CJJCJCJ(27)=CJCCJCC(CCJCCCCJ("9@>6A286E@AA:4EFC6")) & "":CJJCJCJ(28)=CJCCJCC(CCJCCCCJ("4C:D:D=3")):CJJCJCJ(29)=IIf(CJCCJCC(CCJCCCCJ("4C:D:D@=5")),False,True):CJJCJCJ(30)=CJCCJCC(CCJCCCCJ("8C@FA8F:52?46")):CJJCJCJ(31)=CJCCJCC(CCJCCCCJ("3:@7665324<")):CJJCJCJ(32)=CJCCJCC(CCJCCCCJ("<6JDEC")):CJJCJCJ(33)=CJCCJCC(CCJCCCCJ("=@8@")) & "":CJJCJCJ(34)=CJCCJCC(CCJCCCCJ("K:46")):CJJCJCJ(35)=IIf(CJCCJCC(CCJCCCCJ(":D?6H")),True,False):CJJCJCJ(36)=121:CJJCJCJ(37)=111:CJJCJCJ(38)=160:CJJCJCJ(39)=CJCCJCC(CCJCCCCJ("8F6DE3@@<")):CJJCJCJ(40)=CJCCJCC(CCJCCCCJ("75D")):CJJCJCJ(42)=CJCCJCC(CCJCCCCJ("9@>6=@8:?")):CJJCJCJ(43)=CJCCJCC(CCJCCCCJ("K:IF?0?6657665324<")):CJJCJCJ(44)=CJCCJCC(CCJCCCCJ("K:IF?0E:>6D0=:>:E")):CJJCJCJ(45)=CJCCJCC(CCJCCCCJ("4@>A=6E60:?7@")):CJJCJCJ(46)=CJCCJCC(CCJCCCCJ("E6DE:?EC@")) & "":CJJCJCJ(47)=IIf(isnull(CJCCJCC(CCJCCCCJ("JFJF60367@C60E:>6"))),0,CJCCJCC(CCJCCCCJ("JFJF60367@C60E:>6"))):CJJCJCJ(49)=CJCCJCC(CCJCCCCJ("D>D0C646:G6C")):CJJCJCJ(50)=CJCCJCC(CCJCCCCJ("D>D0D:8?")) & "":CJJCJCJ(52)=CJCCJCC(CCJCCCCJ("JFJF602CC2?86")):CJJCJCJ(53)=IIf(isnull(CJCCJCC(CCJCCCCJ("DEF56?E0BF6DE:@?04@F?E"))),0,CJCCJCC(CCJCCCCJ("DEF56?E0BF6DE:@?04@F?E"))):CJJCJCJ(54)=CJCCJCC(CCJCCCCJ("9:560=30@FE@7286")):CJJCJCJ(55)=CJCCJCC(CCJCCCCJ("JFJF60E6DE052JD")):CJJCJCJ(56)=CJCCJCC(CCJCCCCJ("JFJF60H66<0=:>:E")):CJJCJCJ(57)=CJCCJCC(CCJCCCCJ("JFJF604964<65")):CJJCJCJ(58)=CJCCJCC(CCJCCCCJ("K:IF?0?6657665324<0?6IE")):CJJCJCJ(59)=CJCCJCC(CCJCCCCJ("49642E6"),CCJCCCCJ("}F>36C"),CCJCCCCJ("%62496C"),CCJCCCCJ("!2C6?E")):select case CJJJCJCJ(1):case 1,2 : CJJJCCJJ=Array(CCJCCCCJ("孡@栜@"),CCJCCCCJ("孡@甚@"),CCJCCCCJ("珨@红@"),CCJCCCCJ("幯@红@"),CCJCCCCJ("吇@孡@"),CCJCCCCJ("孡@史@"),CCJCCCCJ("敔@布@"),CCJCCCCJ("宱@镺@")):case 3,16 : CJJJCCJJ=Array(CCJCCCCJ("孡@栜@"),CCJCCCCJ("孡@甚@"),CCJCCCCJ("陝@糶@"),CCJCCCCJ("幯@红@"),CCJCCCCJ("吇@孡@"),CCJCCCCJ("孡@史@"),CCJCCCCJ("敔@布@"),CCJCCCCJ("宱@镺@")):case 4 : CJJJCCJJ=Array(CCJCCCCJ("匶@陝@"),CCJCCCCJ("杠@论@耀@"),CCJCCCCJ("卐@佈@"),CCJCCCCJ("幯@仸@"),CCJCCCCJ("吇@了@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("匶@甚@"),CCJCCCCJ("宱@屙@")):case 5 : CJJJCCJJ=Array(CCJCCCCJ("卐@佈@"),CCJCCCCJ("呓@巠@"),CCJCCCCJ("郣@闣@"),CCJCCCCJ("幯@仸@"),CCJCCCCJ("吇@了@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("呓@巠@"),CCJCCCCJ("宱@屙@")):case 6 : CJJJCCJJ=Array(CCJCCCCJ("卐@佈@"),CCJCCCCJ("杠@论@耀@"),CCJCCCCJ("线@刦@"),CCJCCCCJ("幯@仸@"),CCJCCCCJ("吇@了@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("咣@话@布@"),CCJCCCCJ("宱@屙@")):case 7 : CJJJCCJJ=Array(CCJCCCCJ("卐@佈@"),CCJCCCCJ("宓@兰@"),CCJCCCCJ("郣@闣@"),CCJCCCCJ("幯@仸@"),CCJCCCCJ("戓@叆@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("咣@话@布@"),CCJCCCCJ("宱@屙@")):case 8 : CJJJCCJJ=Array(CCJCCCCJ("卐@佈@"),CCJCCCCJ("杠@论@耀@"),CCJCCCCJ("卐@佈@"),CCJCCCCJ("兠@聇@幯@仸@"),CCJCCCCJ("吇@了@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("咣@话@布@"),CCJCCCCJ("酈@偱@")):case 9 : CJJJCCJJ=Array(CCJCCCCJ("卐@佈@"),CCJCCCCJ("敔@布@"),CCJCCCCJ("卐@佈@"),CCJCCCCJ("幯@仸@"),CCJCCCCJ("吇@了@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("咣@话@布@"),CCJCCCCJ("酈@偱@")):case 10 : CJJJCCJJ=Array(CCJCCCCJ("卐@佈@"),CCJCCCCJ("氌@譡@"),CCJCCCCJ("郣@闣@"),CCJCCCCJ("兠@譡@幯@仸@"),CCJCCCCJ("吇@了@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("咣@话@布@"),CCJCCCCJ("宱@屙@")):case 11 : CJJJCCJJ=Array(CCJCCCCJ("卐@佈@"),CCJCCCCJ("內@劜@呓@"),CCJCCCCJ("郣@闣@"),CCJCCCCJ("幯@仸@"),CCJCCCCJ("吇@了@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("咣@话@布@"),CCJCCCCJ("宱@屙@")):case 12 : CJJJCCJJ=Array(CCJCCCCJ("卐@佈@"),CCJCCCCJ("幭@譡@"),CCJCCCCJ("卐@佈@"),CCJCCCCJ("兠@譡@幯@仸@"),CCJCCCCJ("吇@了@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("咣@话@布@"),CCJCCCCJ("宱@屙@")):case 13 : CJJJCCJJ=Array(CCJCCCCJ("卐@佈@"),CCJCCCCJ("孡@呓@"),CCJCCCCJ("卐@佈@"),CCJCCCCJ("幯@仸@"),CCJCCCCJ("戓@叆@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("敔@呓@"),CCJCCCCJ("宱@屙@")):case 14 : CJJJCCJJ=Array(CCJCCCCJ("月@劜@炴@"),CCJCCCCJ("局@氌@"),CCJCCCCJ("线@刦@"),CCJCCCCJ("幯@仸@"),CCJCCCCJ("邶@采@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("咣@话@布@"),CCJCCCCJ("宱@屙@")):case 15 : CJJJCCJJ=Array(CCJCCCCJ("卐@佈@"),CCJCCCCJ("盌@独@氌@譡@"),CCJCCCCJ("卐@佈@"),CCJCCCCJ("兠@譡@幯@仸@"),CCJCCCCJ("吇@了@"),CCJCCCCJ("缑@史@"),CCJCCCCJ("咣@话@布@"),CCJCCCCJ("宱@屙@")):case else : CJJJCCJJ=CJJJCJCC end select:for CJJCJJC=0 to Ubound(CJJCJCJ):CJJCJCJ(CJJCJJC,0)=CJJJCJCC(CJJCJJC):CJJCJCJ(CJJCJJC,1)=CJJJCCJJ(CJJCJJC):next:for CJJCJJC=0 to Ubound(CJJCJCJ):if CJJCJCJ(CJJCJJC,0)=CCCJCJCJ then CJCCCCCJ=CJJCJCJ(CJJCJJC,1):exit for end if:next:End Function::Call CheckRight(67):dim CJJJCCJC,CJJJCCCJ:CJJJCCJC=Request.QueryString(CCJCCCCJ(":5")):CJJJCCCJ=Request.QueryString(CCJCCCCJ("24E")):if CJJJCCCJ=CCJCCCCJ("3:CE952J") then dim CJJJCCCC:CJJJCCCC=Request.QueryString(CCJCCCCJ("3:CE952J")):response.charset=CCJCCCCJ("FE7\g"):if not isdate(CJJJCCCC) then Response.Write CCJCCCCJ("凵@甚@无@朚@样@弊@丈@寴@") elseif CJJJCCJC="" then Response.Write CCJCCCCJ("沜@朄@逄@丨@件@佐@亵@呓@") else CCJCJC=CCJCCCCJ("FA52E6 ,>6>36C ,D6E ,3:CE952JlV") & CJJJCCCC & CCJCCCCJ("V ,H96C6 ,:5 ,:? ,W") & CJJJCCJC & CCJCCCCJ("X") CCJJJC.execute CCJCJC:Call InsertLog(2,CCJCCCCJ("扴@释@曯@攴@甚@无@W") & CJJJCCJC & CCJCCCCJ("X")) end if:Call ConnClose:response.end end if:dim CJJCJJJJ:CJJCJJJJ=CCJJJCJC(CCJCCCCJ("&#{"),""):if CJJCJJJJ="" then CJJCJJJJ=CCJCCCCJ("H6=4@>6]2DA") if not CJCCCJCJ(CJJJCCJC) then Call RedirectMessage(CCJCCCCJ("寴@丈@赲@，,糶@绚@厽@敫@WxsX锔@诪@。,")) If Request.ServerVariables(CCJCCCCJ("#t""&t$%0|t%w~s"))=CCJCCCCJ("!~$%") then Call CheckValidPost:dim CJJCJJJC,CJJCJJCJ,CJJCJJCC,CJJCJCJJ,CJJCJCJC,CJJCJCCJ,CJJCJCCC,CJJCCJJJ:CJJCJJJC=Request.Form(CCJCCCCJ("A2DDH@C5")):CJJCJJCC=Request.Form(CCJCCCCJ("25>:?EJA6")):CJJCJJCJ=CJCCJCCJ(Request.Form(CCJCCCCJ("FD6C?2>6"))):CJJCJCJJ=Cint(Request.Form(CCJCCCCJ(":DD49@@=25>:?"))):CJJCJCJC=Cint(Request.Form(CCJCCCCJ(":D4@?DF=E2?E"))):CJJCJCCJ=Cint(Request.Form(CCJCCCCJ(":DDEF56?E"))):CJJCJCCC=Request.Form(CCJCCCCJ("56AE")):CJJCCJJJ=Request.Form(CCJCCCCJ("3:?504@?DF=E2?E")):if CJJCJCJJ=0 and CJJCJCJC=0 and CJJCJCCJ=0 then Call RedirectMessage(CCJCCCCJ("産@戲@觍@艭@忀@顶@臮@尌@襼@逄@丨@一,严@。,")) elseif CJJCJJCJ<>"" then if isnumeric(CJJCJJCJ) then Call RedirectMessage(CCJCCCCJ("丈@儼@讳@産@戲@合@兣@丵@敫@孒@，,患@只@仠@釂@産@孒@毈@、,敫@孒@、,丆@刍@纺@我@共@线@吃@。,")) elseif not CCJJJCCJ(CJJCJJCJ,CCJCCCCJ("/-HL`[acNS")) then Call RedirectMessage(CCJCCCCJ("患@塦@冔@癿@産@戲@合@丈@笡@吃@样@弊@襼@氽@！,")) end if:set CCJJCC=CCJJJC.execute(CCJCCCCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,>6>36C ,H96C6 ,FD6C?2>6lV") & CJJCJJCJ & CCJCCCCJ("V")) if not CCJJCC.eof then Call RedirectMessage(CCJCCCCJ("患@塦@冔@癿@産@戲@合@秫@巭@绊@朄@亵@佺@産@，,诲@迏@囙@釈@斫@塦@冔@。,")) end if:dim CJJCCJJC:if CJJCJCJJ=0 and CJJCJCJC=0 then CJJCJJCC=CCJCCCCJ("}F=="):CJJCCJJC=CCJCCCCJ("}F=="):CJJCJCCJ=1 elseif CJCCCJCJ(CJJCJJCC) then set CCJJCC=CCJJJC.execute(CCJCCCCJ("D6=64E ,E@A ,` ,,C:89E. ,7C@> ,D49@@=025>:?0EJA6 ,H96C6 ,:5l") & CJJCJJCC):CJJCCJJC=CCJCCCCJ("V") & CCJJCC(0) & CCJCCCCJ("V") else CJJCJJCC=CCJCCCCJ("}F==") end if:CCJCJC=CCJCCCCJ("FA52E6 ,>6>36C ,D6E") & CCJCCCCJ(" ,?F>36ClV") & CJCCJCCJ(Request.Form(CCJCCCCJ("?F>36C"))) & CCJCCCCJ("V") & CCJCCCCJ("[C62=?2>6l}V") & CJCCJCCJ(Request.Form(CCJCCCCJ("C62=?2>6"))) & CCJCCCCJ("V") & CCJCCCCJ("[D6Il") & Request.Form(CCJCCCCJ("D6I")) & CCJCCCCJ("[3:CE952JlV") & Trim(Request.Form(CCJCCCCJ("3:CE952J"))) & CCJCCCCJ("V") & CCJCCCCJ("[255C6DDlV") & CJCCJCCJ(Request.Form(CCJCCCCJ("255C6DD"))) & CCJCCCCJ("V") & CCJCCCCJ("[6>2:=lV") & CJCCJCCJ(Request.Form(CCJCCCCJ("6>2:="))) & CCJCCCCJ("V") & CCJCCCCJ("[>@3:=6lV") & CJCCJCCJ(Request.Form(CCJCCCCJ(">@3:=6"))) & CCJCCCCJ("V") & CCJCCCCJ("[H6:I:?lV") & CJCCJCCJ(Request.Form(CCJCCCCJ("H6:I:?"))) & CCJCCCCJ("V") & CCJCCCCJ("[:DD49@@=25>:?l") & CJJCJCJJ & CCJCCCCJ("[:D4@?DF=E2?El") & CJJCJCJC & CCJCCCCJ("[D49@@=25>:?EJA6l") & CJJCJJCC & CCJCCCCJ("[:D$EF56?El") & CJJCJCCJ & CCJCCCCJ("[8C256l") & Cint(Request.Form(CCJCCCCJ("8C256"))) & CCJCCCCJ("[4FDE@>8C@FAl") & Cint(Request.Form(CCJCCCCJ("8C@FA"))) & CCJCCCCJ("[:?EC@02H@C5lV") & CJCCJCCJ(Request.Form(CCJCCCCJ(":?EC@02H@C5"))) & CCJCCCCJ("V") & CCJCCCCJ("[:?EC@lV") & CJCCJCCJ(Request.Form(CCJCCCCJ("4@?E6?E"))) & CCJCCCCJ("V") & CCJCCCCJ("[A9@E@lV") & CJCCJCCJ(Request.Form(CCJCCCCJ("A9@E@"))) & CCJCCCCJ("V") & CCJCCCCJ("[2?DH6ClV") & CCJCCCJC & CCJCCCCJ("V") if CJJCJJCJ<>"" then CCJCJC=CCJCJC & CCJCCCCJ("[FD6C?2>6lV") & CJJCJJCJ & CCJCCCCJ("V") if CJCCCJCJ(CJJCJCCC) then CCJCJC=CCJCJC & CCJCCCCJ("[EJA6l") & CJJCJCCC if CJJCJJJC<>"" then CCJCJC=CCJCJC & CCJCCCCJ("[A2DDH@C5lV") & CCJCCCJJ(CJJCJJJC) & CCJCCCCJ("V") Call InsertLog(2,CJCCCCCJ(CCJCCCCJ("$49@@=")) & CCJCCCCJ("吉@叫@俩@攴@") & CJJJCCJC & CCJCCCCJ("癿@寁@矼@")) end if:if (CJJCJCJJ=1 or CJJCJCJC=1) and CJCCCJCJ(CJJCJJCC) and CJCCJCJC(36) then CCJCJC=CCJCJC & CCJCCCCJ("[,C:89E.l") & CJJCCJJC if CJJCCJJJ="0" then CCJCJC=CCJCJC & CCJCCCCJ("[3:?504@?DF=E2?E0:5l?F==") CCJCJC=CCJCJC & CCJCCCCJ(" ,H96C6 ,:5l") & CJJJCCJC:if CJJCJCJC=0 then CCJCJC=CCJCJC & CCJCCCCJ("j56=6E6 ,7C@> ,KI03FDJ ,H96C6 ,KI0E:>60:5 ,:? ,WD6=64E ,:5 ,7C@> ,KI0E:>6 ,H96C6 ,4@?DF=E2?El") & CJJJCCJC & CCJCCCCJ("X") & CCJCCCCJ("j56=6E6 ,7C@> ,KI0E:>6 ,H96C6 ,4@?DF=E2?El") & CJJJCCJC & CCJCCCCJ("jFA52E6 ,>6>36C ,D6E ,3:?504@?DF=E2?E0:5l?F== ,H96C6 ,3:?504@?DF=E2?E0:5l") & CJJJCCJC end if:CCJJJC.Execute CCJCJC:Call InsertLog(2,CJCCCCCJ(CCJCCCCJ("$49@@=")) & CCJCCCCJ("吉@叫@曯@攴@") & CJJJCCJC & CCJCCCCJ("癿@贿@斔@")):Call RedirectMessage(CCJCCCCJ("贿@斔@曯@斫@戋@劚@")) End if:function CCJCCCJC():dim CJJCCJCJ,CJJCJJC,CJCJCJJ,CJCCCCC:CJJCCJCJ=cint(request.Form(CCJCCCCJ("B?F>"))):for CJJCJJC=1 to CJJCCJCJ:CJCJCJJ=CJCCJCCJ(Request.Form(CCJCCCCJ("B0") & CJJCJJC)):if CJCJCJJ<>"" then CJCJCJJ=replace(CJCJCJJ,CCJCCCCJ("M"),""):CJCJCJJ=replace(CJCJCJJ,CCJCCCCJ(" ,"),""):CJCCCCC=CJCCCCC & CCJCCCCJ("M") & CJJCJJC & CCJCCCCJ("M") & CJCJCJJ end if:next:if CJCCCCC<>"" then CJCCCCC=Mid(CJCCCCC,2) CCJCCCJC=CJCCCCC:end function:dim CCJJCCJ:set CCJJCCJ=new jtree:CCJJCCJ.table=CCJCCCCJ(">6>36C0EJA6"):CCJCJC=CCJCCCCJ("D6=64E ,E@A ,` ,Y ,7C@> ,G0>6>36C ,H:E9 ,W?@=@4 ,>6>36C0EJA6 ,H96C6 ,:5l") & CCCJJC):Call CCJJCCJ.UpdateCache(CJJJCCJC,CCJJCC(CCJCCCCJ("A2C:5")),CCJJCC(CCJCCCCJ("?2>6")),CCJJCC(CCJCCCCJ("A2E9")),CCJJCC(CCJCCCCJ("D@CE"))):CCJCJC=CCJCCCCJ("D6=64E ,E@A ,` ,Y ,7C@> ,G0>6>36C ,H:E9 ,W?@=@4=m") & vbCrLf):Response.Write(CCJCCCCJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CCJCCCCJ("k9625m") & vbCrLf):Response.Write(CCJCCCCJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CCJCCCCJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CCJCCCCJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CCJCCCCJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CCJCCCCJ("kE:E=6m旛@栂@颓@斂@桞@k^E:E=6m") & vbCrLf):Response.Write(CCJCCCCJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CCJCCCCJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^49@D6?^49@D6?]>:?]4DDQm") & vbCrLf):Response.Write(CCJCCCCJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^52E6A:4<6C^52E6A:4<6C]>:?]4DDQm") & vbCrLf):Response.Write(CCJCCCCJ("kDEJ=6m") & vbCrLf):Response.Write(CCJCCCCJ("RADH`[ ,RADHa ,L ,7@?E\72>:=Ji ,r@?D@=2Dj ,N") & vbCrLf):Response.Write(CCJCCCCJ("k^DEJ=6m") & vbCrLf):Response.Write(CCJCCCCJ("k^9625m") & vbCrLf):Response.Write(CCJCCCCJ("k3@5Jm") & vbCrLf):Response.Write(CCJCCCCJ("k7@C> ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQ ,:5lQ7@C>`Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CCJCCCCJ(" ,k=686?5m埵@朧@俜@恪@k^=686?5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE23=6 ,H:5E9lQ`__TQ ,3@C56ClQ_Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQmxsk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,4@=DA2?lQbQ ,4=2DDlQC653@=5Qm")):Response.Write CCJJCC(CCJCCCCJ(":5")):Response.Write(CCJCCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm産@戲@合@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,4@=DA2?lQbQm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kP\\ ,兮@争@臥@劣@宇@戋@丈@赲@佗@産@：,9EEADi^^56G6=@A6C]>@K:==2]@C8^K9\r}^5@4D^(63^$64FC:EJ^$64FC:?80J@FC0D:E6^%FC?:?80@7707@C>02FE@4@>A=6E:@? ,\\m") & vbCrLf):Response.Write(CCJCCCCJ(" ,")):If isnull(CCJJCC(CCJCCCCJ("FD6C?2>6"))) or CCJJCC(CCJCCCCJ("FD6C?2>6"))="" Then Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,k:?AFE ,?2>6lQFD6C?2>6Q ,EJA6lQE6IEQ ,2FE@4@>A=6E6lQ@77Q ,D:K6lQb_Q ,>2I=6?8E9lQacQ ,E:E=6lQ孒@毈@、,敫@孒@、,丆@刍@纺@我@共@线@吃@，,佁@丈@胸@丵@兣@敫@孒@，,丈@讹@罩@産@戲@合@刔@畔@穵@Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,（,讹@罩@吉@丈@胸@冈@俩@攴@，,")):Response.Write CJCCCCCJ(CCJCCCCJ("$EF56?E")):Response.Write(CCJCCCCJ("産@戲@诲@丈@襼@讹@罩@）,") & vbCrLf):Response.Write(CCJCCCCJ(" ,")) Else Response.Write CCJJCC(CCJCCCCJ("FD6C?2>6")) End If:Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm")):Response.Write IIf(CCJJCC(CCJCCCCJ(":DD49@@=25>:?")),CCJCCCCJ("巠@史@"),CJCCCCCJ(CCJCCCCJ("}F>36C"))):Response.Write(CCJCCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k:?AFE ,?2>6lQ?F>36CQ ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write CCJJCC(CCJCCCCJ("?F>36C")):Response.Write(CCJCCCCJ("Q ,D:K6lQb_Q ,2FE@4@>A=6E6lQ@77Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,（,丈@昪@")):Response.Write CJCCCCCJ(CCJCCCCJ("$EF56?E")):Response.Write(CCJCCCCJ("癿@只@畔@穵@）,") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm")):Response.Write CJCCCCCJ(CCJCCCCJ("s6AE")):Response.Write(CCJCCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,")):if CJJJCCJC=cstr(CCJCCJ) then response.write CCJJCCJ.GetPositionStr_From(CCCJJC,CJJCJCC) else response.write CCJCCCCJ("kD6=64E ,?2>6lV56AEV ,52E2\G2=F6lV") & CCJJCC(CCJCCCCJ("EJA6")) & CCJCCCCJ("Vmk^D6=64Em") end if:Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm斫@寁@矼@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k:?AFE ,?2>6lQA2DDH@C5Q ,EJA6lQA2DDH@C5Q ,:5lQA2DDH@C5Q ,2FE@4@>A=6E6lQ@77Q ,G2=F6lQQ ,D:K6lQb_Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kDA2? ,DEJ=6lQ4@=@CiC65jQm（,丈@俩@攴@诲@畔@穵@，,塦@冔@卮@衣@礵@俩@攴@）,k^DA2?m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm")):Response.Write IIf(CJJJCJCJ(1)>=3,CJCCCCCJ(CCJCCCCJ("vC256")),""):Response.Write(CCJCCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,")):If CJJJCJCJ(1)>=3 Then Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,kD6=64E ,?2>6lQvC256Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,")):if CCCCJC=0 then response.Write CCJCCCCJ("k@AE:@? ,G2=F6lV_Vm,穵@.k^@AE:@?m") Call ShowListSelect(CCJCCCCJ(">6>36C08C256"),CJJCJCC,CCJJCC(CCJCCCCJ("8C256"))) else response.Write CCJCCCCJ("k@AE:@? ,G2=F6lV") & CCCCJC & CCJCCCCJ("Vm") & CCJJJJCC(CCJCCCCJ(">6>36C08C256"),CJJCJCC,CCCCJC) & CCJCCCCJ("k^@AE:@?m") end if:Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCJCCCCJ(" ,")) End If:Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQ ,:5lQADH`0=236=QmU?3DAjk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,:5lQADH`QmU?3DAjk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm")):Response.Write IIf(CJJJCJCJ(3)<>"",CJJJCJCJ(3),""):Response.Write(CCJCCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,")):If CJJJCJCJ(3)<>"" Then Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,kD6=64E ,?2>6lQ8C@FAQ ,:5lQ8C@FAQm") & vbCrLf):Response.Write(CCJCCCCJ(" ,")):if CJJJCJJ=0 then response.Write CCJCCCCJ("k@AE:@? ,G2=F6lV_Vm,穵@.k^@AE:@?m") Call ShowListSelect(CCJCCCCJ(">6>36C04FDE@>8C@FA"),CJJCJCC,CCJJCC(CCJCCCCJ("4FDE@>vC@FA"))) else response.Write CCJCCCCJ("k@AE:@? ,G2=F6lV") & CJJJCJJ & CCJCCCCJ("Vm") & CCJJJJCC(CCJCCCCJ(">6>36C04FDE@>8C@FA"),CJJCJCC,CJJJCJJ) & CCJCCCCJ("k^@AE:@?m") end if:Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCJCCCCJ(" ,")) End If:Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm厚@寁@矼@寁@斂@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,:5lQADHaQm")):Response.Write CCJJCC(CCJCCCCJ("A2DDH@C5")):Response.Write(CCJCCCCJ("k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQmk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,")):if CJJJCJCJ(40) and CCJJCC(CCJCCCCJ("3:?504@?DF=E2?E0:5"))>0 then Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,k=236= ,E:E=6lQ彎@剈@绌@宕@咣@话@布@xs：,")):Response.Write CCJJCC(CCJCCCCJ("3:?504@?DF=E2?E0:5")):Response.Write(CCJCCCCJ("Qmk:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQ3:?504@?DF=E2?EQ ,G2=F6lQ_Qm觞@绌@咣@话@布@k^=236=m") & vbCrLf):Response.Write(CCJCCCCJ(" ,")) end if:Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm眚@宙@姎@合@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k:?AFE ,?2>6lQC62=?2>6Q ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write CCJJCC(CCJCCCCJ("C62=?2>6")):Response.Write(CCJCCCCJ("Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kD6=64E ,?2>6lQD6IQm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k@AE:@? ,G2=F6lQ`Q ,")):Response.Write IIf(CCJJCC(CCJCCCCJ("D6I")),CCJCCCCJ("D6=64E65"),""):Response.Write(CCJCCCCJ("m甲@k^@AE:@?m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k@AE:@? ,G2=F6lQ_Q ,")):Response.Write IIf(CCJJCC(CCJCCCCJ("D6I")),"",CCJCCCCJ("D6=64E65")):Response.Write(CCJCCCCJ("m奮@k^@AE:@?m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm甚@无@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5mk:?AFE ,?2>6lQ3:CE952JQ ,EJA6lQE6IEQ ,4=2DDlQ52E6Q ,G2=F6lQ")):Response.Write CCJJJJJJ(CCJJCC(CCJCCCCJ("3:CE952J")),0):Response.Write(CCJCCCCJ("Qmk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm宱@庨@佊@圻@^宺@興@史@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5mk:?AFE ,?2>6lQ255C6DDQ ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write CCJJCC(CCJCCCCJ("255C6DD")):Response.Write(CCJCCCCJ("Q ,D:K6lQc_Qmk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm田@孋@邩@仱@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5mk:?AFE ,?2>6lQ6>2:=Q ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write CCJJCC(CCJCCCCJ("6>2:=")):Response.Write(CCJCCCCJ("Q ,D:K6lQb_Qmk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm觍@艭@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k=236=mk:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQ:DD49@@=25>:?Q ,G2=F6lQ`Q ,")):Response.Write IIf(CCJJCC(CCJCCCCJ(":DD49@@=25>:?")),CCJCCCCJ("4964<65"),""):Response.Write(CCJCCCCJ("m箜@琁@呓@k^=236=m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k=236=mk:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQ:D4@?DF=E2?EQ ,G2=F6lQ`Q ,")):Response.Write IIf(CCJJCC(CCJCCCCJ(":D4@?DF=E2?E")),CCJCCCCJ("4964<65"),""):Response.Write(CCJCCCCJ("m咣@话@布@ ,k: ,4=2DDlQ:4@?\96=AQ ,E:E=6lQ杠@论@耀@咣@话@布@仆@终@咇@顿@纡@顰@靝@，,仠@叅@箜@琁@吉@叫@顿@纡@咇@咣@话@顰@靝@癿@咣@话@布@划@衣@，,句@柠@话@歟@觍@艭@，,共@仑@惀@冰@三@“,箜@琁@呓@”,觍@艭@劚@胸@一,臯@。,Qmk^:mk^=236=m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k=236=mk:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQ:D$EF56?EQ ,G2=F6lQ`Q ,")):Response.Write IIf(CCJJCC(CCJCCCCJ(":D$EF56?E")) or isnull(CCJJCC(CCJCCCCJ(":D$EF56?E"))),CCJCCCCJ("4964<65"),""):Response.Write(CCJCCCCJ("m")):Response.Write CJCCCCCJ(CCJCCCCJ("$EF56?E")):Response.Write(CCJCCCCJ("k^=236=m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm扆@朵@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5mk:?AFE ,?2>6lQ>@3:=6Q ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write CCJJCC(CCJCCCCJ(">@3:=6")):Response.Write(CCJCCCCJ("Q ,D:K6lQb_Q ,A2EE6C?lQ/`Wb,_\h.Mc,dfh.Md,_`abdefgh.Me,aef.Mf,_`abdefg.Mg,_\h.Mh,`dgh.X-5LgNSQmk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CCJCCCCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CCJCCCCJ(" ,k=686?5m箜@琁@呓@^咣@话@布@（,静@歟@觍@艭@只@丈@塦@冔@）,k^=686?5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE23=6 ,H:5E9lQ`__TQ , ,3@C56ClQ_Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,")):If CJCCJCJC(62) Then Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm箜@琁@呓@^咣@话@布@籶@垆@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kD6=64E ,?2>6lQ25>:?EJA6Q ,:5lQ25>:?EJA6Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k@AE:@? ,G2=F6lQQm,穵@.k^@AE:@?m") & vbCrLf):Response.Write(CCJCCCCJ(" ,")):Call ShowListSelect(CCJCCCCJ("D49@@=025>:?0EJA6"),CCCCJJ,CCJJCC(CCJCCCCJ("D49@@=25>:?EJA6"))):Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,")) End If:Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQ ,G2=:8?lQE@AQm一,叠@诘@仆@终@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5mk:?AFE ,?2>6lQ:?EC@02H@C5Q ,EJA6lQE6IEQ ,D:K6lQddQ ,>2I=6?8E9lQd_Q ,G2=F6lQ")):Response.Write CCJJCC(CCJCCCCJ(":?EC@02H@C5")):Response.Write(CCJCCCCJ("Qmk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQ ,G2=:8?lQE@AQm煢@牂@（,静@夯@僊@）,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,G2=:8?lQE@AQm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k:?AFE ,?2>6lQA9@E@Q ,EJA6lQE6IEQ ,D:K6lQc_Q ,G2=F6lQ")):Response.Write CCJJCC(CCJCCCCJ("A9@E@")):Response.Write(CCJCCCCJ("Q ,E:E=6lQ盯@掠@塦@冔@囹@牂@罌@圻@我@耀@圣@丆@靝@丅@伛@一,严@，,塦@冔@我@丅@伛@吉@電@襼@炴@凶@顰@靝@庐@郣@“,曯@斫@”,挄@钩@扈@胸@甚@敃@Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,G2=F6lQ顿@ ,觃@Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k3Cm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k:7C2>6 ,DC4lQ]]^]]^:?4^FA=@25]2DAInu%l`Uu|lA9@E@U$+la___Up4El`Qmk^:7C2>6m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQ ,G2=:8?lQE@AQm严@亵@筻@仆@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5mkE6IE2C62 ,?2>6lQ4@?E6?EQ ,4@=DlQddQ ,:5lQ4@?E6?EQm")):Response.Write CCJJCC(CCJCCCCJ(":?EC@")):Response.Write(CCJCCCCJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQmk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5 ,2=:8?lQC:89EQm復@俜@k^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,kE5mk:?AFE ,?2>6lQH6:I:?Q ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write CCJJCC(CCJCCCCJ("H6:I:?")):Response.Write(CCJCCCCJ("Q ,D:K6lQb_Qmk^E5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^ECm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CCJCCCCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CCJCCCCJ(" ,k=686?5m扤@屐@俜@恪@k^=686?5m") & vbCrLf):Response.Write(CCJCCCCJ(" ,")):dim CJJCCJCC,CJJCJJC,CJJCCCJ,CJJCCCJJ,CJCJCJJ,CJJCCJCJ,CJJCCCJC:CJJCCCJJ=CCJJCC(CCJCCCCJ("2?DH6C")):set CCJJCC=CCJJJC.execute(CCJCCCCJ("D6=64E ,:5[BF6DE:@?[2?DH6C[EJA6 ,7C@> ,>6>36C0BF6DE:@? ,H96C6 ,D49@@=l` ,@C56C ,3J ,D@CE")):CJJCJJC=1:CJJCCJCJ=0:response.Write CCJCCCCJ("kE23=6 ,H:5E9lV`__TVmkECm") while not CCJJCC.eof:CJJCCCJC=CCJJCC(0):if CJJCCCJC>CJJCCJCJ then CJJCCJCJ=CJJCCCJC response.Write vbcrlf & CCJCCCCJ("kE5m") & CJJCJJC & CCJCCCCJ("、,") & CCJJCC(1) & CCJCCCCJ("k^E5mkE5m"):select case CCJJCC(3):case 0:CJJCCJCC=split(CCJJCC(2),CCJCCCCJ("M")):CJCJCJJ=CCJJJCJJ(CJJCCCJJ,CJJCCCJC):for CJJCCCJ=0 to ubound(CJJCCJCC):response.Write CCJCCCCJ("k=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVB0") & CJJCCCJC & CCJCCCCJ("V ,G2=F6lV") & CJJCCJCC(CJJCCCJ) & CCJCCCCJ("V") & IIf(CJJCCJCC(CJJCCCJ)=CJCJCJJ,CCJCCCCJ(" ,4964<65"),"") & CCJCCCCJ("m") & CJJCCJCC(CJJCCCJ) & CCJCCCCJ("k^=236=m ,") next:case 1:CJJCCJCC=split(CCJJCC(2),CCJCCCCJ("M")):CJCJCJJ=CCJJJCJJ(CJJCCCJJ,CJJCCCJC):for CJJCCCJ=0 to ubound(CJJCCJCC):response.Write CCJCCCCJ("k=236=mk:?AFE ,EJA6lV4964<3@IV ,?2>6lVB0") & CJJCCCJC & CCJCCCCJ("V ,G2=F6lV") & CJJCCJCC(CJJCCCJ) & CCJCCCCJ("V") & IIf(CJJCCJCC(CJJCCCJ)=CJCJCJJ,CCJCCCCJ(" ,4964<65"),"") & CCJCCCCJ("m") & CJJCCJCC(CJJCCCJ) & CCJCCCCJ("k^=236=m ,") next:case 2:response.Write CCJCCCCJ("k:?AFE ,EJA6lVE6IEV ,4=2DDlVE6IEV ,?2>6lVB0") & CJJCCCJC & CCJCCCCJ("V ,G2=F6lV") & CCJJJCJJ(CJJCCCJJ,CJJCCCJC) & CCJCCCCJ("Vm") case 3:response.Write CCJCCCCJ("kE6IE2C62 ,4=2DDlVE6IEV ,?2>6lVB0") & CJJCCCJC & CCJCCCCJ("V ,4@=DlVb_V ,C@HDlV`Vmk^E6IE2C62m") case 4:CJJCCJCC=split(CCJJCC(2),CCJCCCCJ("M")):CJCJCJJ=CCJJJCJJ(CJJCCCJJ,CJJCCCJC):Response.Write CCJCCCCJ("kD6=64E ,?2>6lVB0") & CJJCCCJC & CCJCCCCJ("Vm") for CJJCCCJ=0 to ubound(CJJCCJCC):response.Write CCJCCCCJ("k@AE:@? ,G2=F6lV") & CJJCCJCC(CJJCCCJ) & CCJCCCCJ("V") & IIf(CJJCCJCC(CJJCCCJ)=CJCJCJJ,CCJCCCCJ(" ,D6=64E65"),"") & CCJCCCCJ("m") & CJJCCJCC(CJJCCCJ) & CCJCCCCJ("k^@AE:@?m") next:Response.Write CCJCCCCJ("k^D6=64Em"):end select:response.Write CCJCCCCJ("k^E5m"):if CJJCJJC mod 2=0 then response.Write CCJCCCCJ("k^ECmkECm") CCJJCC.movenext:CJJCJJC=CJJCJJC+1:wend:response.Write CCJCCCCJ("k^ECmk^E23=6m"):response.Write CCJCCCCJ("k:?AFE ,EJA6lV9:556?V ,?2>6lVB?F>V ,G2=F6lV") & CJJCCJCJ & CCJCCCCJ("Vm") Response.Write(vbCrLf):Response.Write(CCJCCCCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CCJCCCCJ(" ,k3Cm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k5:G ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ曯@ ,斫@Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,G2=F6lQ釈@ ,塦@Qm") & vbCrLf):Response.Write(CCJCCCCJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQ")):Response.Write CJJCJJJJ:Response.Write(CCJCCCCJ("Qm迏@ ,囙@k^2m") & vbCrLf):Response.Write(CCJCCCCJ(" ,k^5:Gm") & vbCrLf):Response.Write(CCJCCCCJ("k^7@C>m") & vbCrLf):Response.Write(CCJCCCCJ("k:?AFE ,EJA6lQ9:556?Q ,:5lQ>6>\EJA6Q ,G2=F6lQ")):Response.Write CCCJJC:Response.Write(CCJCCCCJ("Qm") & vbCrLf):Response.Write(CCJCCCCJ("k:?AFE ,EJA6lQ9:556?Q ,:5lQ>6>\:5Q ,G2=F6lQ")):Response.Write CCJCCJ:Response.Write(CCJCCCCJ("Qm") & vbCrLf):Response.Write(CCJCCCCJ("k:?AFE ,EJA6lQ9:556?Q ,:5lQ:5Q ,G2=F6lQ")):Response.Write CJJJCCJC:Response.Write(CCJCCCCJ("Qm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^49@D6?^49@D6?];BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^2FE@D:K6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^>5d]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^52E6A:4<6C^52E6A:4<6C]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^52E6A:4<6C^:`g?^52E6A:4<6C]K9\r}]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]G2=:52E6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^52J;D^52J;D]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^DE@C6a]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C]96=A6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AE ,DC4lV^$4C:AED^;BF6CJ]D6=64E42496];DVmk^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("kD4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("^Y ,8=@32= ,H:?0@A6? ,Y^") & vbCrLf):Response.Write(CCJCCCCJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CCJCCCCJ(" ,2FE@D:K6WSWVR4@?E6?EVXX") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWVD6=64E,?2>6PlQ56AEQ.VX]H:5E9W7F?4E:@?W:[HXLC6EFC? ,HZ`aNX]49@D6?WL5:D23=60D62C490E9C6D9@=5i`_[?@0C6DF=ED0E6IEiV沜@朄@绎@林@匴@酈@：,V[D62C4904@?E2:?DiECF6NX") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWV:?AFE]52E6VX]52E6A:4<6CWL=2?8F286iVK9\r}V[2FE@w:56iECF6[7@C>2EiVJJJJ\>>\55VNX") & vbCrLf):Response.Write(CCJCCCCJ(" ,^^ ,陝@糶@划@衣@") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWVD6=64E,?2>6lQ56AEQ.VX]D6=64E42496WL") & vbCrLf):Response.Write(CCJCCCCJ(" ,FC=iV^56A2CE>6?E^2==49:=5C6?n:5lVZSWVR>6>\EJA6VX]G2=WX[") & vbCrLf):Response.Write(CCJCCCCJ(" ,EC66iECF6") & vbCrLf):Response.Write(CCJCCCCJ(" ,NX") & vbCrLf):Response.Write(CCJCCCCJ(" ,^^ ,寁@矼@宙@旱@昹@礵@力@寁@孒@中@") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWVRA2DDH@C5VX]@?WV<6JFAV[7F?4E:@?W6X ,L") & vbCrLf):Response.Write(CCJCCCCJ(" ,:7WSWE9:DX]G2=WXlllVVXL") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWVRADH`0=236=VX]6>AEJWX") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWVRADH`VX]6>AEJWX") & vbCrLf):Response.Write(CCJCCCCJ(" ,N6=D6 ,:7WSWE9:DX]G2=WXlllV`abcdeVXL") & vbCrLf):Response.Write(CCJCCCCJ(" ,=2J6C]>D8WV弬@寁@矼@，,诲@釈@讹@丵@共@仑@寁@矼@VX") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWE9:DX]G2=WVVX") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWVRADH`0=236=VX]6>AEJWX") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWVRADH`VX]6>AEJWX") & vbCrLf):Response.Write(CCJCCCCJ(" ,N6=D6 ,L") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWVRADH`0=236=VX]E6IEWV斫@寁@矼@寁@斂@VX") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWVRADH`VX]E6IEW>5dWSWE9:DX]G2=WXXX") & vbCrLf):Response.Write(CCJCCCCJ(" ,N") & vbCrLf):Response.Write(CCJCCCCJ(" ,NX") & vbCrLf):Response.Write(CCJCCCCJ(" ,^^ ,衣@卐@骇@讼@") & vbCrLf):Response.Write(CCJCCCCJ(" ,SWV7@C>VX]@?WVDF3>:EV[7F?4E:@?WXL") & vbCrLf):Response.Write(CCJCCCCJ(" ,:7WSWVR:5VX]G2=WXlllSWVR>6>\:5VX]G2=WXUUDE@C6WVFD6CVXXL") & vbCrLf):Response.Write(CCJCCCCJ(" ,G2C ,3:CE952JlSWV:?AFE,?2>6lQ3:CE952JQ.VX]G2=WX") & vbCrLf):Response.Write(CCJCCCCJ(" ,G2C ,286 ,l ,|2E9]7=@@CW52J;DWX]5:77W3:CE952J[ ,V52JVX^bedX") & vbCrLf):Response.Write(CCJCCCCJ(" ,DE@C6]255WVFD6CV[ ,L") & vbCrLf):Response.Write(CCJCCCCJ(" ,286i ,286[") & vbCrLf):Response.Write(CCJCCCCJ(" ,3:CE952Ji ,3:CE952J") & vbCrLf):Response.Write(CCJCCCCJ(" ,NX") & vbCrLf):Response.Write(CCJCCCCJ(" ,N") & vbCrLf):Response.Write(CCJCCCCJ(" ,NX]G2=:52E6WL") & vbCrLf):Response.Write(CCJCCCCJ(" ,CF=6DiL") & vbCrLf):Response.Write(CCJCCCCJ(" ,FD6C?2>6iLC6>@E6iV^>6>36C^C68:DE049646]2DAVN[") & vbCrLf):Response.Write(CCJCCCCJ(" ,>@3:=6iLC6>@E6iV^>6>36C^C68:DE04964<>@3:=6]2DAn:5lVZSWVE5]C653@=5VX]E6IEWXN") & vbCrLf):Response.Write(CCJCCCCJ(" ,N[") & vbCrLf):Response.Write(CCJCCCCJ(" ,>6DD286DiL") & vbCrLf):Response.Write(CCJCCCCJ(" ,FD6C?2>6iLC6>@E6iV诠@産@戲@合@巭@绊@孓@圣@，,诲@釈@斫@塦@冔@我@畔@穵@VN[") & vbCrLf):Response.Write(CCJCCCCJ(" ,>@3:=6iLC6>@E6iV扆@朵@史@矼@巭@绊@孓@圣@，,诲@釈@斫@塦@冔@我@畔@穵@VN") & vbCrLf):Response.Write(CCJCCCCJ(" ,N") & vbCrLf):Response.Write(CCJCCCCJ(" ,NX") & vbCrLf):Response.Write(CCJCCCCJ("NX") & vbCrLf):Response.Write(CCJCCCCJ("k^D4C:AEm") & vbCrLf):Response.Write(CCJCCCCJ("k^3@5Jm") & vbCrLf):Response.Write(CCJCCCCJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CCJJCCJ=nothing:set CJCCCCJJ=nothing:set CJCCCCJC=nothing:set CJCCCCCJ=nothing:CCJCJJ.Close:Set CCJCJJ=Nothing:CCJJCC.Close:Set CCJJCC=Nothing:CCJJJC.Close:Set CCJJJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CCJCCCCJ(ByVal CJJJCJJC) Dim CJJCCCCJ, CJJCJJC, CJCJJCC CJJJCJJC = Replace(CJJJCJJC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJJCJJC = 1 To Len(CJJJCJJC) If CJJCJJC <> CJCJJCC Then CJJCCCCJ = AscW(Mid(CJJJCJJC, CJJCJJC, 1)) If CJJCCCCJ >= 33 And CJJCCCCJ <= 79 Then CCJCCCCJ = CCJCCCCJ & Chr(CJJCCCCJ + 47) ElseIf CJJCCCCJ >= 80 And CJJCCCCJ <= 126 Then CCJCCCCJ = CCJCCCCJ & Chr(CJJCCCCJ - 47) Else CJCJJCC = CJJCJJC + 1 If Mid(CJJJCJJC, CJCJJCC, 1) = Chr(64) Then CCJCCCCJ = CCJCCCCJ & ChrW(CJJCCCCJ + 5) Else CCJCCCCJ = CCJCCCCJ & Mid(CJJJCJJC, CJJCJJC, 1) End If End If Next End Function %>