<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCCJJC, CCCJCJ,CCCJCC, CCCCJJ, CCCCJC:Set CCCJJC = server.CreateObject(CJCCJJCJ("ps~sq]r@??64E:@?")):CCCJJC.open Application(CJCCJJCJ("r@??64E:@?$EC:?8")):Set CCCJCJ=CCCJJC::Dim CCCCCJ,CCCCCC,CJJJJJJ,CJJJJJC,CJJJJCJ,CJJJJCC,CJJJCJJ,CJJJCJC,CJJJCCJ:Dim CJJJCCC,CJJCJJJ,CJJCJJC,CJJCJCJ,CJJCJCC,CJJCCJJ:Dim CJJCCJC,CJJCCCJ,CJJCCCC:Dim CJCJJJJ:CJCJJJJ=Trim(Request.Cookies(CJCCJJCJ("!$*|t|qt#"))):if CJCJJJJ="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CCCCCJ>0 then CCCCJC=CJCCJJCJ("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(CJCCJJCJ("弬@寁@矼@，,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,")) Call SetMemberCookie(CCCCCJ,CCCCCC) End IF end if::Function CJJCJCJJ(CCJCJJJ):dim CJCJJJC,CJCJJCJ:CJCJJCJ=split(CCJCJJJ,CJCCJJCJ("[")):CJJCJCJJ=False:for CJCJJJC=0 to ubound(CJCJJCJ):If Mid(CJJJJJJ,CJCJJCJ(CJCJJJC),1)="1" then CJJCJCJJ=True:exit function end if:next:End Function:Sub CheckLogined():if CCCCCJ=0 then Call ClearMemberCookie:Call ConnClose:dim CJCJJCC:CJCJJCC=trim(request.QueryString(CJCCJJCJ("D49@@="))):if isnumeric(CJCJJCC) then response.Redirect CJCCJJCJ("^>^G2?E^R^D49@@=^") & CJCJJCC & CJCCJJCJ("^DEF56?E^=@8:?nC65:C64El") & CJCCCJC else Call RedirectMessage(CJCCJJCJ("癶@彐@俜@恪@夬@敃@，,诲@釈@斫@癶@彐@。,")) end if end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CJCCJJCJ("!$*|t|qt#"))="":CCCCCJ=0:CJJJJCC=0:CCCCCC=Empty:CJJJJCJ=0:CJJJCJC=0:CJJJCJJ=0:CJJJJJC=0:CJJJCCC=False:CJJCCCJ=False:CJJCCCC=Empty:End Sub:Sub CheckMemberCookie():dim CJCJCJJ,CJCJCJC,CJCJJJC,CJCJCCJ,CJCJCCC:CJCJCJJ=split(CJCJJJJ,CJCCJJCJ("]")):if ubound(CJCJCJJ)<>2 then Call ClearMemberCookie elseif not isnumeric(CJCJCJJ(0)) or len(CJCJCJJ(1))<>32 or len(CJCJCJJ(2))<>32 then Call ClearMemberCookie else CJCJCJC=CJCJCJJ(1):for CJCJJJC=1 to len(CJCJCJC):CJCJCCJ=mid(CJCJCJC,CJCJJJC,1):if isnumeric(CJCJCCJ) then CJCJCCC=CJCJCCC & CJCJCCJ if len(CJCJCCC)=7 then exit for next:CJCJCJC=CJCJCJJ(2):if CJCJCCC<>mid(CJCJCJC,6,7) then Call ClearMemberCookie else CJCJCCJ=mid(CJCJCJC,18,10)/2:if CJCJCCJ6"), CJCCJJCJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJCCJJCJ("kD4C:AE"), CJCCJJCJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJCCJJC=new RegExp:CJCCJJC.Pattern=CJCCJJCJ("@?W,2\K.ZXl"):CJCCJJC.IgnoreCase = True:CJCCJJC.Global=True:str=CJCCJJC.Replace(str,CJCCJJCJ("@?S`U6BF2=Dj")):set CJCCJJC=nothing:CJJCJCJC=str End If:End Function:Function IIf(CJCCJCJC, CJCCJCCJ, CJCCJCCC):if isnull(CJCCJCJC) or isempty(CJCCJCJC) then IIf = CJCCJCCC elseif CJCCJCJC Then IIf = CJCCJCCJ Else IIf = CJCCJCCC end if:End Function:Const CJJCJJCC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":Function CJJCJCCC(str):if isnull(str) or str="" then CJJCJCCC=False:exit function end if:Dim CJCCJJC:Set CJCCJJC = New RegExp:CJCCJJC.Pattern = CJCCJJCJ("/`Wb,_\h.Mc,dfh.Md,_`abdefgh.Me,aef.Mf,_`abdefg.Mg,_\h.Mh,`dgh.X-5LgNS"):CJCCJJC.IgnoreCase = True:CJJCJCCC = CJCCJJC.test(str):set CJCCJJC=nothing:End Function:Function CJJCCJJJ():dim CJCCJCJ:CJCCJCJ = Cstr(Request.ServerVariables(CJCCJJCJ("w%%!0)0u~#(p#sts0u~#"))):If CJCCJCJ = "" Then CJCCJCJ = Cstr(Request.ServerVariables(CJCCJJCJ("#t|~%t0pss#"))) if instr(CJCCJCJ,CJCCJJCJ("i"))>0 then CJCCJCJ=left(CJCCJCJ,instr(CJCCJCJ,CJCCJJCJ("i"))-1) elseif instr(CJCCJCJ,CJCCJJCJ("["))>0 then CJCCJCJ=left(CJCCJCJ,instr(CJCCJCJ,CJCCJJCJ("["))-1) end if:CJJCCJJJ=left(CJCCJCJ,15):End Function:Sub Debug(str):response.Charset=CJCCJJCJ("FE7\g"):dim CJCJJJC,CJCJCCJ,CJCCJCC:if isarray(str) then on error resume next:CJCJJJC=ubound(str,2):CJCCJCC=err.number:err.clear:on error goto 0:if CJCCJCC<>0 then for CJCJJJC=0 to ubound(str):if CJCJJJC>0 then response.Write CJCCJJCJ("k3C ,^m") response.Write CJCJJJC & CJCCJJCJ("i ,") & str(CJCJJJC):next else response.Write CJCCJJCJ("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m") for CJCJJJC=0 to ubound(str,2):response.Write CJCCJJCJ("kE9 ,2=:8?lV=67EVm") & CJCJJJC & CJCCJJCJ("k^E9m") next:response.Write CJCCJJCJ("k^ECm"):for CJCJJJC=0 to ubound(str):response.Write CJCCJJCJ("kECmkE9m") & CJCJJJC & CJCCJJCJ("k^E9m"):for CJCJCCJ=0 to ubound(str,2):response.Write CJCCJJCJ("kE5m") & str(CJCJJJC,CJCJCCJ) & CJCCJJCJ("k^E5m"):next:response.Write CJCCJJCJ("k^ECm"):next:response.Write CJCCJJCJ("k^E23=6m") end if elseif isnull(str) then response.Write CJCCJJCJ(",}F==.") else Response.Write replace(str,vbcrlf,CJCCJJCJ("k3Cm")) end if:Call ConnClose:Response.End:End Sub:Public Function CJJCCJJC():Dim CJCCCJJ, CJCCCJC:CJCCCJC = Request.ServerVariables(CJCCJJCJ("!p%w0x}u~")):CJCCCJJ = Request.ServerVariables(CJCCJJCJ("""&t#*0$%#x}v")):If CJCCCJJ <> Empty Then if instr(lcase(CJCCCJJ),CJCCJJCJ("Tb4:7C2>6"))>0 or instr(lcase(CJCCCJJ),CJCCJJCJ("Tb4D4C:AE"))>0 then Call RedirectMessage(CJCCJJCJ("寴@丈@赲@，,患@癿@圫@圻@栊@否@朄@静@泐@孒@笡@！,！,！,")) CJCCCJC = CJCCCJC & CJCCJJCJ("n") & CJCCCJJ end if:CJJCCJJC = CJCCCJC:End Function:Sub SetHttpOnlyCookie(CJCCCJJJ,CJCCCJJC):dim CJCJCJJ:CJCJCJJ=CJCCCJJJ & CJCCJJCJ("l") & CJCCCJJC & CJCCJJCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJCCJJCJ("$6E\r@@<:6"),CJCJCJJ):End Sub:::::::Function CJJCCJCJ(CJCCJCC):if isnull(CJCCJCC) or trim(CJCCJCC)="" or not isnumeric(CJCCJCC) then CJJCCJCJ=false else Dim CJCCJJC:Set CJCCJJC = New RegExp:CJCCJJC.Pattern = CJCCJJCJ("/-5ZS"):CJCCJJC.IgnoreCase = True:CJJCCJCJ = CJCCJJC.test(CJCCJCC):set CJCCJJC=nothing end if:End Function:Function CJJCCJCC(CJCCCJCJ):dim CJCCCCJ,CJCCCCC:CJCCCCJ=CJCCJJCJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CJCCCJCJ & CJCCJJCJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CJCCCCC=CCCJJC.execute(CJCCCCJ):CJJCCJCC = CJCCCCC(0):if isnull(CJJCCJCC) then CJJCCJCC=1 CJCCCCC.close : set CJCCCCC=nothing:End Function:::Sub WriteJS(CJCCCJCC):Call ConnClose:response.Charset=CJCCJJCJ("FE7\g"):response.write CJCCJJCJ("k") & CJCCJJCJ("D4C:AEm") & CJCCCJCC & CJCCJJCJ("k^D4C:AEm"):response.end:End Sub:Sub ConnClose():On Error Resume Next:set CCJCCCC=nothing:set CJJCCCJJ=nothing:set CJJCCCJC=nothing:set CJJCCCCJ=nothing:CJCCCCC.close : set CJCCCCC=nothing:CCCCJJ.Close : Set CCCCJJ=Nothing:CCCJCC.Close : Set CCCJCC=Nothing:CJJCCCCC.Close : Set CJJCCCCC = Nothing:CCCJJC.Close : Set CCCJJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJJJCCJC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJCCJJCJ("!$*0|6DD286"),server.URLEncode(CJJJCCJC)):Response.Redirect CJCCJJCJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub::Sub StringDown(CJCCCCJJ, str):Call ConnClose:Response.Charset=CJCCJJCJ("FE7\g"):Response.Buffer = True:Response.Clear:if right(CJCCCCJJ,4)=CJCCJJCJ("]4DG") then Response.BinaryWrite ChrB(&HEF) & ChrB(&HBB) & ChrB(&HBF) Response.AddHeader CJCCJJCJ("r@?E6?E\s:DA@D:E:@?"), CJCCJJCJ("2EE249>6?Ej ,7:=6?2>6l") & CJCCCCJJ:Response.ContentType = CJCCJJCJ("2AA=:42E:@?^@4E6E\DEC62>"):Response.Write str:Response.End:End Sub:::::::Sub SMS(CCJJCJJ,CCJCCCJ):dim CJCCCJC:if instr(CCJCCCJ,CJCCJJCJ("【,"))<>1 then CCJCCCJ=CJCCJJCJ("【,徾@浲@寷@舥@】,") & CCJCCCJ CJCCCJC=CJCCJJCJ("9EEAi^^`a_]ae]ee]ac^>D8^wEEAq2E49$6?5$|n244@F?El3;I95909JUADH5l3;I95909J`abU>@3:=6l") & CCJJCJJ & CJCCJJCJ("U>D8l") + server.urlencode(CCJCCCJ) Call CJCJJJJC(CJCCCJC,CJCCJJCJ("v6E"),"") End Sub:Function CJCJJJJC(ByVal CJCCCJC,ByVal CJCJJJJJ,Data) Dim CCJJJJJ,CCJJJJC,CCJJJCJ,CCJJJCC,CJCCJCC:if left(CJCCCJC,7)<>CJCCJJCJ("9EEAi^^") then CJCCCJC=CJCCJJCJ("9EEAi^^") & request.ServerVariables(CJCCJJCJ("$t#'t#0}p|t")) & CJCCJJCJ("i") & request.ServerVariables(CJCCJJCJ("$t#'t#0!~#%")) & CJCCCJC CJCJJJJJ=Ucase(CJCJJJJJ):Set CCJJJJJ = Server.CreateObject(CJCCJJCJ("|DI>=a]$6CG6C)|{w%%!")):CCJJJJJ.Open CJCJJJJJ, CJCCCJC, False:if CJCJJJJJ=CJCCJJCJ("!~$%") then CCJJJJJ.setRequestHeader CJCCJJCJ("r@?E6?E\%JA6"),CJCCJJCJ("2AA=:42E:@?^I\HHH\7@C>\FC=6?4@565") On Error Resume Next:CCJJJJJ.Send Data:if err then Call RedirectMessage(CJCCJJCJ("$6CG6C)|{w%%!\tCC@C\,") & CJCJJJJJ & CJCCJJCJ(".") & CJCCCJC & CJCCJJCJ("i ,") & err.description) On Error Goto 0:if CCJJJJJ.Readystate <> 4 or CCJJJJJ.Status<>200 then CCJJJCJ = "" else CCJJJCJ = CCJJJJJ.ResponseText end if:Set CCJJJJJ = Nothing:CJCJJJJC=CCJJJCJ End Function:::::function CJCJJJCJ(CJCJJCC):dim CCJJCJJ(),CJCJJJC,CJCCCCC,CJCCCCJ:redim CCJJCJJ(1,0):CCJJCJJ(0,0)=0:CCJJCJJ(1,0)=CJCCJJCJ(",穵@."):CJCCCCJ=CJCCJJCJ("D6=64E ,:5[C62=?2>6 ,7C@> ,G0>6>36C ,H:E9 ,W?@=@46>36C0EJA60E@Al") & CJCJJCC & CJCCJJCJ(" ,2?5 ,DE2E6ld ,2?5 ,:D4@?DF=E2?El`"):if cstr(CJCJJCC)<>"1" then CJCCCCJ=CJCCCCJ & CJCCJJCJ(" ,2?5 ,,8C@FA.kd") CJCCCCJ=CJCCCCJ & CJCCJJCJ(" ,@C56C ,3J ,:5"):set CJCCCCC=CCCJJC.execute(CJCCCCJ):CJCJJJC=0:while not CJCCCCC.eof:redim preserve CCJJCJJ(1,CJCJJJC):CCJJCJJ(0,CJCJJJC)=CJCCCCC(0):CCJJCJJ(1,CJCJJJC)=CJCCCCC(1):CJCJJJC=CJCJJJC+1:CJCCCCC.movenext:wend:CJCCCCC.close : set CJCCCCC=nothing:CJCJJJCJ=CCJJCJJ:end function::Function CJCJJJCC(ByVal CCJCCJC,style):if not isdate(CCJCCJC) then CJCJJJCC=CCJCCJC:exit function end if:dim CCJJCJC,CCJJCJJ,CCJJCCJ,CCJJCCC:CCJCCJC=cdate(CCJCCJC):CCJJCJC=Year(CCJCCJC):CCJJCJJ=Month(CCJCCJC):CCJJCCJ=Day(CCJCCJC):select case style:case 0:CJCJJJCC=CCJJCJC & CJCCJJCJ("\") & right(0 & CCJJCJJ,2) & CJCCJJCJ("\") & right(0 & CCJJCCJ,2):case 1:CJCJJJCC=CCJJCJC & right(0 & CCJJCJJ,2) & right(0 & CCJJCCJ,2):case 2:CJCJJJCC=right(CCJJCJC,2) & CJCCJJCJ("\") & right(0 & CCJJCJJ,2) & CJCCJJCJ("\") & right(0 & CCJJCCJ,2):case 3:CJCJJJCC=CCJJCJC & CJCCJJCJ("\") & right(0 & CCJJCJJ,2):case 4:CJCJJJCC=right(0 & CCJJCJJ,2) & CJCCJJCJ("\") & right(0 & CCJJCCJ,2):case 5:CJCJJJCC=right(0 & CCJJCCJ,2):case 6:CJCJJJCC=CCJJCJC & CJCCJJCJ("幯@") & right(0 & CCJJCJJ,2) & CJCCJJCJ("會@") & right(0 & CCJJCCJ,2) & CJCCJJCJ("无@"):case else CJCJJJCC=CCJCCJC:end select:End Function:Function CJCJJCJJ(Table):Dim CJCCCCC, CCJCJJJ, str(), CJCJJJC,CJCJCCJ,CCJCJJC:CCJCJJC=UCase(Table):If Not IsArray(Application(CJCCJJCJ("!$*0") & CCJCJJC)) Then CCCCJC=CJCCJJCJ("D6=64E ,:5[?2>6[>6>36CEJA6 ,7C@> ,,") & Table & CJCCJJCJ(". ,@C56C ,3J ,D@CE[:5"):set CJCCCCC=server.createobject(CJCCJJCJ("25@53]C64@C5D6E")):CJCCCCC.open CCCCJC,CCCJJC,1:CCJCJJJ = CJCCCCC.RecordCount:ReDim str(CCJCJJJ, 2):If CCJCJJJ > 0 Then For CJCJJJC = 1 To CCJCJJJ:for CJCJCCJ=0 to 2:str(CJCJJJC, CJCJCCJ) = CJCCCCC(CJCJCCJ):next:CJCCCCC.MoveNext:Next End If:CJCCCCC.Close: Set CJCCCCC = Nothing:Application(CJCCJJCJ("!$*0") & CCJCJJC) = str End If:CJCJJCJJ = Application(CJCCJJCJ("!$*0") & CCJCJJC):End Function::Function CJCJJCJC(CJCCCJCJ,CJCCCCJC,CCCCCCC):Dim str, CJCJJJC, CCJCJCJ:CCJCJCJ = CJCJJCJJ(CJCCCJCJ):For CJCJJJC = 1 To UBound(CCJCJCJ):if Cstr(CCJCJCJ(CJCJJJC,2))=Cstr(CJCCCCJC) and CStr(CCJCJCJ(CJCJJJC, 0)) = CCCCCCC & "" then str=CCJCJCJ(CJCJJJC,1):exit for end if:Next:if str="" then str=CJCCJJCJ(",朥@矠@.") CJCJJCJC=str:End Function:Sub InsertLog(CJCCCCCJ,CCJCCCJ):dim CJCCCCJ:CJCCCCJ=CJCCJJCJ("x?D6CE ,:?E@ ,=@8W>6>36C[:A[4@?E6?E[EJA6[FC=X ,G2=F6DW") & CCCCCJ & CJCCJJCJ("[V") & CJJCCJJJ & CJCCJJCJ("V") & CJCCJJCJ("[V") & CJJCJCJC(CCJCCCJ) & CJCCJJCJ("V") & CJCCJJCJ("[") & CJCCCCCJ & CJCCJJCJ("[V") & CJJCCJJC & CJCCJJCJ("V") & CJCCJJCJ("X") CCCJJC.execute CJCCCCJ:End Sub:Function CJCJJCCJ(CCCCCCC):dim CCJCJCC,CJCJJJC,CCJCCJJ,CCJCCJC,CCJCCCJ:CCJCCJC=Now:CCJCJCC= CCCCCCC & Year(CCJCCJC) & CCCCCCC & Month(CCJCCJC) & CCCCCCC & Day(CCJCCJC) & CCCCCCC & Hour(CCJCCJC) & CCCCCCC:CCJCJCC=StrReverse(CCJCJCC):for CJCJJJC=1 to len(CCJCJCC):CCJCCCJ=Cint(Mid(CCJCJCC,CJCJJJC,1)):CCJCCJJ=CCJCCJJ & CCJCCCJ^2:next:CCJCJCC=CCJCCJJ:CCJCJCC=left(CCJCJCC,16) & right(CCJCJCC,16):CCJCJCC=Mid(CCJCJCC,9,16):CJCJJCCJ=CCJCJCC:End Function:::::::::::::::Sub ClearCache(CJCCCCCC):Application.Contents.Remove CJCCCCCC End Sub::Class jTree:Private CCCCJC, CCJCCCC, CCCJJJJ, CCCJJJC,CCCJJCJ,CCCJJCC,CCCJCJJ,CCCJCJC:Private Sub Class_Initialize():CCCJJJJ = 0:CCCJJJC = 0:CCCJCJC=10:End Sub:Public Property Let Table(CCJJJJJJ):if CCJJJJJJ="" then Call RedirectMessage(CJCCJJCJ("寴@丈@赲@，,;%C66籶@宙@來@匑@旱@沜@朄@讹@罩@忀@襼@癿@屙@怢@！,")) CCCJJCJ=CCJJJJJJ:CCCJJCC=CJCCJJCJ("!$*0") & UCase(CCCJJCJ):Call GetTreeArray:End Property:Public Property Get Table():Table=CCCJJCJ:End Property:::Private Sub GetTreeArray():Dim CJCJJJC, CJCJCCJ, CCCJCCJ,RecordCount:CCJCCCC = Application(CCCJJCC):If Not IsArray(CCJCCCC) Then CCCCJC = CJCCJJCJ("D6=64E ,4@F?EW:5X ,7C@> ,") & CCCJJCJ:if CCCJCJJ<>"" then CCCCJC=CCCCJC & CJCCJJCJ(" ,H96C6 ,") & CCCJCJJ set CCCJCCJ=CCCJJC.execute(CCCCJC):RecordCount=CCCJCCJ(0):if RecordCount=0 then Call RedirectMessage(CJCCJJCJ("柠@话@W") & CCCJJCJ & CJCCJJCJ("^") & CCCJCJJ & CJCCJJCJ("X沜@朄@绎@林@敫@捩@")) CCCJJJC=RecordCount+CCCJCJC:ReDim CCJCCCC(CCCJJJC, 4):CCCCJC = CJCCJJCJ("D6=64E ,:5[A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCCJJCJ & CJCCJJCJ(" ,H:E9 ,W?@=@4"" then CCCCJC=CCCCJC & CJCCJJCJ(" ,H96C6 ,") & CCCJCJJ CCCCJC=CCCCJC & CJCCJJCJ(" ,@C56C ,3J ,D@CE[:5"):set CCCJCCJ=CCCJJC.execute(CCCCJC):For CJCJJJC = 1 To RecordCount:For CJCJCCJ = 0 To 4:CCJCCCC(CJCJJJC, CJCJCCJ) = CCCJCCJ(CJCJCCJ):if IsNull(CCJCCCC(CJCJJJC,4)) then CCJCCCC(CJCJJJC,4)=0 If CCJCCCC(CJCJJJC,2)="" then CCJCCCC(CJCJJJC,2)=CJCCJJCJ(",穵@.") Next:CCCJCCJ.MoveNext:Next:CCCJCCJ.Close: Set CCCJCCJ = Nothing:for CJCJJJC=CCCJJJC-(CCCJCJC-1) to CCCJJJC:CCJCCCC(CJCJJJC,0)=CJCJJJC:next:Application.Lock():Application(CCCJJCC) = CCJCCCC:Application.UnLock() else CCCJJJC=Ubound(CCJCCCC) End If:End Sub:::::Private Function CJCJCJJJ(CCCCCCC):dim CJCJJJC,CCCCJJJ:CJCJCJJJ=0:CCCCJJJ=CStr(CCCCCCC):if CCCCJJJ<>"0" then for CJCJJJC=1 to CCCJJJC:If CStr(CCJCCCC(CJCJJJC, 0))=CCCCJJJ Then CJCJCJJJ = CJCJJJC:Exit For End If:Next end if:End Function:Public Function CJCJCJJC(CCCCCCC):if Cstr(CCCCCCC)="0" then CJCJCJJC=CJCCJJCJ("栴@") else Dim CJCJJJC,CCCJCCJ:CJCJJJC=CJCJCJJJ(CCCCCCC):if CJCJJJC>0 then CJCJCJJC=CCJCCCC(CJCJJJC,2):if CJCJCJJC="" then set CCCJCCJ=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCCJJCJ & CJCCJJCJ(" ,H96C6 ,:5l") & CCCCCCC):if CCCJCCJ.eof then Call RedirectMessage(CJCCJJCJ("xs（,") & CCCCCCC & CJCCJJCJ("）,朥@批@别@")) CJCJCJJC=CCCJCCJ(1):Call UpdateCache(CCCCCCC,CCCJCCJ(0),CJCJCJJC,CCCJCCJ(2),CCCJCCJ(3)):CCCJCCJ.Close: Set CCCJCCJ = Nothing end if else set CCCJCCJ=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCCJJCJ & CJCCJJCJ(" ,H96C6 ,:5l") & CCCCCCC):if CCCJCCJ.eof then Call RedirectMessage(CJCCJJCJ("xs（,") & CCCCCCC & CJCCJJCJ("）,朥@批@别@")) CJCJCJJC=CCCJCCJ(1):Call UpdateCache(CCCCCCC,CCCJCCJ(0),CJCJCJJC,CCCJCCJ(2),CCCJCCJ(3)):CCCJCCJ.Close: Set CCCJCCJ = Nothing end if end if:End Function:::Public Function CJCJCJCJ(CCCCCCC):Dim CJCJJJC,CCCCJJC:CJCJJJC=CJCJCJJJ(CCCCCCC):if CJCJJJC=0 then CCCCJJC=CJCJCJCC(CCCCCCC) else CCCCJJC=CCJCCCC(CJCJJJC,3):if isnull(CCCCJJC) or CCCCJJC="" then CCCCJJC=CJCJCJCC(CCCCCCC) elseif Mid(CCCCJJC,instrrev(CCCCJJC,CJCCJJCJ("["))+1)<>CStr(CCCCCCC) then CCCCJJC=CJCJCJCC(CCCCCCC) elseif Left(CCCCJJC,1)=CJCCJJCJ("[") then CCCCJJC=CJCJCJCC(CCCCCCC) end if end if:CJCJCJCJ=CCCCJJC:End Function:Private Function CJCJCJCC(CCCCCCC):dim CCCCJJJ:CCCCJJJ=CStr(CCCCCCC):if CCCCJJJ="0" then CJCJCJCC="" else dim CCCJCCJ:set CCCJCCJ=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCCJJCJ & CJCCJJCJ(" ,H96C6 ,:5l") & CCCCCCC):if CCCJCCJ.eof then Call UpdateCache(CCCCCCC,"","","",""):Call RedirectMessage(CJCCJJCJ("顴@盩@（,xs：,") & CCCCCCC & CJCCJJCJ("）,丈@孓@圣@，,诲@患@迏@囙@吉@釈@斫@擈@佗@。,")) else if CCCJCCJ(0)=0 then CJCJCJCC="0," & CCCCCCC else CJCJCJCC=CJCJCJCJ(CCCJCCJ(0)) & CJCCJJCJ("[") & CCCCCCC end if:if CCCJCCJ(2)<>CJCJCJCC then CCCJJC.execute CJCCJJCJ("FA52E6 ,") & CCCJJCJ & CJCCJJCJ(" ,D6E ,A2E9lV") & CJCJCJCC & CJCCJJCJ("V ,H96C6 ,:5l") & CCCCCCC else CJCJCJCC=CCCJCCJ(2) end if end if:Call UpdateCache(CCCCCCC,CCCJCCJ(0),CCCJCCJ(1),CJCJCJCC,CCCJCCJ(3)):CCCJCCJ.Close: Set CCCJCCJ = Nothing end if:End Function::Public Function CJCJCCJJ(CCCCCCC):CJCJCCJJ = Mid(CJCJCJCJ(CCCCCCC), 3):End Function:Public Function CJCJCCJC(CCCCCCC):Dim CJCJJJC, CJCJCCJ, CCCCJCJ,Str, CCCCJJC, CCJCJJJ, CJCJJCJ():CCCCJJC = CJCJCCJJ(CCCCCCC):CCCCJJC = Split(CCCCJJC, CJCCJJCJ("[")):for CJCJJJC=0 to Ubound(CCCCJJC):CCCCJCJ=CCCCJJC(CJCJJJC):str=str & CJCCJJCJ("M") & CCCCJCJ & CJCCJJCJ("M") & CJCJCJJC(CCCCJCJ):next:if str<>"" then str=Mid(str,2) CJCJCCJC=str:End Function:::::::::Public Function Sql_GetChildren(CCCCCCC):dim CCCCJJC:CCCCJJC=CJCJCJCJ(CCCCCCC):Sql_GetChildren = CCCJJCJ & CJCCJJCJ("0A2E9ZV[V ,=:<6 ,V") & CCCCJJC & CJCCJJCJ("[TV") End Function:::Public Function GetPositionStr_From(CCCCCCC, CJCCJJJJ):if isnull(CCCCCCC) or isnull(CJCCJJJJ) then GetPositionStr_From=CJCCJJCJ(",厽@敫@锔@诪@."):exit function end if:Dim Str, CJCJJJC, CJCJJCJ, CCJCJJJ, CCCCJCC:CJCCJJJJ = CStr(CJCCJJJJ):If CJCCJJJJ = "0" or CJCCJJJJ = CStr(CCCCCCC) Then Str = CJCJCJJC(CCCCCCC) Else CJCJJCJ = Split(CJCJCCJC(CCCCCCC), CJCCJJCJ("M")):CCJCJJJ = UBound(CJCJJCJ):CCCCJCC = False:For CJCJJJC = 0 To CCJCJJJ Step 2:If CJCJJCJ(CJCJJJC) = CJCCJJJJ And Not CCCCJCC Then CCCCJCC = True If CCCCJCC Then If Str <> "" Then Str = Str & CJCCJJCJ("→,") Str = Str & CJCJJCJ(CJCJJJC + 1) End If:Next End If:str=Mid(str,instr(str,CJCCJJCJ("→,"))+1):GetPositionStr_From = Str:End Function:::::::Public Sub ClearCache():Application.Contents.Remove CCCJJCC End Sub:Public Sub UpdateCache(CCCCCCC,CCCCJCJ,CCJJJJJC,CCCCJJC,CCJJJJCJ):dim CJCJJJC,CJCJCCJ:CCCCCCC=CLng(CCCCCCC):CJCJJJC=CJCJCJJJ(CCCCCCC):if CCCCJCJ="" and CCJJJJJC="" and CCCCJJC="" and CCJJJJCJ="" then if CJCJJJC>0 then for CJCJCCJ=1 to 4:CCJCCCC(CJCJJJC,CJCJCCJ)=Null:next end if else if CJCJJJC=0 then for CJCJCCJ=1 to CCCJJJC:if CCJCCCC(CJCJCCJ,1) & ""="" then CJCJJJC=CJCJCCJ:exit for end if:next end if:if CJCJJJC=0 then Call ClearCache else CCJCCCC(CJCJJJC,0)=CLng(CCCCCCC):if CCCCJCJ<>"" then CCJCCCC(CJCJJJC,1)=CLng(CCCCJCJ) if CCJJJJJC<>"" then CCJCCCC(CJCJJJC,2)=CCJJJJJC if CCCCJJC<>"" then CCJCCCC(CJCJJJC,3)=CCCCJJC if CCJJJJCJ<>"" then CCJCCCC(CJCJJJC,4)=CLng(CCJJJJCJ) end if end if:if CJCJJJC>0 then Application.Lock():Application(CCCJJCC) = CCJCCCC:Application.UnLock() end if:End Sub:Private Sub Debug(CJJJCCJC):Call ConnClose:Response.Write CJJJCCJC:Response.End:End Sub:Private Function CJJCCJCC():CJJCCJCC=CJCCJJJC+1:End Function:Private Function CJCCJJJC():dim CJCCCCC:set CJCCCCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,") & CCCJJCJ & CJCCJJCJ(" ,@C56C ,3J ,:5 ,56D4")):CJCCJJJC=CJCCCCC(0):CJCCCCC.Close: Set CJCCCCC = Nothing:End Function:Private Sub Class_Terminate():End Sub:End Class::dim CJCJJCC:CCCCJC=Request.ServerVariables(CJCCJJCJ("!p%w0x}u~")):if instr(CCCCJC,CJCCJJCJ("^D49@@=^25>:?^"))>0 then Call CheckLogined:if not CJJJCCC and not CJJCCCJ then Call RedirectMessage(CJCCJJCJ("寴@丈@赲@，,患@沜@朄@迖@兠@诠@顰@靝@癿@朾@陋@。,")) CJCJJCC=CJJJCJJ elseif instr(CCCCJC,CJCCJJCJ("^>^D49@@=^DEF56?E^"))>0 or instr(CCCCJC,CJCCJJCJ("^DEF56?E^"))>0 then Call CheckLogined:CJCJJCC=CJJJCJJ elseif instr(CCCCJC,CJCCJJCJ("^D49@@="))>0 then CJCJJCC=Request.QueryString(CJCCJJCJ("D49@@=")):if not CJJCCJCJ(CJCJJCC) then CJCJJCC=Request.QueryString(CJCCJJCJ("F")) if not CJJCCJCJ(CJCJJCC) then CJCJJCC=Request.QueryString(CJCCJJCJ("D4")) if not CJJCCJCJ(CJCJJCC) then Call RedirectMessage(CJCCJJCJ("糶@绚@厽@敫@W$49@@=X忀@顶@丵@敫@孒@。,")) CJCJJCC=csng(CJCJJCC) end if:if CJCJJCC=0 then Call RedirectMessage(CJCCJJCJ("糶@绚@厽@敫@W$49@@=X锔@诪@W_X。,")) Dim CCCCCJJ:Call SetConfig:Sub SetConfig():dim CJCJJCJ,CJCCCCC:CCCCJC=CJCCJJCJ("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")):CJCJJCJ(3)=CJCCCCC(CJCCJJCJ("4FDE@>8C@FA")) & "":CJCJJCJ(4)=CJCCCCC(CJCCJJCJ("D:5632C0@E96C")) & "":CJCJJCJ(5)=IIf(isnull(CJCCCCC(CJCCJJCJ("E6DEC6DF=EG:6H"))),0,CJCCCCC(CJCCJJCJ("E6DEC6DF=EG:6H"))):CJCJJCJ(6)=CJCCCCC(CJCCJJCJ("K:IF?E:>6")):CJCJJCJ(7)=CJCCCCC(CJCCJJCJ("766")):CJCJJCJ(8)=CJCCCCC(CJCCJJCJ("C6E6DE52J")):CJCJJCJ(9)=CJCCCCC(CJCCJJCJ("6IA:C652E6")):CJCJJCJ(10)=CJCCCCC(CJCCJJCJ("E:E=6")):CJCJJCJ(11)=CJCCCCC(CJCCJJCJ(":?EC@")) & "":CJCJJCJ(12)=CJCCCCC(CJCCJJCJ("A:4EFC6")) & "":CJCJJCJ(13)=CJCCCCC(CJCCJJCJ("72>:=J")):CJCJJCJ(14)=CJCCCCC(CJCCJJCJ("4@AJC:89E")) & "":CJCJJCJ(15)=IIf(isnull(CJCCCCC(CJCCJJCJ("D6>6DE6C0DE2CE052E6"))),CJCCJJCJ("`h__\`\`"),CJCCCCC(CJCCJJCJ("D6>6DE6C0DE2CE052E6"))):CJCJJCJ(16)=IIf(isnull(CJCCCCC(CJCCJJCJ("K:IF?0E:>6D09:89=:89E"))),0,CJCCCCC(CJCCJJCJ("K:IF?0E:>6D09:89=:89E"))):CJCJJCJ(17)=CJCCCCC(CJCCJJCJ("4@?E24E")) & "":CJCJJCJ(18)=CJCCCCC(CJCCJJCJ("D2?5E23=6")):CJCJJCJ(19)=CJCCCCC(CJCCJJCJ("4C:D:D")):CJCJJCJ(20)=CJCCCCC(CJCCJJCJ("JJ52E6")):CJCJJCJ(21)=CJCCCCC(CJCCJJCJ("BB")):CJCJJCJ(22)=CJCCCCC(CJCCJJCJ("JFJF60D>D0EA=")) & "":CJCJJCJ(23)=CJCCCCC(CJCCJJCJ("JFJF60E6DE0=3")) & "":CJCJJCJ(25)=CJCCCCC(CJCCJJCJ("6IA6CE")):CJCJJCJ(26)=CJCCCCC(CJCCJJCJ(">@5:?7@")):CJCJJCJ(27)=CJCCCCC(CJCCJJCJ("9@>6A286E@AA:4EFC6")) & "":CJCJJCJ(28)=CJCCCCC(CJCCJJCJ("4C:D:D=3")):CJCJJCJ(29)=IIf(CJCCCCC(CJCCJJCJ("4C:D:D@=5")),False,True):CJCJJCJ(30)=CJCCCCC(CJCCJJCJ("8C@FA8F:52?46")):CJCJJCJ(31)=CJCCCCC(CJCCJJCJ("3:@7665324<")):CJCJJCJ(32)=CJCCCCC(CJCCJJCJ("<6JDEC")):CJCJJCJ(33)=CJCCCCC(CJCCJJCJ("=@8@")) & "":CJCJJCJ(34)=CJCCCCC(CJCCJJCJ("K:46")):CJCJJCJ(35)=IIf(CJCCCCC(CJCCJJCJ(":D?6H")),True,False):CJCJJCJ(36)=121:CJCJJCJ(37)=111:CJCJJCJ(38)=160:CJCJJCJ(39)=CJCCCCC(CJCCJJCJ("8F6DE3@@<")):CJCJJCJ(40)=CJCCCCC(CJCCJJCJ("75D")):CJCJJCJ(42)=CJCCCCC(CJCCJJCJ("9@>6=@8:?")):CJCJJCJ(43)=CJCCCCC(CJCCJJCJ("K:IF?0?6657665324<")):CJCJJCJ(44)=CJCCCCC(CJCCJJCJ("K:IF?0E:>6D0=:>:E")):CJCJJCJ(45)=CJCCCCC(CJCCJJCJ("4@>A=6E60:?7@")):CJCJJCJ(46)=CJCCCCC(CJCCJJCJ("E6DE:?EC@")) & "":CJCJJCJ(47)=IIf(isnull(CJCCCCC(CJCCJJCJ("JFJF60367@C60E:>6"))),0,CJCCCCC(CJCCJJCJ("JFJF60367@C60E:>6"))):CJCJJCJ(49)=CJCCCCC(CJCCJJCJ("D>D0C646:G6C")):CJCJJCJ(50)=CJCCCCC(CJCCJJCJ("D>D0D:8?")) & "":CJCJJCJ(52)=CJCCCCC(CJCCJJCJ("JFJF602CC2?86")):CJCJJCJ(53)=IIf(isnull(CJCCCCC(CJCCJJCJ("DEF56?E0BF6DE:@?04@F?E"))),0,CJCCCCC(CJCCJJCJ("DEF56?E0BF6DE:@?04@F?E"))):CJCJJCJ(54)=CJCCCCC(CJCCJJCJ("9:560=30@FE@7286")):CJCJJCJ(55)=CJCCCCC(CJCCJJCJ("JFJF60E6DE052JD")):CJCJJCJ(56)=CJCCCCC(CJCCJJCJ("JFJF60H66<0=:>:E")):CJCJJCJ(57)=CJCCCCC(CJCCJJCJ("JFJF604964<65")):CJCJJCJ(58)=CJCCCCC(CJCCJJCJ("K:IF?0?6657665324<0?6IE")):CJCJJCJ(59)=CJCCCCC(CJCCJJCJ("49642E6"),CJCCJJCJ("}F>36C"),CJCCJJCJ("%62496C"),CJCCJJCJ("!2C6?E")):select case CCCCCJJ(1):case 1,2 : CCCCCCJ=Array(CJCCJJCJ("孡@栜@"),CJCCJJCJ("孡@甚@"),CJCCJJCJ("珨@红@"),CJCCJJCJ("幯@红@"),CJCCJJCJ("吇@孡@"),CJCCJJCJ("孡@史@"),CJCCJJCJ("敔@布@"),CJCCJJCJ("宱@镺@")):case 3,16 : CCCCCCJ=Array(CJCCJJCJ("孡@栜@"),CJCCJJCJ("孡@甚@"),CJCCJJCJ("陝@糶@"),CJCCJJCJ("幯@红@"),CJCCJJCJ("吇@孡@"),CJCCJJCJ("孡@史@"),CJCCJJCJ("敔@布@"),CJCCJJCJ("宱@镺@")):case 4 : CCCCCCJ=Array(CJCCJJCJ("匶@陝@"),CJCCJJCJ("杠@论@耀@"),CJCCJJCJ("卐@佈@"),CJCCJJCJ("幯@仸@"),CJCCJJCJ("吇@了@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("匶@甚@"),CJCCJJCJ("宱@屙@")):case 5 : CCCCCCJ=Array(CJCCJJCJ("卐@佈@"),CJCCJJCJ("呓@巠@"),CJCCJJCJ("郣@闣@"),CJCCJJCJ("幯@仸@"),CJCCJJCJ("吇@了@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("呓@巠@"),CJCCJJCJ("宱@屙@")):case 6 : CCCCCCJ=Array(CJCCJJCJ("卐@佈@"),CJCCJJCJ("杠@论@耀@"),CJCCJJCJ("线@刦@"),CJCCJJCJ("幯@仸@"),CJCCJJCJ("吇@了@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("咣@话@布@"),CJCCJJCJ("宱@屙@")):case 7 : CCCCCCJ=Array(CJCCJJCJ("卐@佈@"),CJCCJJCJ("宓@兰@"),CJCCJJCJ("郣@闣@"),CJCCJJCJ("幯@仸@"),CJCCJJCJ("戓@叆@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("咣@话@布@"),CJCCJJCJ("宱@屙@")):case 8 : CCCCCCJ=Array(CJCCJJCJ("卐@佈@"),CJCCJJCJ("杠@论@耀@"),CJCCJJCJ("卐@佈@"),CJCCJJCJ("兠@聇@幯@仸@"),CJCCJJCJ("吇@了@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("咣@话@布@"),CJCCJJCJ("酈@偱@")):case 9 : CCCCCCJ=Array(CJCCJJCJ("卐@佈@"),CJCCJJCJ("敔@布@"),CJCCJJCJ("卐@佈@"),CJCCJJCJ("幯@仸@"),CJCCJJCJ("吇@了@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("咣@话@布@"),CJCCJJCJ("酈@偱@")):case 10 : CCCCCCJ=Array(CJCCJJCJ("卐@佈@"),CJCCJJCJ("氌@譡@"),CJCCJJCJ("郣@闣@"),CJCCJJCJ("兠@譡@幯@仸@"),CJCCJJCJ("吇@了@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("咣@话@布@"),CJCCJJCJ("宱@屙@")):case 11 : CCCCCCJ=Array(CJCCJJCJ("卐@佈@"),CJCCJJCJ("內@劜@呓@"),CJCCJJCJ("郣@闣@"),CJCCJJCJ("幯@仸@"),CJCCJJCJ("吇@了@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("咣@话@布@"),CJCCJJCJ("宱@屙@")):case 12 : CCCCCCJ=Array(CJCCJJCJ("卐@佈@"),CJCCJJCJ("幭@譡@"),CJCCJJCJ("卐@佈@"),CJCCJJCJ("兠@譡@幯@仸@"),CJCCJJCJ("吇@了@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("咣@话@布@"),CJCCJJCJ("宱@屙@")):case 13 : CCCCCCJ=Array(CJCCJJCJ("卐@佈@"),CJCCJJCJ("孡@呓@"),CJCCJJCJ("卐@佈@"),CJCCJJCJ("幯@仸@"),CJCCJJCJ("戓@叆@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("敔@呓@"),CJCCJJCJ("宱@屙@")):case 14 : CCCCCCJ=Array(CJCCJJCJ("月@劜@炴@"),CJCCJJCJ("局@氌@"),CJCCJJCJ("线@刦@"),CJCCJJCJ("幯@仸@"),CJCCJJCJ("邶@采@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("咣@话@布@"),CJCCJJCJ("宱@屙@")):case 15 : CCCCCCJ=Array(CJCCJJCJ("卐@佈@"),CJCCJJCJ("盌@独@氌@譡@"),CJCCJJCJ("卐@佈@"),CJCCJJCJ("兠@譡@幯@仸@"),CJCCJJCJ("吇@了@"),CJCCJJCJ("缑@史@"),CJCCJJCJ("咣@话@布@"),CJCCJJCJ("宱@屙@")):case else : CCCCCCJ=CCCCCJC end select:for CJCJJJC=0 to Ubound(CJCJJCJ):CJCJJCJ(CJCJJJC,0)=CCCCCJC(CJCJJJC):CJCJJCJ(CJCJJJC,1)=CCCCCCJ(CJCJJJC):next:for CJCJJJC=0 to Ubound(CJCJJCJ):if CJCJJCJ(CJCJJJC,0)=CCJCJCC then CJJCCCCJ=CJCJJCJ(CJCJJJC,1):exit for end if:next:End Function::if CCCCCJJ(7)<3 then Call RedirectMessage(CJCCJJCJ("寴@丈@赲@，,患@癿@糶@绚@丈@攪@拼@诠@劚@胸@！,")) dim CCCCCCC,CJJJJJJJ,CJJJJJJC,CJJJJJCJ,CJJJJJCC,CJJJJCJJ,CJJJJCJC,CJJJJCCJ,CJJJJCCC,CCJCCJJ,str:CCCCCCC=Request.QueryString(CJCCJJCJ(":5")):CJJJJJJJ=Request.QueryString(CJCCJJCJ("24E")):CJJJJJCJ=CJJCJCJC(Request.QueryString(CJCCJJCJ("JJ52E6"))):CJJJJJJC=Request.QueryString(CJCCJJCJ("E:>6:5")):CJJJJCJC=CJJCJCJC(Request.QueryString(CJCCJJCJ(">@3:=6"))):if (CJJJJJJJ=CJCCJJCJ("562=") or CJJJJJJJ=CJCCJJCJ("C@@>")) and not CJJCCJCJ(CCCCCCC) then Call RedirectMessage(CJCCJJCJ("寴@丈@赲@，,糶@绚@厽@敫@锔@诪@！,")) dim CCJCCCC:set CCJCCCC=new jtree:CCJCCCC.table=CJCCJJCJ(">6>36C0EJA6"):if CJJJJJJJ=CJCCJJCJ("C@@>") then CCCJJC.execute CJCCJJCJ("FA52E6 ,KI ,D6E ,C@@>lV") & CJJCJCJC(Request.QueryString(CJCCJJCJ("C@@>"))) & CJCCJJCJ("V ,H96C6 ,:5l") & CCCCCCC Call ConnClose:response.end elseif CJJJJJJJ=CJCCJJCJ("56=") then if CJJCJCJJ(91) then CCCCJC=CJCCJJCJ("56=6E6 ,7C@> ,KI ,H96C6 ,:5l") & CCCCCCC else CCCCJC=CJCCJJCJ("56=6E6 ,7C@> ,KI ,H96C6 ,:5l") & CCCCCCC & CJCCJJCJ(" ,2?5 ,4@?DF=E2?El") & CCCCCJ end if:if CJJCJCCC(CJJJJCJC) then set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,4@F?EW:5X ,7C@> ,>@3:=60D>D0E:>:?8 ,H96C6 ,>@3:=6lV") & CJJJJCJC & CJCCJJCJ("V")) if CCCJCC(0)>0 then CCCCJC=CCCCJC & CJCCJJCJ("j56=6E6 ,7C@> ,>@3:=60D>D0E:>:?8 ,H96C6 ,>@3:=6lV") & CJJJJCJC & CJCCJJCJ("V") end if end if:CCCJJC.execute CCCCJC:Call InsertLog(3,CJCCJJCJ("创@陟@顿@纡@（,") & CJJJJCJC & CJCCJJCJ("）,")):Call ConnClose:response.end elseif CJJJJJJJ=CJCCJJCJ("56=03FKJ") then if CJJCJCJJ(91) then CCCCJC=CJCCJJCJ("56=6E6 ,7C@> ,KI ,H96C6 ,:5l") & CCCCCCC else CCCCJC=CJCCJJCJ("56=6E6 ,7C@> ,KI ,H96C6 ,:5l") & CCCCCCC & CJCCJJCJ(" ,2?5 ,4@?DF=E2?El") & CCCCCJ end if:if CJJCJCCC(CJJJJCJC) then set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,4@F?EW:5X ,7C@> ,>@3:=60D>D0E:>:?8 ,H96C6 ,>@3:=6lV") & CJJJJCJC & CJCCJJCJ("V")) if CCCJCC(0)>0 then CCCCJC=CCCCJC & CJCCJJCJ("j56=6E6 ,7C@> ,>@3:=60D>D0E:>:?8 ,H96C6 ,>@3:=6lV") & CJJJJCJC & CJCCJJCJ("V") end if end if:set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,Y ,7C@> ,KI03FDJ ,H96C6 ,KI0E:>60:5l") & CJJJJJJC & CJCCJJCJ(" ,2?5 ,JJ52E6lV") & CJJJJJCJ & CJCCJJCJ("V")) if CCCJCC.eof then CCCCJC=CCCCJC & CJCCJJCJ("j:?D6CE ,:?E@ ,KI03FDJWJJ52E6[KI0E:>60:5X ,G2=F6DWV") & CJJJJJCJ & CJCCJJCJ("V[") & CJJJJJJC & CJCCJJCJ("X") CCCJJC.execute CCCCJC:Call InsertLog(3,CJCCJJCJ("创@陟@顿@纡@（,") & CJJJJCJC & CJCCJJCJ("）,")):Call ConnClose:response.end elseif CJJJJJJJ=CJCCJJCJ("3FDJ") and CJJCJCJJ(86) then set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,Y ,7C@> ,KI03FDJ ,H96C6 ,KI0E:>60:5l") & CJJJJJJC & CJCCJJCJ(" ,2?5 ,JJ52E6lV") & CJJJJJCJ & CJCCJJCJ("V")) if CCCJCC.eof then CCCJJC.execute CJCCJJCJ(":?D6CE ,:?E@ ,KI03FDJWJJ52E6[KI0E:>60:5X ,G2=F6DWV") & CJJJJJCJ & CJCCJJCJ("V[") & CJJJJJJC & CJCCJJCJ("X") Call ConnClose:response.End elseif CJJJJJJJ=CJCCJJCJ("42?46=3FDJ") and CJJCJCJJ(86) then CCCJJC.execute CJCCJJCJ("56=6E6 ,7C@> ,KI03FDJ ,H96C6 ,JJ52E6lV") & CJJJJJCJ & CJCCJJCJ("V ,2?5 ,KI0E:>60:5l") & CJJJJJJC Call ConnClose:response.End elseif CJJJJJJJ=CJCCJJCJ("86E=2DE") and CJJCJCJJ(1) then CJJJJJCC=CJJCJCJC(Request.QueryString(CJCCJJCJ("DEF56?E?F>"))):set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,G0>6>36C ,H96C6 ,") & CCJCCCC.Sql_GetChildren(CJJJJJC) & CJCCJJCJ(" ,2?5 ,?F>36ClV") & CJJJJJCC & CJCCJJCJ("V")) if CCCJCC.eof then Response.Write CJCCJJCJ("?@E6I:DE") else set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,BF6DE:@?[C62=?2>6[>@3:=6 ,7C@> ,G0KI ,H96C6 ,>6>36Cl") & CCCJCC(0) & CJCCJJCJ(" ,@C56C ,3J ,:5 ,56D4")):if CCCJCC.eof then Response.Write CJCCJJCJ("3=2?<") else response.charset=CJCCJJCJ("FE7\g"):Response.Write CCCJCC(0) & CJCCJJCJ("M") & CCCJCC(1) & CJCCJJCJ("M") & CCCJCC(2) end if end if:Call ConnClose:response.end elseif CJJJJJJJ=CJCCJJCJ(":?7@") then CJJJJJCC=CJJCJCJC(Request.QueryString(CJCCJJCJ("DEF56?E?F>"))):set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,?F>36C[C62=?2>6[D6I?2>6[286[EJA6[8C256[4FDE@>8C@FA[>@3:=6 ,7C@> ,G0>6>36C ,H96C6 ,") & CCJCCCC.Sql_GetChildren(CJJJJJC) & CJCCJJCJ(" ,2?5 ,?F>36ClV") & CJJJJJCC & CJCCJJCJ("V")) if CCCJCC.eof then Response.Write CJCCJJCJ("?@E6I:DE") else Response.Write CJJCCCCJ(CJCCJJCJ("}F>36C")) & CJCCJJCJ("：,") & CCCJCC(0) & CJCCJJCJ("，,姎@合@：,") & CCCJCC(1) & CJCCJJCJ("，,怢@刦@：,") & CCCJCC(2) & CJCCJJCJ("，,幯@齿@：,") & CCCJCC(3) & CJCCJJCJ("，,") & CJJCCCCJ(CJCCJJCJ("s6AE")) & CJCCJJCJ("：,") & CCJCCCC.GetPositionStr_From(CCCJCC(4),CJCJJCC) & CJCCJJCJ("，,") & CJJCCCCJ(CJCCJJCJ("vC256")) & CJCCJJCJ("：,") & CJCJJCJC(CJCCJJCJ(">6>36C08C256"),CJCJJCC,CCCJCC(5)) & CJCCJJCJ("，,") & CCCCCJJ(3) & CJCCJJCJ("：,") & CJCJJCJC(CJCCJJCJ(">6>36C04FDE@>8C@FA"),CJCJJCC,CCCJCC(6)) & CJCCJJCJ("M") & CCCJCC(1) & CJCCJJCJ("M") & CCCJCC(7) end if:Call ConnClose:response.end elseif CJJJJJJJ=CJCCJJCJ("6IA@CE") then CCJCCJJ=CJCCJJCJ("["):CJJJJCCC=Request.QueryString(CJCCJJCJ("52E6")):CJJJJCCC=replace(CJJJJCCC,CJCCJJCJ("^"),CJCCJJCJ("\")):CJJJJCCC=CJCJJJCC(CJJJJCCC,0):str=CJCCJJCJ("咣@话@旱@闯@[咣@话@布@[") & CJJCCCCJ(CJCCJJCJ("}F>36C")) & CJCCJJCJ("[姎@合@[怢@刦@[") & CJJCCCCJ(CJCCJJCJ("s6AE")) & CJCCJJCJ("[") & CJJCCCCJ(CJCCJJCJ("vC256")) & CJCCJJCJ("[") & CCCCCJJ(3) & CJCCJJCJ("[扆@朵@[昪@吡@斫@杠@论@耀@[笧@一,欜@咣@话@无@朚@") & vbcrlf:CCCCJC=CJCCJJCJ("D6=64E ,?F>36C[C62=?2>6[D6I[>6>36C0EJA6[8C256[4FDE@>8C@FA[>@3:=6[>6>36C[JJE:>6[4@?DF=E2?E?2>6 ,7C@> ,G0KI ,H96C6 ,DE2EFDmlb ,2?5 ,>6>36C0EJA60E@Al") & CJCJJCC & CJCCJJCJ(" ,2?5 ,JJ52E6lV") & CJJJJCCC & CJCCJJCJ("V ,@C56C ,3J ,JJE:>6[4@?DF=E2?E") set CCCJCC=CCCJJC.execute(CCCCJC):while not CCCJCC.eof:str=str & CCCJCC(8) & CCJCCJJ & CCCJCC(9) & CCJCCJJ & CJCCJJCJ("lQ") & CCCJCC(0) & CJCCJJCJ("Q[") & CCCJCC(1) & CCJCCJJ & IIf(CCCJCC(2),CJCCJJCJ("甲@"),CJCCJJCJ("奮@")) & CCJCCJJ & CCJCCCC.GetPositionStr_From(CCCJCC(3),CJCJJCC) & CCJCCJJ & CJCJJCJC(CJCCJJCJ(">6>36C08C256"),CJCJJCC,CCCJCC(4)) & CCJCCJJ & CJCJJCJC(CJCCJJCJ(">6>36C04FDE@>8C@FA"),CJCJJCC,CCCJCC(5)) & CCJCCJJ & CCCJCC(6) & CCJCCJJ:set CCCCJJ=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,KIE:>6 ,7C@> ,KI ,H96C6 ,>6>36Cl") & CCCJCC(7) & CJCCJJCJ(" ,2?5 ,KIE:>6kV") & CJCJJJCC(CJJJJCCC,0) & CJCCJJCJ("V ,@C56C ,3J ,KIE:>6")) if CCCCJJ.eof then str=str & CJCCJJCJ("昪@") else str=str & CJCCJJCJ("吡@") & CCJCCJJ & CCCCJJ(0) end if:str=str & vbcrlf:CCCJCC.movenext:wend:Call ConnClose:Call StringDown(CJCCJJCJ("*FJF6\") & CJCJJJCC(CJJJJCCC,1) & CJCCJJCJ("]4DG"),str):response.end elseif CJJJJJJJ=CJCCJJCJ("DE2E") then CJJJJCCC=Request.QueryString(CJCCJJCJ("52E6")):CJJJJCCC=replace(CJJJJCCC,CJCCJJCJ("^"),CJCCJJCJ("\")):CJJJJCCC=CJCJJJCC(CJJJJCCC,0):CCCCJC=CJCCJJCJ("D6=64E ,4@F?EW:5X ,7C@> ,G0KI ,H96C6 ,>6>36C0EJA60E@Al") & CJCJJCC & CJCCJJCJ(" ,2?5 ,52E6E:>6mlV") & CJJJJCCC & CJCCJJCJ("V ,2?5 ,52E6E:>6kV") & cdate(CJJJJCCC)+1 & CJCCJJCJ("V") set CCCJCC=CCCJJC.execute(CCCCJC):str=CJCCJJCJ("顿@纡@亵@欜@") & vbcrlf & CCCJCC(0):Call ConnClose:Call StringDown(CJCCJJCJ("*FJF6\") & CJCJJJCC(CJJJJCCC,1) & CJCCJJCJ("]4DG"),str):Response.End end if:If Request.ServerVariables(CJCCJJCJ("#t""&t$%0|t%w~s"))=CJCCJJCJ("!~$%") then dim CJJJCJJJ,CJJJCJJC,CJJJCJCJ,status,CJJJCCJJ,CJJJCCJC,CJJJCCCJ,CJJJCCCC,CJCJJCJ,CJJCJJJJ:CJJJJCCJ=Request.Form(CJCCJJCJ("r@?DF=E2?E")):CJJJJJCJ=CJJCJCJC(Request.Form(CJCCJJCJ("JJ52E6"))):CJJJCJJJ=CJJCJCJC(Request.Form(CJCCJJCJ("JJE:>6"))):CJJJCJJC=CJJCJCJC(Request.Form(CJCCJJCJ("C6A=J"))):CJJJJCJC=CJJCJCJC(Request.Form(CJCCJJCJ(">@3:=6"))):CJJJCJCJ=replace(CJJCJCJC(Request.Form(CJCCJJCJ("D6?5E:>6"))),CJCCJJCJ("%"),CJCCJJCJ(" ,")):status=Request.Form(CJCCJJCJ("DE2EFD")):CJJJCCJJ=Request.Form(CJCCJJCJ("DEF56?E:5")):CJJJCCCC=Request.Form(CJCCJJCJ("H2J")):if CJJJJJJJ=CJCCJJCJ("255") then set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,KI ,H96C6 ,DE2EFDlb ,2?5 ,4@?DF=E2?El") & CJJJJCCJ & CJCCJJCJ(" ,2?5 ,JJ52E6lV") & CJJJJJCJ & CJCCJJCJ("V ,2?5 ,JJE:>6lV") & CJJJCJJJ & CJCCJJCJ("V")) if not CCCJCC.eof then CJJJCCJC=CJCCJJCJ("诠@咣@话@布@咇@旱@殰@巭@绊@袦@顿@纡@（,") & CCCJCC(0) & CJCCJJCJ("）,") else CJJJJJCC=CJJCJCJC(Request.Form(CJCCJJCJ("DEF56?E?F>"))):CCCCJC=CJCCJJCJ("D6=64E ,E@A ,` ,:5[C62=?2>6 ,7C@> ,G0>6>36C ,H96C6 ,") & CCJCCCC.sql_GetChildren(CJJJJJC) & CJCCJJCJ(" ,2?5 ,?F>36ClV") & CJJJJJCC & CJCCJJCJ("V") set CCCJCC=CCCJJC.execute(CCCCJC):if CCCJCC.eof then CJJJCCJC=CJCCJJCJ("寴@丈@赲@，,患@辎@兠@癿@孡@史@丈@孓@圣@！,") else CJJJCCJJ=CCCJCC(0):CJJJJCJJ=CCCJCC(1):CCCCJC=CJCCJJCJ(":?D6CE ,:?E@ ,KIW>6>36C[4@?DF=E2?E[JJ52E6[JJE:>6[KIE:>6[BF6DE:@?[H2J[DE2EFD[C@@>[C6A=J[52E6E:>6X ,@FEAFE ,:?D6CE65]:5 ,G2=F6DW") & CJJJCCJJ & CJCCJJCJ("[") & CJJJJCCJ & CJCCJJCJ("[V") & CJJJJJCJ & CJCCJJCJ("V") & CJCCJJCJ("[V") & CJJJCJJJ & CJCCJJCJ("V") & CJCCJJCJ("[V") & CJJJJJCJ & CJCCJJCJ("V") & CJCCJJCJ("[V") & CJJCJCJC(Request.Form(CJCCJJCJ("BF6DE:@?"))) & CJCCJJCJ("V") & CJCCJJCJ("[") & CJJJCCCC & CJCCJJCJ("[") & status & CJCCJJCJ("[V") & CJJCJCJC(Request.Form(CJCCJJCJ("C@@>"))) & CJCCJJCJ("V") & CJCCJJCJ("[V") & CJJJCJJC & CJCCJJCJ("V") & CJCCJJCJ("[86E52E6WX") & CJCCJJCJ("X") set CCCJCC=CCCJJC.execute(CCCCJC):CCCCCCC=CCCJCC(0):CCCCJC=CJCCJJCJ("FA52E6 ,>6>36C ,D6E ,3:?504@?DF=E2?E0:5l") & CJJJJCCJ:if CJJCJCCC(CJJJJCJC) then CCCCJC=CCCCJC & CJCCJJCJ("[>@3:=6lV") & CJJJJCJC & CJCCJJCJ("V") CCCCJC=CCCCJC & CJCCJJCJ(" ,H96C6 ,:5l") & CJJJCCJJ:if Request.Form(CJCCJJCJ("D6?5D>D"))="1" and CJJCJCCC(CJJJJCJC) then if CJJJCJJC="" then CJJJCCJC=CJCCJJCJ("敫@捩@俘@孓@戋@劚@，,佁@又@馃@俜@恪@冀@宴@丵@穵@，,朥@双@迼@矨@俜@。,") elseif not CCCCCJJ(2) then CJJJCCJC=CJCCJJCJ("敫@捩@俘@孓@戋@劚@，,佁@彎@剈@朥@廻@逕@扆@朵@矨@俜@劚@胸@，,朥@双@迼@矨@俜@。,") else CJJJCJJC=CCCCCJJ(50) & CJJJCJJC:if isdate(CJJJCJCJ) then if cdate(CJJJCJCJ)>Now then Call SMS(CJJJJCJC,CJJJCJJC):CCCCJC=CCCCJC & CJCCJJCJ("j:?D6CE ,:?E@ ,>@3:=60D>D0E:>:?8W>@3:=6[4@?E6?E[52E6E:>6X ,G2=F6DW") & CJCCJJCJ("V") & CJJJJCJC & CJCCJJCJ("V") & CJCCJJCJ("[V") & CJJJCJJC & CJCCJJCJ("V") & CJCCJJCJ("[V") & CJJJCJCJ & CJCCJJCJ("V") & CJCCJJCJ("X") else Call SMS(CJJJJCJC,CJJJCJJC) end if else Call SMS(CJJJJCJC,CJJJCJJC) end if end if end if:if Request.Form(CJCCJJCJ("D6?5D>DE@4@?DF=E2?E"))="1" and CCCCCJJ(2) and status="3" then set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,>@3:=6 ,7C@> ,>6>36C ,H96C6 ,:5l") & CJJJJCCJ):if not CCCJCC.eof then CJJJJCJC=CCCJCC(0):if CJJCJCCC(CJJJJCJC) then CJJJCCCJ=CCCCCJJ(50) & CJCCJJCJ("朄@杠@论@耀@顿@纡@患@，,姎@合@：,") & CJJJJCJJ & CJCCJJCJ("，,咣@话@旱@闯@：,") & CJJJJJCJ & CJCCJJCJ("（,昚@朚@") & split(CJCCJJCJ("无@M一,M亇@M丄@M囖@M亏@M全@"),CJCCJJCJ("M"))(weekday(CJJJJJCJ)-1) & CJCCJJCJ("）,") & CJJJCJJJ & CJCCJJCJ("，,诲@患@凁@旱@迖@衇@徾@琁@咣@话@。,"):Call SMS(CJJJJCJC,CJJJCCCJ) end if end if end if:CCCJJC.execute CCCCJC end if end if:Call ConnClose:response.charset=CJCCJJCJ("FE7\g"):Response.Write CJJJCCJC:response.end elseif CJJJJJJJ=CJCCJJCJ("562=") then dim CJJCJJJC:CJJCJJJC=Request.Form(CJCCJJCJ("3:?504@?DF=E2?E0:5")):CCCCJC=CJCCJJCJ("FA52E6 ,KI ,D6E") & CJCCJJCJ(" ,DE2EFDl") & status & CJCCJJCJ("[C@@>lV") & CJJCJCJC(Request.Form(CJCCJJCJ("C@@>"))) & CJCCJJCJ("V") & CJCCJJCJ("[C6A=JlV") & CJJJCJJC & CJCCJJCJ("V") & CJCCJJCJ(" ,H96C6 ,:5l") & CCCCCCC if CCCCCJJ(40) and status="1" and CJJCJJJC="" and CJJCCJCJ(CJJJCCJJ) then CCCCJC=CCCCJC & CJCCJJCJ("jFA52E6 ,>6>36C ,D6E ,3:?504@?DF=E2?E0:5l?F== ,H96C6 ,:5l") & CJJJCCJJ CCCJJC.execute CCCCJC:if status="1" then Call InsertLog(2,CJCCJJCJ("发@涃@顿@纡@W") & CCCCCCC & CJCCJJCJ("X")) if Request.Form(CJCCJJCJ("D6?5D>D"))="1" and CJJCJCCC(CJJJJCJC) then if CJJJCJJC="" then CJJJCCJC=CJCCJJCJ("敫@捩@俘@孓@戋@劚@，,佁@又@馃@俜@恪@冀@宴@丵@穵@，,朥@双@迼@矨@俜@。,") elseif not CCCCCJJ(2) then CJJJCCJC=CJCCJJCJ("敫@捩@俘@孓@戋@劚@，,佁@彎@剈@朥@廻@逕@扆@朵@矨@俜@劚@胸@，,朥@双@迼@矨@俜@。,") else if status="1" then set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,4@F?EW:5X ,7C@> ,>@3:=60D>D0E:>:?8 ,H96C6 ,>@3:=6lV") & CJJJJCJC & CJCCJJCJ("V")) if CCCJCC(0)>0 then CCCCJC=CJCCJJCJ("56=6E6 ,7C@> ,>@3:=60D>D0E:>:?8 ,H96C6 ,>@3:=6lV") & CJJJJCJC & CJCCJJCJ("V") CCCJJC.execute CCCCJC end if end if:CJJJCJJC=CCCCCJJ(50) & CJJJCJJC:if isdate(CJJJCJCJ) then if cdate(CJJJCJCJ)>Now then Call SMS(CJJJJCJC,CJJJCJJC):CCCCJC=CJCCJJCJ(":?D6CE ,:?E@ ,>@3:=60D>D0E:>:?8W>@3:=6[4@?E6?E[52E6E:>6X ,G2=F6DW") & CJCCJJCJ("V") & CJJJJCJC & CJCCJJCJ("V") & CJCCJJCJ("[V") & CJJJCJJC & CJCCJJCJ("V") & CJCCJJCJ("[V") & CJJJCJCJ & CJCCJJCJ("V") & CJCCJJCJ("X") CCCJJC.execute CCCCJC else Call SMS(CJJJJCJC,CJJJCJJC) end if else Call SMS(CJJJJCJC,CJJJCJJC) end if end if end if:if Request.Form(CJCCJJCJ("D6?5D>DE@4@?DF=E2?E"))="1" and CCCCCJJ(2) and status="3" then set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,>@3:=6 ,7C@> ,>6>36C ,H96C6 ,:5l") & CJJJJCCJ):if not CCCJCC.eof then CJJJJCJC=CCCJCC(0):if CJJCJCCC(CJJJJCJC) then CJJJJCJJ=Request.Form(CJCCJJCJ("DEF56?EC62=?2>6")):CJJJCCCJ=CCCCCJJ(50) & CJCCJJCJ("朄@杠@论@耀@顿@纡@患@，,姎@合@：,") & CJJJJCJJ & CJCCJJCJ("，,咣@话@旱@闯@：,") & CJJJJJCJ & CJCCJJCJ("（,昚@朚@") & split(CJCCJJCJ("无@M一,M亇@M丄@M囖@M亏@M全@"),CJCCJJCJ("M"))(weekday(CJJJJJCJ)-1) & CJCCJJCJ("）,") & CJJJCJJJ & CJCCJJCJ("，,诲@患@凁@旱@迖@衇@徾@琁@咣@话@。,"):Call SMS(CJJJJCJC,CJJJCCCJ) end if end if end if:Call ConnClose:response.charset=CJCCJJCJ("FE7\g"):Response.Write CJJJCCJC:response.end elseif CJJJJJJJ=CJCCJJCJ("2556G6?E") then CCCCJC=CJCCJJCJ(":?D6CE ,:?E@ ,KI0E:>6W:5[4@?DF=E2?E[E9652E6[E:>6`[E:>6a[E6>A[H2JX ,G2=F6DW") & CJJCCJCC(CJCCJJCJ("KI0E:>6")) & CJCCJJCJ("[") & Request.Form(CJCCJJCJ("4@?DF=E2?E")) & CJCCJJCJ("[V") & Request.Form(CJCCJJCJ("E9652E6")) & CJCCJJCJ("V") & CJCCJJCJ("[V") & Request.Form(CJCCJJCJ("E:>6`")) & CJCCJJCJ("V") & CJCCJJCJ("[V") & Request.Form(CJCCJJCJ("E:>6a")) & CJCCJJCJ("V") & CJCCJJCJ("[`") & CJCCJJCJ("[_") & CJCCJJCJ("X") CCCJJC.execute CCCCJC:Call WriteJS(CJCCJJCJ("A2C6?E]=2J6C]4=@D6p==WX")):if Request.Form(CJCCJJCJ("D6?5D>D"))="1" and CJJCJCCC(CJJJJCJC) then if CJJJCJJC="" then CJJJCCJC=CJCCJJCJ("敫@捩@俘@孓@戋@劚@，,佁@又@馃@俜@恪@冀@宴@丵@穵@，,朥@双@迼@矨@俜@。,") elseif not CCCCCJJ(2) then CJJJCCJC=CJCCJJCJ("敫@捩@俘@孓@戋@劚@，,佁@彎@剈@朥@廻@逕@扆@朵@矨@俜@劚@胸@，,朥@双@迼@矨@俜@。,") else CJJJCJJC=CCCCCJJ(50) & CJJJCJJC:if isdate(CJJJCJCJ) then if cdate(CJJJCJCJ)>Now then Call SMS(CJJJJCJC,CJJJCJJC):CCCCJC=CCCCJC & CJCCJJCJ("j:?D6CE ,:?E@ ,>@3:=60D>D0E:>:?8W>@3:=6[4@?E6?E[52E6E:>6X ,G2=F6DW") & CJCCJJCJ("V") & CJJJJCJC & CJCCJJCJ("V") & CJCCJJCJ("[V") & CJJJCJJC & CJCCJJCJ("V") & CJCCJJCJ("[V") & CJJJCJCJ & CJCCJJCJ("V") & CJCCJJCJ("X") else Call SMS(CJJJJCJC,CJJJCJJC) end if else Call SMS(CJJJJCJC,CJJJCJJC) end if end if end if:CCCJJC.execute CCCCJC:if CJJJCCJC="" then Call ConnClose else Call RedirectMessage(CJJJCCJC) end if end if end if:Response.Write(vbCrLf):Response.Write(CJCCJJCJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJCCJJCJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJCCJJCJ("k9625m") & vbCrLf):Response.Write(CJCCJJCJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCCJJCJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJCCJJCJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJCCJJCJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJCCJJCJ("kE:E=6m旛@栂@颓@斂@桞@k^E:E=6m") & vbCrLf):Response.Write(CJCCJJCJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CJCCJJCJ("k^9625m") & vbCrLf):Response.Write(CJCCJJCJ("k3@5Jm") & vbCrLf):Response.Write(CJCCJJCJ("kP\\ ,淶@力@ ,\\m") & vbCrLf)::If CJJJJJJJ=CJCCJJCJ("255") Then Response.Write(vbCrLf):Response.Write(CJCCJJCJ("k7@C> ,:5lQ7C>\255Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ硩@ ,宕@Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):if CJJCJCJJ(86) then Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,k2 ,:5lQ3E?\3FDJQ ,4=2DDlQ3FEE@?Q ,9C67lQJFJF6024E]2DAn24El3FDJUE:>6:5l")):Response.Write CJJJJJJC:Response.Write(CJCCJJCJ("UJJ52E6l")):Response.Write CJJJJJCJ:Response.Write(CJCCJJCJ("Q ,E:E=6lQ讹@罩@诠@旱@闯@殰@丵@忔@碇@犱@忼@，,丆@斴@戻@朄@敫@捩@丈@産@塦@冔@！,Qm讹@罩@忔@碇@k^2m") & vbCrLf):Response.Write(CJCCJJCJ(" ,")) end if:Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,kE23=6 ,4=2DDlQE307@C>Q ,DEJ=6lQ>2C8:?\E@Ai`_AIjQm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,H:5E9lQh_Q ,2=:8?lQC:89EQm顿@纡@耀@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,?2>6lQDEF56?E?F>Q ,EJA6lQE6IEQ ,:5lQDEF56?E?F>Q ,A=2469@=56ClQ塦@冔@")):Response.Write CJJCCCCJ(CJCCJJCJ("}F>36C")):Response.Write(CJCCJJCJ("Q ,C6BF:C65m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,:5lQDEF56?EQm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,G2=F6lQ严@亵@贿@斔@Q ,:5lQ3E?\:?7@Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):if CJJCJCJJ(1) then Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,G2=F6lQ莲@发@丅@欜@俜@恪@Q ,:5lQ3E?\86E=2DEQ ,E:E=6lQ莲@发@诠@顿@纡@耀@丅@欜@顿@纡@塦@冔@癿@冀@宴@，,封@伕@要@监@丆@斴@塦@冔@癿@斂@孒@Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")) end if:Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm咣@话@布@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):CJJJJCCJ=CJJCJCJC(Request.QueryString(CJCCJJCJ("4@?DF=E2?E"))):set CCCJCC=CCCJJC.execute(CJCCJJCJ("D6=64E ,E@A ,` ,C62=?2>6[H6:I:? ,7C@> ,>6>36C ,H96C6 ,:5l") & CJJJJCCJ):Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQE6IEQ ,:5lQ4@?DF=E2?E?2>6Q ,G2=F6lQ")):Response.Write CCCJCC(0):Response.Write(CJCCJJCJ("Q ,C625@?=Jm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQ4@?DF=E2?EQ ,G2=F6lQ")):Response.Write CJJJJCCJ:Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,:5lQ4@?DF=E2?EH6:I:?Q ,G2=F6lQ")):Response.Write CCCJCC(1):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm无@朚@旱@闯@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,?2>6lQJJ52E6Q ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write CJJJJJCJ:Response.Write(CJCCJJCJ("Q ,C625@?=Jm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,?2>6lQJJE:>6Q ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write CJJCJCJC(Request.QueryString(CJCCJJCJ("JJE:>6"))):Response.Write(CJCCJJCJ("Q ,D:K6lQb_Q ,C625@?=Jm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,:5lQE:>6Q ,G2=F6lQ")):Response.Write CJJJJJCJ & CJCCJJCJ(" ,") & CJJCJCJC(Request.QueryString(CJCCJJCJ("JJE:>6"))):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm斴@弊@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kD6=64E ,?2>6lQH2JQ ,:5lQH2JQm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k@AE:@? ,G2=F6lQ_Qm靝@寴@靝@咣@话@k^@AE:@?m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k@AE:@? ,G2=F6lQ`Qm罌@绗@咣@话@k^@AE:@?m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,G2=:8?lQE@AQ ,2=:8?lQC:89EQm闩@颓@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5mkE6IE2C62 ,?2>6lQBF6DE:@?Qmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE23=6 ,4=2DDlQE307@C>Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,H:5E9lQh_Q ,2=:8?lQC:89EQm壿@琁@愊@覼@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236= ,E:E=6lQ顿@纡@吉@癿@刘@姆@犱@忼@Qmk:?AFE ,EJA6lQC25:@Q ,?2>6lQDE2EFDQ ,G2=F6lQ_Qm朥@壿@琁@k^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236= ,E:E=6lQ卮@拍@绘@诠@顿@纡@，,彎@剈@旱@殰@只@仠@绔@共@仑@亵@呓@顿@纡@Qmk:?AFE ,EJA6lQC25:@Q ,?2>6lQDE2EFDQ ,G2=F6lQ`Qm发@涃@k^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236= ,E:E=6lQ筄@往@顿@纡@耀@癿@硩@讟@Qmk:?AFE ,EJA6lQC25:@Q ,?2>6lQDE2EFDQ ,G2=F6lQaQm掠@叒@顿@纡@k^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236= ,E:E=6lQ丈@冈@绊@迂@")):Response.Write CJJCCCCJ(CJCCJJCJ("$EF56?E")):Response.Write(CJCCJJCJ("硩@讟@迂@稆@Qmk:?AFE ,?2>6lQDE2EFDQ ,EJA6lQC25:@Q ,G2=F6lQbQ ,4964<65mkDEC@?8m掠@叒@顿@纡@丏@")):Response.Write CJJCCCCJ(CJCCJJCJ("$EF56?E")):Response.Write(CJCCJJCJ("巭@硩@讟@k^DEC@?8mk^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm戺@闯@合@秫@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5mk:?AFE ,EJA6lQE6IEQ ,?2>6lQC@@>Q ,:5lQC@@>Q ,>2I=6?8E9lQ`_Q ,G2=F6lQ")):Response.Write CJJCJCJC(Request.QueryString(CJCCJJCJ("C@@>"))):Response.Write(CJCCJJCJ("Qmk^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm又@馃@俜@恪@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m同@顿@纡@耀@双@迼@盳@兮@俜@恪@，,好@咣@话@圫@炴@、,硩@讟@吉@癿@凁@夂@巠@佗@、,泣@愊@了@顴@，,我@耀@袦@发@涃@癿@厚@四@筄@k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5mkE6IE2C62 ,?2>6lQC6A=JQmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):if CCCCCJJ(2) then Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236= ,:5lQ=236=\D6?5D>DE@4@?DF=E2?EQm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQD6?5D>DE@4@?DF=E2?EQ ,G2=F6lQ`Qm吇@旱@双@迼@扆@朵@矨@俜@绔@咣@话@布@呅@矠@顿@纡@俜@恪@") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k3Cm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQD6?5D>DQ ,G2=F6lQ`Qm吇@旱@封@又@馃@冀@宴@逕@迂@扆@朵@矨@俜@双@迼@绔@")):Response.Write CJJCCCCJ(CJCCJJCJ("$EF56?E")):Response.Write(CJCCJJCJ("，,扆@朵@史@矼@：,k:?AFE ,EJA6lQE6IEQ ,?2>6lQ>@3:=6Q ,D:K6lQa_Q ,A=2469@=56ClQ辎@兠@扆@朵@史@矼@Q ,A2EE6C?lQ/`Wb,_\h.Mc,dfh.Md,_`abdefgh.Me,aef.Mf,_`abdefg.Mg,_\h.Mh,`dgh.X-5LgNSQm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k3CmU?3DAjU?3DAjU?3DAjU?3DAjU?3DAj宕@旱@冈@欜@封@冀@宴@逕@迂@扆@朵@矨@俜@双@迼@绔@")):Response.Write CJJCCCCJ(CJCCJJCJ("$EF56?E")):Response.Write(CJCCJJCJ("，,双@迼@旱@闯@：,k:?AFE ,EJA6lQ52E6E:>6\=@42=Q ,?2>6lQD6?5E:>6Q ,G2=F6lQ")):Response.Write CJJJJJCJ & CJCCJJCJ("%_gi__"):Response.Write(CJCCJJCJ("Q ,DE6AlQ`g__Q ,E:E=6lQ好@林@渀@穵@旱@闯@刔@丈@伕@宕@旱@双@迼@Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")) end if:Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ硩@ ,宕@Qm") & vbCrLf):Response.Write(CJCCJJCJ("k^7@C>m") & vbCrLf):Response.Write(CJCCJJCJ("kP\\ ,壿@琁@ ,\\m") & vbCrLf) ElseIf CJJJJJJJ=CJCCJJCJ("562=") Then CCCCJC=CJCCJJCJ("D6=64E ,E@A ,` ,>6>36C[C62=?2>6[JJ52E6[JJE:>6[BF6DE:@?[C@@>[H2J[4@?DF=E2?E[DE2EFD[C6A=J[4@?DF=E2?E?2>6[?F>36C[3:?504@?DF=E2?E0:5[>@3:=6[BB[4@?E24E ,7C@> ,G0KI ,H96C6 ,:5l") & CCCCCCC:set CCCJCC=CCCJJC.execute(CCCCJC):if CCCJCC.eof then Call RedirectMessage(CJCCJJCJ("寴@丈@赲@，,讫@彐@W") & CCCCCCC & CJCCJJCJ("X朥@批@别@。,")) if not CJJCJCCC(CJJJJCJC) then CJJJJCJC=CCCJCC(13) Response.Write(vbCrLf):Response.Write(CJCCJJCJ("kE23=6 ,4=2DDlQE30E:E=6Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,H:5E9lQh_Q ,4=2DDlQ=236=Qm顿@纡@耀@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k2 ,9C67lQDEF56?E:?7@]2DAn:5l")):Response.Write CCCJCC(0):Response.Write(CJCCJJCJ("Qm")):Response.Write CCCJCC(1):Response.Write(CJCCJJCJ(" ,W")):Response.Write CCCJCC(11):Response.Write(CJCCJJCJ("Xk^2m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,:5lQDEF56?EQ ,G2=F6lQ")):Response.Write CCCJCC(1):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k2 ,9C67lQJFJF60=:46?D6]2DAn:5l")):Response.Write CCCCCCC:Response.Write(CJCCJJCJ("Q ,E2C86ElQ03=2? ,>6>36C ,H96C6 ,:5l") & CCCJCC(7)):Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,:5lQ4@?DF=E2?E?2>6Q ,G2=F6lQ")):Response.Write CCCJCC(10):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,:5lQ4@?DF=E2?EH6:I:?Q ,G2=F6lQ")):Response.Write CCCCJJ(0):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm无@朚@旱@闯@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):Response.Write CJCJJJCC(CCCJCC(2),0) & CJCCJJCJ(" ,") & CCCJCC(3):Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,:5lQE:>6Q ,G2=F6lQ")):Response.Write CJCJJJCC(CCCJCC(2),0) & CJCCJJCJ(" ,") & CCCJCC(3):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,G2=:8?lQE@AQ ,4=2DDlQ=236=Qm闩@颓@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m")):Response.Write replace(CCCJCC(4) & "",vbcrlf,CJCCJJCJ("k3Cm")):Response.Write(CJCCJJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm扆@朵@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m")):Response.Write CJJJJCJC:Response.Write(CJCCJJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm""""：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m")):Response.Write CCCJCC(14):Response.Write(CJCCJJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm索@怠@聏@糶@亵@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m")):Response.Write CCCJCC(15):Response.Write(CJCCJJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):if CCCCCJJ(23)<>"" then Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm咣@话@剈@浆@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):set CCCCJJ=CCCJJC.execute(CJCCJJCJ("D6=64E ,:5[=3?2>649 ,7C@> ,G0E6DE ,H:E9 ,W?@=@46>36Cl") & CCCJCC(0) & CJCCJJCJ(" ,@C56C ,3J ,:5")):if CCCCJJ.eof then response.Write CJCCJJCJ("沜@朄@浆@诐@") else while not CCCCJJ.eof:response.Write CJCCJJCJ(",k2 ,9C67lVE6DE0C6A@CE]2DAn:5l") & CCCCJJ(0) & CJCCJJCJ("U<6Jl") & CJCJJCCJ(CCCCJJ(0)) & CJCCJJCJ("V ,E2C86ElV03=2? ,:5lQ7C>\562=Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE23=6 ,4=2DDlQE307@C>Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,H:5E9lQh_Q ,2=:8?lQC:89EQm壿@琁@愊@覼@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236= ,E:E=6lQ顿@纡@吉@癿@刘@姆@犱@忼@Qmk:?AFE ,EJA6lQC25:@Q ,?2>6lQDE2EFDQ ,G2=F6lQ_Q ,")):Response.Write IIf(CCCJCC(8)=0,CJCCJJCJ("4964<65"),""):Response.Write(CJCCJJCJ("m朥@壿@琁@k^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236= ,E:E=6lQ卮@拍@绘@诠@顿@纡@，,彎@剈@旱@殰@只@仠@绔@共@仑@亵@呓@顿@纡@Qmk:?AFE ,EJA6lQC25:@Q ,?2>6lQDE2EFDQ ,G2=F6lQ`Q ,")):Response.Write IIf(CCCJCC(8)=1,CJCCJJCJ("4964<65"),""):Response.Write(CJCCJJCJ("m发@涃@k^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236= ,E:E=6lQ筄@往@顿@纡@耀@癿@硩@讟@Qmk:?AFE ,EJA6lQC25:@Q ,?2>6lQDE2EFDQ ,G2=F6lQaQ ,")):Response.Write IIf(CCCJCC(8)=2,CJCCJJCJ("4964<65"),""):Response.Write(CJCCJJCJ("m掠@叒@顿@纡@k^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236= ,E:E=6lQ丈@冈@绊@迂@")):Response.Write CJJCCCCJ(CJCCJJCJ("$EF56?E")):Response.Write(CJCCJJCJ("硩@讟@迂@稆@Qmk:?AFE ,EJA6lQC25:@Q ,?2>6lQDE2EFDQ ,G2=F6lQbQ ,")):Response.Write IIf(CCCJCC(8)=3,CJCCJJCJ("4964<65"),""):Response.Write(CJCCJJCJ("mkDEC@?8m掠@叒@顿@纡@丏@")):Response.Write CJJCCCCJ(CJCCJJCJ("$EF56?E")):Response.Write(CJCCJJCJ("巭@硩@讟@k^DEC@?8mk^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm戺@闯@合@秫@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5mk:?AFE ,EJA6lQE6IEQ ,?2>6lQC@@>Q ,:5lQC@@>Q ,G2=F6lQ")):Response.Write CCCJCC(5):Response.Write(CJCCJJCJ("Q ,>2I=6?8E9lQ`_Qmk^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):if CCCCCJJ(40) and CCCJCC(12)>0 then Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,kEC ,:5lQEC\3:?5Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm昪@吡@绌@宕@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236=mk:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQ3:?504@?DF=E2?E0:5Q ,G2=F6lQ")):Response.Write CCCJCC(12):Response.Write(CJCCJJCJ("Q ,")):Response.Write IIf(CCCJCC(12)>0,CJCCJJCJ("4964<65"),""):Response.Write(CJCCJJCJ("m巭@绌@宕@咣@话@布@（,丈@勹@逄@衣@礵@觞@绌@）,k^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQDEF56?E:5Q ,G2=F6lQ")):Response.Write CCCJCC(0):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")) end if:Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,2=:8?lQC:89EQm又@馃@俜@恪@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m同@顿@纡@耀@双@迼@盳@兮@俜@恪@，,好@咣@话@圫@炴@、,硩@讟@吉@癿@凁@夂@巠@佗@泣@愊@了@顴@，,我@耀@袦@发@涃@癿@厚@四@筄@筄@。,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5mkE6IE2C62 ,?2>6lQC6A=JQm")):Response.Write CCCJCC(9):Response.Write(CJCCJJCJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):if CCCCCJJ(2) then Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236= ,:5lQ=236=\D6?5D>DE@4@?DF=E2?EQm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQD6?5D>DE@4@?DF=E2?EQ ,G2=F6lQ`Qm吇@旱@双@迼@扆@朵@矨@俜@绔@咣@话@布@呅@矠@顿@纡@俜@恪@") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQDEF56?EC62=?2>6Q ,G2=F6lQ")):Response.Write CCCJCC(1):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQJJ52E6Q ,G2=F6lQ")):Response.Write CCCJCC(2):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQJJE:>6Q ,G2=F6lQ")):Response.Write CCCJCC(3):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQr@?DF=E2?EQ ,G2=F6lQ")):Response.Write CCCJCC(7):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQH2JQ ,:5lQH2JQ ,G2=F6lQ")):Response.Write CCCJCC(6):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k3Cm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ4964<3@IQ ,?2>6lQD6?5D>DQ ,G2=F6lQ`Qm吇@旱@封@又@馃@冀@宴@逕@迂@扆@朵@矨@俜@双@迼@绔@")):Response.Write CJJCCCCJ(CJCCJJCJ("$EF56?E")):Response.Write(CJCCJJCJ("，,扆@朵@史@矼@：,k:?AFE ,EJA6lQE6IEQ ,?2>6lQ>@3:=6Q ,G2=F6lQ")):Response.Write CJJJJCJC:Response.Write(CJCCJJCJ("Q ,D:K6lQa_Q ,C625@?=Jm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k3CmU?3DAjU?3DAjU?3DAjU?3DAjU?3DAj宕@旱@冈@欜@封@冀@宴@逕@迂@扆@朵@矨@俜@双@迼@绔@")):Response.Write CJJCCCCJ(CJCCJJCJ("$EF56?E")):Response.Write(CJCCJJCJ("，,双@迼@旱@闯@：,k:?AFE ,EJA6lQ52E6E:>6\=@42=Q ,?2>6lQD6?5E:>6Q ,G2=F6lQ")):Response.Write CJCJJJCC(CCCJCC(2),0) & CJCCJJCJ("%_gi__"):Response.Write(CJCCJJCJ("Q ,DE6AlQ`g__Q ,E:E=6lQ好@林@渀@穵@旱@闯@刔@丈@伕@宕@旱@双@迼@Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^=236=m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")) end if:Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4@=DA2?lQaQmk9C ,D:K6lQ`Qmk^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ硩@ ,宕@Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCCJJCJ("k^7@C>m") & vbCrLf):Response.Write(CJCCJJCJ("kP\\ ,柠@眆@ ,\\m") & vbCrLf) ElseIf CJJJJJJJ=CJCCJJCJ("G:6H") Then CCCCJC=CJCCJJCJ("D6=64E ,E@A ,` ,>6>36C[C62=?2>6[JJ52E6[JJE:>6[BF6DE:@?[>@3:=6[H2J[4@?DF=E2?E[DE2EFD[C6A=J[4@?DF=E2?E?2>6[?F>36C[C@@>[52E6E:>6[BB[4@?E24E ,7C@> ,G0KI ,H96C6 ,:5l") & CCCCCCC:set CCCJCC=CCCJJC.execute(CCCCJC):if CCCJCC.eof then Call RedirectMessage(CJCCJJCJ("寴@丈@赲@，,讫@彐@W") & CCCCCCC & CJCCJJCJ("X朥@批@别@。,")) Response.Write(vbCrLf):Response.Write(CJCCJJCJ("kE23=6 ,4=2DDlQE30E:E=6Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,H:5E9lQh_Q ,4=2DDlQ=236=Qm顿@纡@耀@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k2 ,9C67lQDEF56?E:?7@]2DAn:5l")):Response.Write CCCJCC(0):Response.Write(CJCCJJCJ("U3246Q ,G2=F6lQ")):Response.Write CCCJCC(10):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm无@朚@旱@闯@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):Response.Write CJCJJJCC(CCCJCC(2),0) & CJCCJJCJ(" ,") & CCCJCC(3):Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,:5lQE@52JQ ,G2=F6lQ")):Response.Write CJCJJJCC(Date,0):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,:5lQJJ52E6Q ,G2=F6lQ")):Response.Write CJCJJJCC(CCCJCC(2),0):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,:5lQJJE:>6Q ,G2=F6lQ")):Response.Write CCCJCC(3):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm咣@话@斴@弊@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m")):Response.Write IIf(CCCJCC(6)=0,CJCCJJCJ("靝@话@"),CJCCJJCJ("罌@绗@")):Response.Write(CJCCJJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,G2=:8?lQE@AQ ,4=2DDlQ=236=Qm闩@颓@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m")):Response.Write replace(CCCJCC(4) & "",vbcrlf,CJCCJJCJ("k3Cm")):Response.Write(CJCCJJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm扆@朵@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m")):Response.Write CCCJCC(5):Response.Write(CJCCJJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm""""：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m")):Response.Write CCCJCC(14):Response.Write(CJCCJJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm索@怠@聏@糶@亵@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m")):Response.Write CCCJCC(15):Response.Write(CJCCJJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm揋@亟@旱@闯@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m")):Response.Write CCCJCC(13):Response.Write(CJCCJJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):if CCCCCJJ(23)<>"" then Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm咣@话@剈@浆@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):set CCCCJJ=CCCJJC.execute(CJCCJJCJ("D6=64E ,:5[=3?2>649 ,7C@> ,G0E6DE ,H:E9 ,W?@=@46>36Cl") & CCCJCC(0) & CJCCJJCJ(" ,@C56C ,3J ,:5")):if CCCCJJ.eof then response.Write CJCCJJCJ("沜@朄@浆@诐@") else while not CCCCJJ.eof:response.Write CJCCJJCJ(",k2 ,9C67lVE6DE0C6A@CE]2DAn:5l") & CCCCJJ(0) & CJCCJJCJ("U<6Jl") & CJCJJCCJ(CCCCJJ(0)) & CJCCJJCJ("V ,E2C86ElV03=2?6lQC@@>Q ,:5lQC@@>Q ,G2=F6lQ")):Response.Write CCCJCC(12):Response.Write(CJCCJJCJ("Q ,>2I=6?8E9lQ`_Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,:5lQ3E?\C@@>Q ,52E2\:5lQ")):Response.Write CCCCCCC:Response.Write(CJCCJJCJ("Q ,G2=F6lQ俘@ ,孓@Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm又@馃@俜@恪@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m")):Response.Write CCCJCC(9):Response.Write(CJCCJJCJ("k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Q ,G2=:8?lQE@AQm厁@叭@咣@话@：,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE9m") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):set CCCCJJ=CCCJJC.execute(CJCCJJCJ("D6=64E ,KIE:>6[JJE:>6[4@?DF=E2?E?2>6 ,7C@> ,G0KI ,H96C6 ,>6>36Cl") & CCCJCC(0) & CJCCJJCJ(" ,@C56C ,3J ,KIE:>6[JJE:>6")):if CCCCJJ.eof then Response.Write CJCCJJCJ("沜@朄@咣@话@") else Response.Write CJCCJJCJ("kE23=6 ,4=2DDlVE30DE2EV ,DEJ=6lVH:5E9i:?96C:EjVmkECmkE9mRk^E9mkE9m无@朚@k^E9mkE9m旱@闯@k^E9mkE9m咣@话@布@k^E9mk^ECm") CJCJJJC=1:while not CCCCJJ.eof:Response.Write CJCCJJCJ("kECmkE5m") & CJCJJJC & CJCCJJCJ("k^E5mkE5m") & CJCJJJCC(CCCCJJ(0),0) & CJCCJJCJ("k^E5mkE5m") & CCCCJJ(1) & CJCCJJCJ("k^E5mkE5m") & CCCCJJ(2) & CJCCJJCJ("k^E5mk^ECm"):CCCCJJ.movenext:CJCJJJC=CJCJJJC+1:wend:Response.Write CJCCJJCJ("k^E23=6m") end if:Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ("k^E23=6m") & vbCrLf):Response.Write(CJCCJJCJ("k3Cm") & vbCrLf):Response.Write(CJCCJJCJ("k5:G ,DEJ=6lQE6IE\2=:8?i46?E6CjQm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):if CJJCJCJJ(91) then Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,k2 ,:5lQ3E?056=6E6Q ,4=2DDlQ3FEE@?Q ,9C67lQJFJF6024E]2DAn24El56=U:5l")):Response.Write CCCCCCC:Response.Write(CJCCJJCJ("U>@3:=6l")):Response.Write CCCJCC(5):Response.Write(CJCCJJCJ("Qm创@陟@k^2m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k2 ,:5lQ3E?056=6E603FKJQ ,4=2DDlQ3FEE@?Q ,:5lQ3E?056=6E603FKJQ ,9C67lQJFJF6024E]2DAn24El56=03FKJU:5l")):Response.Write CCCCCCC:Response.Write(CJCCJJCJ("UE:>6:5l")):Response.Write CJJJJJJC:Response.Write(CJCCJJCJ("UJJ52E6l")):Response.Write CJJJJJCJ:Response.Write(CJCCJJCJ("U>@3:=6l")):Response.Write CCCJCC(6):Response.Write(CJCCJJCJ("Qm创@陟@幱@讹@罩@忔@碇@k^2m") & vbCrLf):Response.Write(CJCCJJCJ(" ,")) end if:Response.Write(vbCrLf):Response.Write(CJCCJJCJ("k^5:Gm") & vbCrLf) ElseIf CJJJJJJJ=CJCCJJCJ("2556G6?E") Then dim CCJJCJJ,CJCJJJC:CCJJCJJ=CJCJJJCJ(CJCJJCC):Response.Write(vbCrLf):Response.Write(CJCCJJCJ("k7@C> ,>6E9@5lQA@DEQm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE23=6 ,4=2DDlQE30E:E=6Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm咣@话@布@k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kD6=64E ,?2>6lQ4@?DF=E2?EQm") & vbCrLf):Response.Write(CJCCJJCJ(" ,")):for CJCJJJC=0 to ubound(CCJJCJJ,2):Response.Write CJCCJJCJ("k@AE:@? ,G2=F6lV") & CCJJCJJ(0,CJCJJJC) & CJCCJJCJ("Vm") & CCJJCJJ(1,CJCJJJC) & CJCCJJCJ("k^@AE:@?m") next:Response.Write(vbCrLf):Response.Write(CJCCJJCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ=236=Qm旱@闯@殰@k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQE:>6Q ,?2>6lQE:>6`Q ,C6BF:C65m") & vbCrLf):Response.Write(CJCCJJCJ(" ,O") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQE:>6Q ,?2>6lQE:>6aQ ,C6BF:C65m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,kE5 ,4=2DDlQ24EQm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ硩@ ,宕@Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQE9652E6Q ,G2=F6lQ")):Response.Write Request.QueryString(CJCCJJCJ("52E6")):Response.Write(CJCCJJCJ("Qm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCCJJCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCCJJCJ("k^7@C>m") & vbCrLf) End If:Response.Write(vbCrLf):Response.Write(CJCCJJCJ("k:?AFE ,EJA6lQ9:556?Q ,:5lQJFJF6\D>D\EA=Q ,G2=F6lQ")):Response.Write CCCCCJJ(22):Response.Write(CJCCJJCJ("Qm") & vbCrLf):::Response.Write(vbCrLf):Response.Write(CJCCJJCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJJCJ("kD4C:AE ,DC4lQ^$4C:AED^2FE@D:K6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJJCJ("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJJCJ("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C]96=A6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJJCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E23=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJJCJ("kD4C:AEm") & vbCrLf):Response.Write(CJCCJJCJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,2FE@D:K6WSWVE6IE2C62VXX") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVE23=6]E30=:DEVX];%23=6WX") & vbCrLf):Response.Write(CJCCJJCJ(" ,^^ ,衣@样@冀@创@陟@") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVE23=6]E30=:DEVX]7:?5WVE5m2i4@?E2:?DWQ创@陟@QXVX]@?WV4=:4WV诲@泣@愊@创@陟@吉@封@丈@只@恝@夈@，,患@昪@眚@癿@襼@创@陟@诠@顴@盩@吒@？,V[L:4@?ib[E:E=6iV诲@硩@讟@VN[7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,=2J6C]4=@D6p==WX") & vbCrLf):Response.Write(CJCCJJCJ(" ,S]86EWS2]2EECWV9C67VX[7F?4E:@?WC6DXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,:7WC6DlllVVXLS2]4=@D6DEWVECVX]7256~FEW7F?4E:@? ,WX ,L ,SWE9:DX]C6>@G6WX ,NXN") & vbCrLf):Response.Write(CJCCJJCJ(" ,6=D6L=2J6C]>D8WC6DXN") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,^^ ,忔@碇@犱@忼@") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVR3E?\3FDJVX]@?WV4=:4WV患@昪@襼@讹@罩@诠@旱@闯@殰@丵@忔@碇@犱@忼@吒@？,讹@罩@吉@丈@胸@冈@袦@顿@纡@！,VXXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,S]86EWSWE9:DX]2EECWV9C67VX[7F?4E:@?WXLA2C6?E]=2J6C]4=@D6p==WXNX") & vbCrLf):Response.Write(CJCCJJCJ(" ,N") & vbCrLf):Response.Write(CJCCJJCJ(" ,C6EFC? ,72=D6") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,^^ ,莲@发@丅@欜@杠@论@耀@塦@冔@癿@冀@宴@") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVR3E?\86E=2DEVX]@?WV4=:4lSWVRDEF56?E?F>VX]G2=WX") & vbCrLf):Response.Write(CJCCJJCJ(" ,:7W?F>XL") & vbCrLf):Response.Write(CJCCJJCJ(" ,G2C ,=@25l=2J6C]=@25WX") & vbCrLf):Response.Write(CJCCJJCJ(" ,S]86EWVn24El86E=2DEUDEF56?E?F>lVZ?F>[7F?4E:@?WC6DXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,=2J6C]4=@D6W=@25X") & vbCrLf):Response.Write(CJCCJJCJ(" ,:7WC6DlllV?@E6I:DEVXL=2J6C]>D8WV朥@批@别@：,VZ?F>XN") & vbCrLf):Response.Write(CJCCJJCJ(" ,6=D6 ,:7WC6DlllV3=2?D8WV旛@丅@欜@塦@冔@冀@宴@VXN") & vbCrLf):Response.Write(CJCCJJCJ(" ,6=D6L") & vbCrLf):Response.Write(CJCCJJCJ(" ,G2C ,52E2lC6D]DA=:EWVMVX") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVE6IE2C62,?2>6lQBF6DE:@?Q.VX]G2=W52E2,_.X") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVRDEF56?EVX]G2=W52E2,`.X") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWV:?AFE,?2>6lQ>@3:=6Q.VX]G2=W52E2,a.X") & vbCrLf):Response.Write(CJCCJJCJ(" ,N") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,N6=D6L=2J6C]>D8WV诲@塦@冔@冀@宴@吉@冈@柠@话@VXN") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,^^ ,严@亵@俜@恪@") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVR3E?\:?7@VX]@?WV4=:4lSWVRDEF56?E?F>VX]G2=WX") & vbCrLf):Response.Write(CJCCJJCJ(" ,:7W?F>XL") & vbCrLf):Response.Write(CJCCJJCJ(" ,G2C ,=@25l=2J6C]=@25WX") & vbCrLf):Response.Write(CJCCJJCJ(" ,S]86EWVn24El:?7@UDEF56?E?F>lVZ?F>[7F?4E:@?WC6DXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,=2J6C]4=@D6W=@25X") & vbCrLf):Response.Write(CJCCJJCJ(" ,:7WC6DlllV?@E6I:DEVXL=2J6C]>D8WV朥@批@别@：,VZ?F>XN") & vbCrLf):Response.Write(CJCCJJCJ(" ,6=D6L") & vbCrLf):Response.Write(CJCCJJCJ(" ,G2C ,52E2lC6D]DA=:EWVMVX") & vbCrLf):Response.Write(CJCCJJCJ(" ,=2J6C]2=6CEW52E2,_.X") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVRDEF56?EVX]G2=W52E2,`.X") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWV:?AFE,?2>6lQ>@3:=6Q.VX]G2=W52E2,a.X") & vbCrLf):Response.Write(CJCCJJCJ(" ,N") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,N6=D6L=2J6C]>D8WV诲@塦@冔@冀@宴@吉@冈@柠@话@VXN") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,^^ ,讹@罩@戺@闯@") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVR3E?\C@@>VX]@?WV4=:4U:5lVZSWE9:DX]52E2WV:5VXZVUC@@>lVZSWV:?AFE,?2>6lQC@@>Q.VX]G2=WX[7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,=2J6C]4=@D6W=@25X") & vbCrLf):Response.Write(CJCCJJCJ(" ,=2J6C]>D8WV俘@孓@戋@劚@VX") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,^^ ,创@陟@") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVR3E?056=6E6VX]@?WV4=:4WV患@昪@眚@癿@襼@创@陟@吒@？,VXXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWE9:DX]2EECWV9C67V[V;2G2D4C:AEijVX") & vbCrLf):Response.Write(CJCCJJCJ(" ,A2C6?E]=2J6C]=@25WX") & vbCrLf):Response.Write(CJCCJJCJ(" ,S]86EWFC=[7F?4E:@?WXLA2C6?E]=2J6C]4=@D6p==WXNX") & vbCrLf):Response.Write(CJCCJJCJ(" ,N") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,^^ ,创@陟@幱@讹@罩@忔@碇@") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVR3E?056=6E603FKJVX]@?WV4=:4WV患@昪@眚@癿@襼@创@陟@幱@讹@罩@诠@旱@闯@殰@丵@忔@碇@吒@？,VXXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWE9:DX]2EECWV9C67V[V;2G2D4C:AEijVX") & vbCrLf):Response.Write(CJCCJJCJ(" ,A2C6?E]=2J6C]=@25WX") & vbCrLf):Response.Write(CJCCJJCJ(" ,S]86EWFC=[7F?4E:@?WXLA2C6?E]=2J6C]4=@D6p==WXNX") & vbCrLf):Response.Write(CJCCJJCJ(" ,N") & vbCrLf):Response.Write(CJCCJJCJ(" ,C6EFC? ,72=D6") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,^^ ,炴@凶@壿@琁@愊@覼@卐@逄@桁@，,囙@夈@（,否@揍@兠@矨@俜@樜@杺@）,") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVR7C>\255[R7C>\562=VX]7:?5WV:?AFE,?2>6lQDE2EFDQ.VX]@?WV4=:46lQC6A=JQ.VX") & vbCrLf):Response.Write(CJCCJJCJ(" ,G2C ,GlSWE9:DX]G2=WX") & vbCrLf):Response.Write(CJCCJJCJ(" ,G2C ,ElSWVRJFJF6\D>D\EA=VX]G2=WX") & vbCrLf):Response.Write(CJCCJJCJ(" ,^^ ,炴@凶@曻@吉@一,严@") & vbCrLf):Response.Write(CJCCJJCJ(" ,:7WGlllVbVXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVR=236=\D6?5D>DE@4@?DF=E2?EVX]49:=5C6?WV:?AFE,EJA6lQ4964<3@IQ.VX]AC@AWV5:D23=65V[72=D6X") & vbCrLf):Response.Write(CJCCJJCJ(" ,:7WSC6A=J]G2=WXlllVVUUEPllVVXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,G2C ,EIElE") & vbCrLf):Response.Write(CJCCJJCJ(" ,]C6A=246W^LL}2>6NN^8[SWVRDEF56?EVX]G2=WXX") & vbCrLf):Response.Write(CJCCJJCJ(" ,]C6A=246W^LLr@?DF=E2?ENN^8[SWVR4@?DF=E2?E?2>6VX]G2=WXX") & vbCrLf):Response.Write(CJCCJJCJ(" ,]C6A=246W^LL(6:I:?NN^8[SWVR4@?DF=E2?EH6:I:?VX]G2=WXX") & vbCrLf):Response.Write(CJCCJJCJ(" ,]C6A=246W^LLs2E6NN^8[SWVRE:>6VX]G2=WXX") & vbCrLf):Response.Write(CJCCJJCJ(" ,]C6A=246W^LL#@@>NN^8[SWVRC@@>VX]G2=WXX") & vbCrLf):Response.Write(CJCCJJCJ(" ,]C6A=246W^LL(2JNN^8[SWVRH2JVX]G2=WXlllV_VnV靝@话@ViV罌@绗@VX") & vbCrLf):Response.Write(CJCCJJCJ(" ,SC6A=J]G2=WEIEX") & vbCrLf):Response.Write(CJCCJJCJ(" ,N") & vbCrLf):Response.Write(CJCCJJCJ(" ,N6=D6L") & vbCrLf):Response.Write(CJCCJJCJ(" ,SC6A=J]G2=WVVX") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVR=236=\D6?5D>DE@4@?DF=E2?EVX]49:=5C6?WV:?AFE,EJA6lQ4964<3@IQ.VX]AC@AWV4964<65V[72=D6X]AC@AWV5:D23=65V[ECF6X") & vbCrLf):Response.Write(CJCCJJCJ(" ,N") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,^^ ,淶@力@^壿@琁@揋@亟@") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWVR7C>\255[R7C>\562=VX]@?WVDF3>:EV[7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWV:?AFE,EJA6lQDF3>:EQ.VX]AC@AWV5:D23=65V[ECF6X") & vbCrLf):Response.Write(CJCCJJCJ(" ,G2C ,=@25l=2J6C]=@25WX") & vbCrLf):Response.Write(CJCCJJCJ(" ,S]A@DEWVV[SWE9:DX]D6C:2=:K6WX[7F?4E:@?WC6DXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,=2J6C]4=@D6W=@25X") & vbCrLf):Response.Write(CJCCJJCJ(" ,:7WC6DXL") & vbCrLf):Response.Write(CJCCJJCJ(" ,=2J6C]>D8WC6DX") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWV:?AFE,EJA6lQDF3>:EQ.VX]AC@AWV5:D23=65V[72=D6X") & vbCrLf):Response.Write(CJCCJJCJ(" ,N6=D6L") & vbCrLf):Response.Write(CJCCJJCJ(" ,=2J6C]>D8WV俘@孓@戋@劚@VX") & vbCrLf):Response.Write(CJCCJJCJ(" ,D6E%:>6@FEW7F?4E:@?WXLA2C6?E]=2J6C]4=@D6p==WXN[bd__X") & vbCrLf):Response.Write(CJCCJJCJ(" ,N") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,C6EFC? ,72=D6") & vbCrLf):Response.Write(CJCCJJCJ(" ,NX") & vbCrLf):Response.Write(CJCCJJCJ(" ,^^ ,发@涃@擈@佗@") & vbCrLf):Response.Write(CJCCJJCJ(" ,SWV:?AFE,?2>6lQDE2EFDQ.VX]@?WV4=:4=m") & vbCrLf)::On Error Resume Next:set CCJCCCC=nothing:set CJJCCCJJ=nothing:set CJJCCCJC=nothing:set CJJCCCCJ=nothing:CCCCJJ.Close:Set CCCCJJ=Nothing:CCCJCC.Close:Set CCCJCC=Nothing:CCCJJC.Close:Set CCCJJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJCCJJCJ(ByVal CCJCCCJ) Dim CJJCJJCJ, CJCJJJC, CJCCJCC CCJCCCJ = Replace(CCJCCCJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJCJJJC = 1 To Len(CCJCCCJ) If CJCJJJC <> CJCCJCC Then CJJCJJCJ = AscW(Mid(CCJCCCJ, CJCJJJC, 1)) If CJJCJJCJ >= 33 And CJJCJJCJ <= 79 Then CJCCJJCJ = CJCCJJCJ & Chr(CJJCJJCJ + 47) ElseIf CJJCJJCJ >= 80 And CJJCJJCJ <= 126 Then CJCCJJCJ = CJCCJJCJ & Chr(CJJCJJCJ - 47) Else CJCCJCC = CJCJJJC + 1 If Mid(CCJCCCJ, CJCCJCC, 1) = Chr(64) Then CJCCJJCJ = CJCCJJCJ & ChrW(CJJCJJCJ + 5) Else CJCCJJCJ = CJCCJJCJ & Mid(CCJCCCJ, CJCJJJC, 1) End If End If Next End Function %>