<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCCCCJ, CCCCCC,CJJJJJJ, CJJJJJC, CJJJJCJ:Set CCCCCJ = server.CreateObject(CJCJJJCJ("ps~sq]r@??64E:@?")):CCCCCJ.open Application(CJCJJJCJ("r@??64E:@?$EC:?8")):Set CCCCCC=CCCCCJ::Dim CJJJJCC,CJJJCJJ,CJJJCJC,CJJJCCJ,CJJJCCC,CJJCJJJ,CJJCJJC,CJJCJCJ,CJJCJCC:Dim CJJCCJJ,CJJCCJC,CJJCCCJ,CJJCCCC,CJCJJJJ,CJCJJJC:Dim CJCJJCJ,CJCJJCC,CJCJCJJ:Dim CJCJCJC:CJCJCJC=Trim(Request.Cookies(CJCJJJCJ("!$*|t|qt#"))):if CJCJCJC="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CJJJJCC>0 then CJJJJCJ=CJCJJJCJ("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(CJCJJJCJ("弬@寁@矼@,,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,")) Call SetMemberCookie(CJJJJCC,CJJJCJJ) End IF end if:Sub CheckRight(CJCJJJCC):dim CJCJCCJ,CJCJCCC:if CJJJJCC=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJCJJJCJ("癶@彐@俜@恪@夬@敃@,,诲@釈@斫@癶@彐@。,")) elseIf not CJJJCJJJ(CJCJJJCC) then Call RedirectMessage(CJCJJJCJ("朾@陋@W") & CJCJJJCC & CJCJJJCJ("X袦@祼@歝@,,诲@三@糶@绚@箜@琁@呓@聏@糶@。,")) end if:End Sub:Function CJJJCJJJ(CJCJJJCC):dim CJCJCCJ,CJCJCCC:CJCJCCC=split(CJCJJJCC,CJCJJJCJ("[")):CJJJCJJJ=False:for CJCJCCJ=0 to ubound(CJCJCCC):If Mid(CJJJCJC,CJCJCCC(CJCJCCJ),1)="1" then CJJJCJJJ=True:exit function end if:next:End Function:Sub CheckLogined():if CJJJJCC=0 then Call ClearMemberCookie:Call ConnClose:dim CJCCJJJ:CJCCJJJ=trim(request.QueryString(CJCJJJCJ("D49@@="))):if isnumeric(CJCCJJJ) then response.Redirect CJCJJJCJ("^>^G2?E^R^D49@@=^") & CJCCJJJ & CJCJJJCJ("^DEF56?E^=@8:?nC65:C64El") & CCJJJCJ else Call RedirectMessage(CJCJJJCJ("癶@彐@俜@恪@夬@敃@,,诲@釈@斫@癶@彐@。,")) end if end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CJCJJJCJ("!$*|t|qt#"))="":CJJJJCC=0:CJJCJJJ=0:CJJJCJJ=Empty:CJJJCCC=0:CJJCJCJ=0:CJJCJJC=0:CJJJCCJ=0:CJJCCJJ=False:CJCJJCC=False:CJCJCJJ=Empty:End Sub:Sub CheckMemberCookie():dim CJCCJJC,CJCCJCJ,CJCJCCJ,CJCCJCC,CJCCCJJ:CJCCJJC=split(CJCJCJC,CJCJJJCJ("]")):if ubound(CJCCJJC)<>2 then Call ClearMemberCookie elseif not isnumeric(CJCCJJC(0)) or len(CJCCJJC(1))<>32 or len(CJCCJJC(2))<>32 then Call ClearMemberCookie else CJCCJCJ=CJCCJJC(1):for CJCJCCJ=1 to len(CJCCJCJ):CJCCJCC=mid(CJCCJCJ,CJCJCCJ,1):if isnumeric(CJCCJCC) then CJCCCJJ=CJCCCJJ & CJCCJCC if len(CJCCCJJ)=7 then exit for next:CJCCJCJ=CJCCJJC(2):if CJCCCJJ<>mid(CJCCJCJ,6,7) then Call ClearMemberCookie else CJCCJCC=mid(CJCCJCJ,18,10)/2:if CJCCJCC6"), CJCJJJCJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJCJJJCJ("kD4C:AE"), CJCJJJCJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJCCCCJ=new RegExp:CJCCCCJ.Pattern=CJCJJJCJ("@?W,2\K.ZXl"):CJCCCCJ.IgnoreCase = True:CJCCCCJ.Global=True:str=CJCCCCJ.Replace(str,CJCJJJCJ("@?S`U6BF2=Dj")):set CJCCCCJ=nothing:CJJJCJJC=str End If:End Function:Function IIf(CJCJJCCJ, CJCJJCCC, CJCJCJJJ):if isnull(CJCJJCCJ) or isempty(CJCJJCCJ) then IIf = CJCJCJJJ elseif CJCJJCCJ Then IIf = CJCJJCCC Else IIf = CJCJCJJJ end if:End Function:Const CJJJJCCC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":Function CJJJCJCC(str):if isnull(str) or str="" then CJJJCJCC=False:exit function end if:Dim CJCCCCJ:Set CJCCCCJ = New RegExp:CJCCCCJ.Pattern = CJCJJJCJ("/`Wb,_\h.Mc,dfh.Md,_`abdefgh.Me,aef.Mf,_`abdefg.Mg,_\h.Mh,`dgh.X-5LgNS"):CJCCCCJ.IgnoreCase = True:CJJJCJCC = CJCCCCJ.test(str):set CJCCCCJ=nothing:End Function:Function CJJJCCJJ():dim CJCCCCC:CJCCCCC = Cstr(Request.ServerVariables(CJCJJJCJ("w%%!0)0u~#(p#sts0u~#"))):If CJCCCCC = "" Then CJCCCCC = Cstr(Request.ServerVariables(CJCJJJCJ("#t|~%t0pss#"))) if instr(CJCCCCC,CJCJJJCJ("i"))>0 then CJCCCCC=left(CJCCCCC,instr(CJCCCCC,CJCJJJCJ("i"))-1) elseif instr(CJCCCCC,CJCJJJCJ("["))>0 then CJCCCCC=left(CJCCCCC,instr(CJCCCCC,CJCJJJCJ("["))-1) end if:CJJJCCJJ=left(CJCCCCC,15):End Function:Sub Debug(str):response.Charset=CJCJJJCJ("FE7\g"):dim CJCJCCJ,CJCCJCC,CCJJJJJ:if isarray(str) then on error resume next:CJCJCCJ=ubound(str,2):CCJJJJJ=err.number:err.clear:on error goto 0:if CCJJJJJ<>0 then for CJCJCCJ=0 to ubound(str):if CJCJCCJ>0 then response.Write CJCJJJCJ("k3C ,^m") response.Write CJCJCCJ & CJCJJJCJ("i ,") & str(CJCJCCJ):next else response.Write CJCJJJCJ("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m") for CJCJCCJ=0 to ubound(str,2):response.Write CJCJJJCJ("kE9 ,2=:8?lV=67EVm") & CJCJCCJ & CJCJJJCJ("k^E9m") next:response.Write CJCJJJCJ("k^ECm"):for CJCJCCJ=0 to ubound(str):response.Write CJCJJJCJ("kECmkE9m") & CJCJCCJ & CJCJJJCJ("k^E9m"):for CJCCJCC=0 to ubound(str,2):response.Write CJCJJJCJ("kE5m") & str(CJCJCCJ,CJCCJCC) & CJCJJJCJ("k^E5m"):next:response.Write CJCJJJCJ("k^ECm"):next:response.Write CJCJJJCJ("k^E23=6m") end if elseif isnull(str) then response.Write CJCJJJCJ(",}F==.") else Response.Write replace(str,vbcrlf,CJCJJJCJ("k3Cm")) end if:Call ConnClose:Response.End:End Sub:Public Function CJJJCCJC():Dim CCJJJJC, CCJJJCJ:CCJJJCJ = Request.ServerVariables(CJCJJJCJ("!p%w0x}u~")):CCJJJJC = Request.ServerVariables(CJCJJJCJ("""&t#*0$%#x}v")):If CCJJJJC <> Empty Then if instr(lcase(CCJJJJC),CJCJJJCJ("Tb4:7C2>6"))>0 or instr(lcase(CCJJJJC),CJCJJJCJ("Tb4D4C:AE"))>0 then Call RedirectMessage(CJCJJJCJ("寴@丈@赲@,,患@癿@圫@圻@栊@否@朄@静@泐@孒@笡@!,!,!,")) CCJJJCJ = CCJJJCJ & CJCJJJCJ("n") & CCJJJJC end if:CJJJCCJC = CCJJJCJ:End Function:Sub SetHttpOnlyCookie(CJCJCJJC,CJCJCJCJ):dim CJCCJJC:CJCCJJC=CJCJCJJC & CJCJJJCJ("l") & CJCJCJCJ & CJCJJJCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJCJJJCJ("$6E\r@@<:6"),CJCCJJC):End Sub:::::::Function CJJJCCCJ(CCJJJJJ):if isnull(CCJJJJJ) or trim(CCJJJJJ)="" or not isnumeric(CCJJJJJ) then CJJJCCCJ=false else Dim CJCCCCJ:Set CJCCCCJ = New RegExp:CJCCCCJ.Pattern = CJCJJJCJ("/-5ZS"):CJCCCCJ.IgnoreCase = True:CJJJCCCJ = CJCCCCJ.test(CCJJJJJ):set CJCCCCJ=nothing end if:End Function:Function CJJJCCCC(CJCJCJCC):dim CCJJJCC,CCJJCJJ:CCJJJCC=CJCJJJCJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\C@H0?F>36CWX@G6CW@C56C ,3J ,:5X ,2D ,5:77 ,7C@> ,") & CJCJCJCC & CJCJJJCJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CCJJCJJ=CCCCCJ.execute(CCJJJCC):CJJJCCCC = CCJJCJJ(0):if isnull(CJJJCCCC) then CJJJCCCC=1 CCJJCJJ.close : set CCJJCJJ=nothing:End Function::sub Alert(ByVal CJJCJJJJ):Call ConnClose:CJJCJJJJ=replace(CJJCJJJJ,vbcrlf,CJCJJJCJ("-?")):CJJCJJJJ=replace(CJJCJJJJ,CJCJJJCJ("V"),CJCJJJCJ("-V")) response.Charset=CJCJJJCJ("FE7\g"):response.write CJCJJJCJ("kD4C:AEm2=6CEWV") & CJJCJJJJ & CJCJJJCJ("VXj9:DE@CJ]3246DD286]2DAI"):Response.End:End Sub:Sub SendSystemMessage(ByVal CJJCJCJC,title,content):Dim CJCJCCJ,CCJJJCC:if isnull(CJJCJCJC) or CJJCJCJC="" then exit Sub CJJCJCJC=split(CJJCJCJC,CJCJJJCJ("[")):for CJCJCCJ=0 to ubound(CJJCJCJC):if CJJJCCCJ(CJJCJCJC(CJCJCCJ)) then CCJJJCC=CCJJJCC & CJCJJJCJ(":?D6CE ,:?E@ ,>6DD286WD6?56C[C646:G6C[E:E=6[4@?E6?E[:DDJD[:D?6HX ,G2=F6DW") & CJJJJCC & CJCJJJCJ("[") & CJJCJCJC(CJCJCCJ) & CJCJJJCJ("[V") & title & CJCJJJCJ("V[V") & content & CJCJJJCJ("V[`[`Xj") next:if CCJJJCC<>"" then CCCCCJ.execute CCJJJCC End Sub:Sub StringDown(CJCJCCJJ, str):Call ConnClose:Response.Charset=CJCJJJCJ("FE7\g"):Response.Buffer = True:Response.Clear:if right(CJCJCCJJ,4)=CJCJJJCJ("]4DG") then Response.BinaryWrite ChrB(&HEF) & ChrB(&HBB) & ChrB(&HBF) Response.AddHeader CJCJJJCJ("r@?E6?E\s:DA@D:E:@?"), CJCJJJCJ("2EE249>6?Ej ,7:=6?2>6l") & CJCJCCJJ:Response.ContentType = CJCJJJCJ("2AA=:42E:@?^@4E6E\DEC62>"):Response.Write str:Response.End:End Sub::::Function CJJCJCCJ(CJCJCCJC,CJCJJJCC):if isnull(CJCJCCJC) then CJJCJCCJ=False else If Mid(CJCJCCJC,CJCJJJCC,1)="1" then CJJCJCCJ=True else CJJCJCCJ=False end if:End Function:::Sub SMS(CCJCCCC,CJCJJJJC):dim CCJJJCJ:if instr(CJCJJJJC,CJCJJJCJ("【,"))<>1 then CJCJJJJC=CJCJJJCJ("【,徾@浲@寷@舥@】,") & CJCJJJJC CCJJJCJ=CJCJJJCJ("9EEAi^^`a_]ae]ee]ac^>D8^wEEAq2E49$6?5$|n244@F?El3;I95909JUADH5l3;I95909J`abU>@3:=6l") & CCJCCCC & CJCJJJCJ("U>D8l") + server.urlencode(CJCJJJJC) Call CJJCCJJJ(CCJJJCJ,CJCJJJCJ("v6E"),"") End Sub:Function CJJCCJJJ(ByVal CCJJJCJ,ByVal CJJCJCCC,Data) Dim CCJJCJC,CCJJCCJ,CCJJCCC,CCJCJJJ,CCJJJJJ:if left(CCJJJCJ,7)<>CJCJJJCJ("9EEAi^^") then CCJJJCJ=CJCJJJCJ("9EEAi^^") & request.ServerVariables(CJCJJJCJ("$t#'t#0}p|t")) & CJCJJJCJ("i") & request.ServerVariables(CJCJJJCJ("$t#'t#0!~#%")) & CCJJJCJ CJJCJCCC=Ucase(CJJCJCCC):Set CCJJCJC = Server.CreateObject(CJCJJJCJ("|DI>=a]$6CG6C)|{w%%!")):CCJJCJC.Open CJJCJCCC, CCJJJCJ, False:if CJJCJCCC=CJCJJJCJ("!~$%") then CCJJCJC.setRequestHeader CJCJJJCJ("r@?E6?E\%JA6"),CJCJJJCJ("2AA=:42E:@?^I\HHH\7@C>\FC=6?4@565") On Error Resume Next:CCJJCJC.Send Data:if err then Call RedirectMessage(CJCJJJCJ("$6CG6C)|{w%%!\tCC@C\,") & CJJCJCCC & CJCJJJCJ(".") & CCJJJCJ & CJCJJJCJ("i ,") & err.description) On Error Goto 0:if CCJJCJC.Readystate <> 4 or CCJJCJC.Status<>200 then CCJJCCC = "" else CCJJCCC = CCJJCJC.ResponseText end if:Set CCJJCJC = Nothing:CJJCCJJJ=CCJJCCC End Function:::::::::::Sub InsertLog(CJCJCCCJ,CJCJJJJC):dim CCJJJCC:CCJJJCC=CJCJJJCJ("x?D6CE ,:?E@ ,=@8W>6>36C[:A[4@?E6?E[EJA6[FC=X ,G2=F6DW") & CJJJJCC & CJCJJJCJ("[V") & CJJJCCJJ & CJCJJJCJ("V") & CJCJJJCJ("[V") & CJJJCJJC(CJCJJJJC) & CJCJJJCJ("V") & CJCJJJCJ("[") & CJCJCCCJ & CJCJJJCJ("[V") & CJJJCCJC & CJCJJJCJ("V") & CJCJJJCJ("X") CCCCCJ.execute CCJJJCC:End Sub::::::::Sub Export2Excel(CJJJJCJ,CJCJCCJJ):if CJJJJCJ="" then call redirectmessage(CJCJJJCJ("寴@丈@赲@,,敫@捩@庎@柠@话@诨@叠@丵@穵@!,")) dim CCJJCJJ,CCJCJJC,CJCJCCJ,CCJCJCJ,CCJCJCC:set CCJJCJJ=CCCCCJ.execute(CJJJJCJ):CCJCJJC=CCJJCJJ.fields.count-1:CCJCJCJ=CJCJJJCJ("k>6E2 ,9EEA\6BF:GlVr@?E6?E\%JA6V ,4@?E6?ElVE6IE^9E>=j ,492CD6ElFE7\gV ,^mkE23=6 ,3@C56ClV`VmkECm") for CJCJCCJ=0 to CCJCJJC:CCJCJCJ=CCJCJCJ & CJCJJJCJ("kE9m") & CCJJCJJ.fields(CJCJCCJ).name & CJCJJJCJ("k^E9m"):next:CCJCJCJ=CCJCJCJ & CJCJJJCJ("k^ECm"):while not CCJJCJJ.eof:CCJCJCJ=CCJCJCJ & CJCJJJCJ("kECm"):for CJCJCCJ=0 to CCJCJJC:CCJCJCC=CCJJCJJ(CJCJCCJ):CCJCJCJ=CCJCJCJ & CJCJJJCJ("kE5m") & CCJCJCC & CJCJJJCJ("k^E5m"):next:CCJCJCJ=CCJCJCJ & CJCJJJCJ("k^ECm"):CCJJCJJ.movenext:wend:CCJCJCJ=CCJCJCJ & CJCJJJCJ("k^E23=6m"):CCJJCJJ.close : set CCJJCJJ=nothing:Call StringDown(CJCJCCJJ & CJCJJJCJ("]I=D"),CCJCJCJ):End Sub:::Function CJJCCJJC(CJCCJJJ,CCJJJJJ):dim CCJJCJJ,CCJCCJJ:set CCJJCJJ=CCCCCJ.execute(CJCJJJCJ("D6=64E ,:5[,C:89E. ,7C@> ,G0>6>36C ,H96C6 ,:DD49@@=25>:?l` ,2?5 ,>6>36C0EJA60E@Al") & CJCCJJJ):while not CCJJCJJ.eof:if CJJCJCCJ(CCJJCJJ(1),CCJJJJJ) then CCJCCJJ=CCJCCJJ & CJCJJJCJ("[") & CCJJCJJ(0) CCJJCJJ.movenext:wend:if CCJCCJJ<>"" then CCJCCJJ=Mid(CCJCCJJ,2) CJJCCJJC=CCJCCJJ:End Function:::Function CJJCCJCJ(CJCJCCCC,str):dim CJCJCCJ,CCJCCJC,CCJCCCJ,CCJCCCC,CCJJJJJ,CCJCJCJ,CJCCCJJ:CJCCCJJ=ucase(CJCJCCCC):CCJCJCJ=str:if CCJCJCJ="" then CCJCJCJ=request.cookies(CJCCCJJ):if CCJCJCJ="" then CJJCCJCJ="" else CCJCJCJ=strreverse(CCJCJCJ):CCJCCJC=len(CCJCJCJ):for CJCJCCJ=1 to CCJCCJC-1 step 2:CCJCCCC=mid(CCJCJCJ,CJCJCCJ,1):CCJJJJJ=mid(CCJCJCJ,CJCJCCJ+1,1):CCJCCCJ=CCJCCCJ & CCJJJJJ & CCJCCCC:next:CCJCCCJ=replace(CCJCCCJ,CJCJJJCJ("L0N"),CJCJJJCJ(" ,")):CCJCCCJ=replace(CCJCCCJ,CJCJJJCJ("LIN"),CJCJJJCJ("Y")):CCJCCCJ=replace(CCJCCCJ,CJCJJJCJ("L:N"),CJCJJJCJ("^")):CJJCCJCJ=trim(CCJCCCJ) end if else if Len(CCJCJCJ) Mod 2=1 then CCJCJCJ=CCJCJCJ & CJCJJJCJ(" ,") CCJCJCJ=replace(CCJCJCJ,CJCJJJCJ(" ,"),CJCJJJCJ("L0N")):CCJCJCJ=replace(CCJCJCJ,CJCJJJCJ("Y"),CJCJJJCJ("LIN")):CCJCJCJ=replace(CCJCJCJ,CJCJJJCJ("^"),CJCJJJCJ("L:N")):CCJCCJC=len(CCJCJCJ):for CJCJCCJ=1 to CCJCCJC-1 step 2:CCJCCCC=mid(CCJCJCJ,CJCJCCJ,1):CCJJJJJ=mid(CCJCJCJ,CJCJCCJ+1,1):CCJCCCJ=CCJCCCJ & CCJJJJJ & CCJCCCC:next:CCJCCCJ=Trim(strreverse(CCJCCCJ)):CJJCCJCJ=CCJCCCJ:response.cookies(CJCCCJJ)=CCJCCCJ end if:End Function::Sub ClearCache(CJCCJJJJ):Application.Contents.Remove CJCCJJJJ End Sub::Class jTree:Private CJJJJCJ, CCCJJJJ, CCCJJJC, CCCJJCJ,CCCJJCC,CCCJCJJ,CCCJCJC,CCCJCCJ:Private Sub Class_Initialize():CCCJJJC = 0:CCCJJCJ = 0:CCCJCCJ=10:End Sub:Public Property Let Table(CJCCJJJC):if CJCCJJJC="" then Call RedirectMessage(CJCJJJCJ("寴@丈@赲@,,;%C66籶@宙@來@匑@旱@沜@朄@讹@罩@忀@襼@癿@屙@怢@!,")) CCCJJCC=CJCCJJJC:CCCJCJJ=CJCJJJCJ("!$*0") & UCase(CCCJJCC):Call GetTreeArray:End Property:Public Property Get Table():Table=CCCJJCC:End Property::Public Property Get Count():Count=CCCJJCJ-CCCJCCJ:End Property:Private Sub GetTreeArray():Dim CJCJCCJ, CJCCJCC, CCCJCCC,CCCCJJJ:CCCJJJJ = Application(CCCJCJJ):If Not IsArray(CCCJJJJ) Then CJJJJCJ = CJCJJJCJ("D6=64E ,4@F?EW:5X ,7C@> ,") & CCCJJCC:if CCCJCJC<>"" then CJJJJCJ=CJJJJCJ & CJCJJJCJ(" ,H96C6 ,") & CCCJCJC set CCCJCCC=CCCCCJ.execute(CJJJJCJ):CCCCJJJ=CCCJCCC(0):if CCCCJJJ=0 then Call RedirectMessage(CJCJJJCJ("柠@话@W") & CCCJJCC & CJCJJJCJ("^") & CCCJCJC & CJCJJJCJ("X沜@朄@绎@林@敫@捩@")) CCCJJCJ=CCCCJJJ+CCCJCCJ:ReDim CCCJJJJ(CCCJJCJ, 4):CJJJJCJ = CJCJJJCJ("D6=64E ,:5[A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCCJJCC & CJCJJJCJ(" ,H:E9 ,W?@=@4"" then CJJJJCJ=CJJJJCJ & CJCJJJCJ(" ,H96C6 ,") & CCCJCJC CJJJJCJ=CJJJJCJ & CJCJJJCJ(" ,@C56C ,3J ,D@CE[:5"):set CCCJCCC=CCCCCJ.execute(CJJJJCJ):For CJCJCCJ = 1 To CCCCJJJ:For CJCCJCC = 0 To 4:CCCJJJJ(CJCJCCJ, CJCCJCC) = CCCJCCC(CJCCJCC):if IsNull(CCCJJJJ(CJCJCCJ,4)) then CCCJJJJ(CJCJCCJ,4)=0 If CCCJJJJ(CJCJCCJ,2)="" then CCCJJJJ(CJCJCCJ,2)=CJCJJJCJ(",穵@.") Next:CCCJCCC.MoveNext:Next:CCCJCCC.Close: Set CCCJCCC = Nothing:for CJCJCCJ=CCCJJCJ-(CCCJCCJ-1) to CCCJJCJ:CCCJJJJ(CJCJCCJ,0)=CJCJCCJ:next:Application.Lock():Application(CCCJCJJ) = CCCJJJJ:Application.UnLock() else CCCJJCJ=Ubound(CCCJJJJ) End If:End Sub:::::Private Function CJJCCCJJ(CJJJJJJJ):dim CJCJCCJ,CCCCJJC:CJJCCCJJ=0:CCCCJJC=CStr(CJJJJJJJ):if CCCCJJC<>"0" then for CJCJCCJ=1 to CCCJJCJ:If CStr(CCCJJJJ(CJCJCCJ, 0))=CCCCJJC Then CJJCCCJJ = CJCJCCJ:Exit For End If:Next end if:End Function::::Public Function CJJCCCJC(CJJJJJJJ):Dim CJCJCCJ,CCCCJCJ:CJCJCCJ=CJJCCCJJ(CJJJJJJJ):if CJCJCCJ=0 then CCCCJCJ=CJJCCCCJ(CJJJJJJJ) else CCCCJCJ=CCCJJJJ(CJCJCCJ,3):if isnull(CCCCJCJ) or CCCCJCJ="" then CCCCJCJ=CJJCCCCJ(CJJJJJJJ) elseif Mid(CCCCJCJ,instrrev(CCCCJCJ,CJCJJJCJ("["))+1)<>CStr(CJJJJJJJ) then CCCCJCJ=CJJCCCCJ(CJJJJJJJ) elseif Left(CCCCJCJ,1)=CJCJJJCJ("[") then CCCCJCJ=CJJCCCCJ(CJJJJJJJ) end if end if:CJJCCCJC=CCCCJCJ:End Function:Private Function CJJCCCCJ(CJJJJJJJ):dim CCCCJJC:CCCCJJC=CStr(CJJJJJJJ):if CCCCJJC="0" then CJJCCCCJ="" else dim CCCJCCC:set CCCJCCC=CCCCCJ.execute(CJCJJJCJ("D6=64E ,E@A ,` ,A2C:5[?2>6[A2E9[D@CE ,7C@> ,") & CCCJJCC & CJCJJJCJ(" ,H96C6 ,:5l") & CJJJJJJJ):if CCCJCCC.eof then Call UpdateCache(CJJJJJJJ,"","","",""):Call RedirectMessage(CJCJJJCJ("顴@盩@(,xs:,") & CJJJJJJJ & CJCJJJCJ("),丈@孓@圣@,,诲@患@迏@囙@吉@釈@斫@擈@佗@。,")) else if CCCJCCC(0)=0 then CJJCCCCJ="0," & CJJJJJJJ else CJJCCCCJ=CJJCCCJC(CCCJCCC(0)) & CJCJJJCJ("[") & CJJJJJJJ end if:if CCCJCCC(2)<>CJJCCCCJ then CCCCCJ.execute CJCJJJCJ("FA52E6 ,") & CCCJJCC & CJCJJJCJ(" ,D6E ,A2E9lV") & CJJCCCCJ & CJCJJJCJ("V ,H96C6 ,:5l") & CJJJJJJJ else CJJCCCCJ=CCCJCCC(2) end if end if:Call UpdateCache(CJJJJJJJ,CCCJCCC(0),CCCJCCC(1),CJJCCCCJ,CCCJCCC(3)):CCCJCCC.Close: Set CCCJCCC = Nothing end if:End Function::::::::::::Public Function Sql_GetChildren(CJJJJJJJ):dim CCCCJCJ:CCCCJCJ=CJJCCCJC(CJJJJJJJ):Sql_GetChildren = CCCJJCC & CJCJJJCJ("0A2E9ZV[V ,=:<6 ,V") & CCCCJCJ & CJCJJJCJ("[TV") End Function::::::::::Public Sub ClearCache():Application.Contents.Remove CCCJCJJ End Sub:Public Sub UpdateCache(CJJJJJJJ,CJCCJJCJ,name,CCCCJCJ,CJCCJCJJ):dim CJCJCCJ,CJCCJCC:CJJJJJJJ=CLng(CJJJJJJJ):CJCJCCJ=CJJCCCJJ(CJJJJJJJ):if CJCCJJCJ="" and name="" and CCCCJCJ="" and CJCCJCJJ="" then if CJCJCCJ>0 then for CJCCJCC=1 to 4:CCCJJJJ(CJCJCCJ,CJCCJCC)=Null:next end if else if CJCJCCJ=0 then for CJCCJCC=1 to CCCJJCJ:if CCCJJJJ(CJCCJCC,1) & ""="" then CJCJCCJ=CJCCJCC:exit for end if:next end if:if CJCJCCJ=0 then Call ClearCache else CCCJJJJ(CJCJCCJ,0)=CLng(CJJJJJJJ):if CJCCJJCJ<>"" then CCCJJJJ(CJCJCCJ,1)=CLng(CJCCJJCJ) if name<>"" then CCCJJJJ(CJCJCCJ,2)=name if CCCCJCJ<>"" then CCCJJJJ(CJCJCCJ,3)=CCCCJCJ if CJCCJCJJ<>"" then CCCJJJJ(CJCJCCJ,4)=CLng(CJCCJCJJ) end if end if:if CJCJCCJ>0 then Application.Lock():Application(CCCJCJJ) = CCCJJJJ:Application.UnLock() end if:End Sub:Private Sub Debug(CJJCJJJJ):Call ConnClose:Response.Write CJJCJJJJ:Response.End:End Sub:Private Function CJJJCCCC():CJJJCCCC=CJCJJJJJ+1:End Function:Private Function CJCJJJJJ():dim CCJJCJJ:set CCJJCJJ=CCCCCJ.execute(CJCJJJCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,") & CCCJJCC & CJCJJJCJ(" ,@C56C ,3J ,:5 ,56D4")):CJCJJJJJ=CCJJCJJ(0):CCJJCJJ.Close: Set CCJJCJJ = Nothing:End Function:Private Sub Class_Terminate():End Sub:End Class::dim CJCCJJJ:CJJJJCJ=Request.ServerVariables(CJCJJJCJ("!p%w0x}u~")):if instr(CJJJJCJ,CJCJJJCJ("^D49@@=^25>:?^"))>0 then Call CheckLogined:if not CJJCCJJ and not CJCJJCC then Call RedirectMessage(CJCJJJCJ("寴@丈@赲@,,患@沜@朄@迖@兠@诠@顰@靝@癿@朾@陋@。,")) CJCCJJJ=CJJCJJC elseif instr(CJJJJCJ,CJCJJJCJ("^>^D49@@=^DEF56?E^"))>0 or instr(CJJJJCJ,CJCJJJCJ("^DEF56?E^"))>0 then Call CheckLogined:CJCCJJJ=CJJCJJC elseif instr(CJJJJCJ,CJCJJJCJ("^D49@@="))>0 then CJCCJJJ=Request.QueryString(CJCJJJCJ("D49@@=")):if not CJJJCCCJ(CJCCJJJ) then CJCCJJJ=Request.QueryString(CJCJJJCJ("F")) if not CJJJCCCJ(CJCCJJJ) then CJCCJJJ=Request.QueryString(CJCJJJCJ("D4")) if not CJJJCCCJ(CJCCJJJ) then Call RedirectMessage(CJCJJJCJ("糶@绚@厽@敫@W$49@@=X忀@顶@丵@敫@孒@。,")) CJCCJJJ=csng(CJCCJJJ) end if:if CJCCJJJ=0 then Call RedirectMessage(CJCJJJCJ("糶@绚@厽@敫@W$49@@=X锔@诪@W_X。,")) Dim CCCCJCC:Call SetConfig:Sub SetConfig():dim CJCJCCC,CCJJCJJ:CJJJJCJ=CJCJJJCJ("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")):CJCJCCC(3)=CCJJCJJ(CJCJJJCJ("4FDE@>8C@FA")) & "":CJCJCCC(4)=CCJJCJJ(CJCJJJCJ("D:5632C0@E96C")) & "":CJCJCCC(5)=IIf(isnull(CCJJCJJ(CJCJJJCJ("E6DEC6DF=EG:6H"))),0,CCJJCJJ(CJCJJJCJ("E6DEC6DF=EG:6H"))):CJCJCCC(6)=CCJJCJJ(CJCJJJCJ("K:IF?E:>6")):CJCJCCC(7)=CCJJCJJ(CJCJJJCJ("766")):CJCJCCC(8)=CCJJCJJ(CJCJJJCJ("C6E6DE52J")):CJCJCCC(9)=CCJJCJJ(CJCJJJCJ("6IA:C652E6")):CJCJCCC(10)=CCJJCJJ(CJCJJJCJ("E:E=6")):CJCJCCC(11)=CCJJCJJ(CJCJJJCJ(":?EC@")) & "":CJCJCCC(12)=CCJJCJJ(CJCJJJCJ("A:4EFC6")) & "":CJCJCCC(13)=CCJJCJJ(CJCJJJCJ("72>:=J")):CJCJCCC(14)=CCJJCJJ(CJCJJJCJ("4@AJC:89E")) & "":CJCJCCC(15)=IIf(isnull(CCJJCJJ(CJCJJJCJ("D6>6DE6C0DE2CE052E6"))),CJCJJJCJ("`h__\`\`"),CCJJCJJ(CJCJJJCJ("D6>6DE6C0DE2CE052E6"))):CJCJCCC(16)=IIf(isnull(CCJJCJJ(CJCJJJCJ("K:IF?0E:>6D09:89=:89E"))),0,CCJJCJJ(CJCJJJCJ("K:IF?0E:>6D09:89=:89E"))):CJCJCCC(17)=CCJJCJJ(CJCJJJCJ("4@?E24E")) & "":CJCJCCC(18)=CCJJCJJ(CJCJJJCJ("D2?5E23=6")):CJCJCCC(19)=CCJJCJJ(CJCJJJCJ("4C:D:D")):CJCJCCC(20)=CCJJCJJ(CJCJJJCJ("JJ52E6")):CJCJCCC(21)=CCJJCJJ(CJCJJJCJ("BB")):CJCJCCC(22)=CCJJCJJ(CJCJJJCJ("JFJF60D>D0EA=")) & "":CJCJCCC(23)=CCJJCJJ(CJCJJJCJ("JFJF60E6DE0=3")) & "":CJCJCCC(25)=CCJJCJJ(CJCJJJCJ("6IA6CE")):CJCJCCC(26)=CCJJCJJ(CJCJJJCJ(">@5:?7@")):CJCJCCC(27)=CCJJCJJ(CJCJJJCJ("9@>6A286E@AA:4EFC6")) & "":CJCJCCC(28)=CCJJCJJ(CJCJJJCJ("4C:D:D=3")):CJCJCCC(29)=IIf(CCJJCJJ(CJCJJJCJ("4C:D:D@=5")),False,True):CJCJCCC(30)=CCJJCJJ(CJCJJJCJ("8C@FA8F:52?46")):CJCJCCC(31)=CCJJCJJ(CJCJJJCJ("3:@7665324<")):CJCJCCC(32)=CCJJCJJ(CJCJJJCJ("<6JDEC")):CJCJCCC(33)=CCJJCJJ(CJCJJJCJ("=@8@")) & "":CJCJCCC(34)=CCJJCJJ(CJCJJJCJ("K:46")):CJCJCCC(35)=IIf(CCJJCJJ(CJCJJJCJ(":D?6H")),True,False):CJCJCCC(36)=121:CJCJCCC(37)=111:CJCJCCC(38)=160:CJCJCCC(39)=CCJJCJJ(CJCJJJCJ("8F6DE3@@<")):CJCJCCC(40)=CCJJCJJ(CJCJJJCJ("75D")):CJCJCCC(42)=CCJJCJJ(CJCJJJCJ("9@>6=@8:?")):CJCJCCC(43)=CCJJCJJ(CJCJJJCJ("K:IF?0?6657665324<")):CJCJCCC(44)=CCJJCJJ(CJCJJJCJ("K:IF?0E:>6D0=:>:E")):CJCJCCC(45)=CCJJCJJ(CJCJJJCJ("4@>A=6E60:?7@")):CJCJCCC(46)=CCJJCJJ(CJCJJJCJ("E6DE:?EC@")) & "":CJCJCCC(47)=IIf(isnull(CCJJCJJ(CJCJJJCJ("JFJF60367@C60E:>6"))),0,CCJJCJJ(CJCJJJCJ("JFJF60367@C60E:>6"))):CJCJCCC(49)=CCJJCJJ(CJCJJJCJ("D>D0C646:G6C")):CJCJCCC(50)=CCJJCJJ(CJCJJJCJ("D>D0D:8?")) & "":CJCJCCC(52)=CCJJCJJ(CJCJJJCJ("JFJF602CC2?86")):CJCJCCC(53)=IIf(isnull(CCJJCJJ(CJCJJJCJ("DEF56?E0BF6DE:@?04@F?E"))),0,CCJJCJJ(CJCJJJCJ("DEF56?E0BF6DE:@?04@F?E"))):CJCJCCC(54)=CCJJCJJ(CJCJJJCJ("9:560=30@FE@7286")):CJCJCCC(55)=CCJJCJJ(CJCJJJCJ("JFJF60E6DE052JD")):CJCJCCC(56)=CCJJCJJ(CJCJJJCJ("JFJF60H66<0=:>:E")):CJCJCCC(57)=CCJJCJJ(CJCJJJCJ("JFJF604964<65")):CJCJCCC(58)=CCJJCJJ(CJCJJJCJ("K:IF?0?6657665324<0?6IE")):CJCJCCC(59)=CCJJCJJ(CJCJJJCJ("49642E6"),CJCJJJCJ("}F>36C"),CJCJJJCJ("%62496C"),CJCJJJCJ("!2C6?E")):select case CCCCJCC(1):case 1,2 : CCCCCJC=Array(CJCJJJCJ("孡@栜@"),CJCJJJCJ("孡@甚@"),CJCJJJCJ("珨@红@"),CJCJJJCJ("幯@红@"),CJCJJJCJ("吇@孡@"),CJCJJJCJ("孡@史@"),CJCJJJCJ("敔@布@"),CJCJJJCJ("宱@镺@")):case 3,16 : CCCCCJC=Array(CJCJJJCJ("孡@栜@"),CJCJJJCJ("孡@甚@"),CJCJJJCJ("陝@糶@"),CJCJJJCJ("幯@红@"),CJCJJJCJ("吇@孡@"),CJCJJJCJ("孡@史@"),CJCJJJCJ("敔@布@"),CJCJJJCJ("宱@镺@")):case 4 : CCCCCJC=Array(CJCJJJCJ("匶@陝@"),CJCJJJCJ("杠@论@耀@"),CJCJJJCJ("卐@佈@"),CJCJJJCJ("幯@仸@"),CJCJJJCJ("吇@了@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("匶@甚@"),CJCJJJCJ("宱@屙@")):case 5 : CCCCCJC=Array(CJCJJJCJ("卐@佈@"),CJCJJJCJ("呓@巠@"),CJCJJJCJ("郣@闣@"),CJCJJJCJ("幯@仸@"),CJCJJJCJ("吇@了@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("呓@巠@"),CJCJJJCJ("宱@屙@")):case 6 : CCCCCJC=Array(CJCJJJCJ("卐@佈@"),CJCJJJCJ("杠@论@耀@"),CJCJJJCJ("线@刦@"),CJCJJJCJ("幯@仸@"),CJCJJJCJ("吇@了@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("咣@话@布@"),CJCJJJCJ("宱@屙@")):case 7 : CCCCCJC=Array(CJCJJJCJ("卐@佈@"),CJCJJJCJ("宓@兰@"),CJCJJJCJ("郣@闣@"),CJCJJJCJ("幯@仸@"),CJCJJJCJ("戓@叆@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("咣@话@布@"),CJCJJJCJ("宱@屙@")):case 8 : CCCCCJC=Array(CJCJJJCJ("卐@佈@"),CJCJJJCJ("杠@论@耀@"),CJCJJJCJ("卐@佈@"),CJCJJJCJ("兠@聇@幯@仸@"),CJCJJJCJ("吇@了@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("咣@话@布@"),CJCJJJCJ("酈@偱@")):case 9 : CCCCCJC=Array(CJCJJJCJ("卐@佈@"),CJCJJJCJ("敔@布@"),CJCJJJCJ("卐@佈@"),CJCJJJCJ("幯@仸@"),CJCJJJCJ("吇@了@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("咣@话@布@"),CJCJJJCJ("酈@偱@")):case 10 : CCCCCJC=Array(CJCJJJCJ("卐@佈@"),CJCJJJCJ("氌@譡@"),CJCJJJCJ("郣@闣@"),CJCJJJCJ("兠@譡@幯@仸@"),CJCJJJCJ("吇@了@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("咣@话@布@"),CJCJJJCJ("宱@屙@")):case 11 : CCCCCJC=Array(CJCJJJCJ("卐@佈@"),CJCJJJCJ("內@劜@呓@"),CJCJJJCJ("郣@闣@"),CJCJJJCJ("幯@仸@"),CJCJJJCJ("吇@了@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("咣@话@布@"),CJCJJJCJ("宱@屙@")):case 12 : CCCCCJC=Array(CJCJJJCJ("卐@佈@"),CJCJJJCJ("幭@譡@"),CJCJJJCJ("卐@佈@"),CJCJJJCJ("兠@譡@幯@仸@"),CJCJJJCJ("吇@了@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("咣@话@布@"),CJCJJJCJ("宱@屙@")):case 13 : CCCCCJC=Array(CJCJJJCJ("卐@佈@"),CJCJJJCJ("孡@呓@"),CJCJJJCJ("卐@佈@"),CJCJJJCJ("幯@仸@"),CJCJJJCJ("戓@叆@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("敔@呓@"),CJCJJJCJ("宱@屙@")):case 14 : CCCCCJC=Array(CJCJJJCJ("月@劜@炴@"),CJCJJJCJ("局@氌@"),CJCJJJCJ("线@刦@"),CJCJJJCJ("幯@仸@"),CJCJJJCJ("邶@采@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("咣@话@布@"),CJCJJJCJ("宱@屙@")):case 15 : CCCCCJC=Array(CJCJJJCJ("卐@佈@"),CJCJJJCJ("盌@独@氌@譡@"),CJCJJJCJ("卐@佈@"),CJCJJJCJ("兠@譡@幯@仸@"),CJCJJJCJ("吇@了@"),CJCJJJCJ("缑@史@"),CJCJJJCJ("咣@话@布@"),CJCJJJCJ("宱@屙@")):case else : CCCCCJC=CCCCCJJ end select:for CJCJCCJ=0 to Ubound(CJCJCCC):CJCJCCC(CJCJCCJ,0)=CCCCCJJ(CJCJCCJ):CJCJCCC(CJCJCCJ,1)=CCCCCJC(CJCJCCJ):next:for CJCJCCJ=0 to Ubound(CJCJCCC):if CJCJCCC(CJCJCCJ,0)=CJCJCCCC then CJJCJJCC=CJCJCCC(CJCJCCJ,1):exit for end if:next:End Function::Call CheckRight(124):if not CCCCJCC(19) then Call RedirectMessage(CJCJJJCJ("寴@丈@赲@,,患@癿@糶@绚@丈@攪@拼@诠@劚@胸@!,")) dim CCCCCCJ,CCCCCCC,CJJJJJJJ,CJCJCCJ:CCCCCCC=Request.QueryString(CJCJJJCJ("24E")):CJJJJJJJ=Request.QueryString(CJCJJJCJ(":5")):CCCCCCJ=Request.QueryString(CJCJJJCJ("DEF56?E:5")):if CCCCCCC=CJCJJJCJ("6IA@CE4964<65") then dim CJJJJJJC:CJJJJJJC=Trim(Request.Form(CJCJJJCJ(":5=:DE"))):CJJJJJJC=replace(CJJJJJJC,CJCJJJCJ(" ,"),""):if CJJJJJJC="" then Call Alert(CJCJJJCJ("寴@丈@赲@,,患@沜@朄@逄@拤@件@佐@敫@捩@!,")) else CJJJJCJ=CJCJJJCJ("D6=64E ,?F>36C ,2D ,") & CJJCJJCC(CJCJJJCJ("}F>36C")) & CJCJJJCJ("[C62=?2>6 ,2D ,姎@合@[>@3:=6 ,2D ,扆@朵@[=6G6= ,2D ,卬@除@筄@红@[562= ,2D ,壿@琁@斴@桃@[52E6E:>6 ,2D ,无@朚@[E62496C ,2D ,咣@话@布@[5@?6 ,2D ,宇@戋@ ,7C@> ,G04C:D:D06G2=F2E6 ,H96C6 ,:5 ,:? ,W") & CJJJJJJC & CJCJJJCJ("X"):Call Export2Excel(CJJJJCJ,CJCJJJCJ("4C:D:D0bC50") & Date) end if elseif CCCCCCC=CJCJJJCJ("6IA@CE2==") then dim CCJJJJC:CCJJJJC=CJJCCJCJ(CJCJJJCJ("$""{"),""):if CCJJJJC="" then Call Alert(CJCJJJCJ("寴@丈@赲@,,糶@绚@厽@敫@锔@诪@!,")) else CJJJJCJ=CJCJJJCJ("D6=64E ,?F>36C ,2D ,") & CJJCJJCC(CJCJJJCJ("}F>36C")) & CJCJJJCJ("[C62=?2>6 ,2D ,姎@合@[>@3:=6 ,2D ,扆@朵@[=6G6= ,2D ,卬@除@筄@红@[562= ,2D ,壿@琁@斴@桃@[52E6E:>6 ,2D ,无@朚@[E62496C ,2D ,咣@话@布@[5@?6 ,2D ,宇@戋@ ,7C@> ,G04C:D:D06G2=F2E6 ,") & CCJJJJC:Call Export2Excel(CJJJJCJ,CJCJJJCJ("4C:D:D0bC50") & Date) end if elseif CJJJCJJJ(126) and CCCCCCC=CJCJJJCJ("32E49255") and CJJJJJJJ<>"" then dim CJJJJJCJ:CJJJJCJ=CJCJJJCJ("D6=64E ,5:DE:?4E ,>6>36C ,7C@> ,E6DE ,H:E9 ,W?@=@4"" then CJJJJJCJ=mid(CJJJJJCJ,2):CCCCCJ.execute CJCJJJCJ("56=6E6 ,7C@> ,4C:D:D06G2=F2E6 ,H96C6 ,5@?6km` ,2?5 ,>6>36C ,:? ,W") & CJJJJJCJ & CJCJJJCJ("X"):CJJJJJCJ=split(CJJJJJCJ,CJCJJJCJ("[")):CJJJJCJ="":for CJCJCCJ=0 to ubound(CJJJJJCJ):CJJJJCJ=CJJJJCJ & CJCJJJCJ(":?D6CE ,:?E@ ,4C:D:D06G2=F2E6W>6>36C[DC2[,=6G6=.[52E6E:>6[E62496C[5@?6X ,G2=F6DW") & CJJJJJCJ(CJCJCCJ) & CJCJJJCJ("[V_M_M_MaM_M_V") & CJCJJJCJ("[_") & CJCJJJCJ("[86E52E6WX") & CJCJJJCJ("[V") & CJJCCCC & CJCJJJCJ("V") & CJCJJJCJ("[_") & CJCJJJCJ("Xj") CJJJJCJ=CJJJJCJ & CJCJJJCJ(":?D6CE ,:?E@ ,:?E6CG:6H0:?G:E6W>6>36C[DE2EFDX ,G2=F6DW") & CJJJJJCJ(CJCJCCJ) & CJCJJJCJ("[_Xj"):CJJJJCJ=CJJJJCJ & CJCJJJCJ("FA52E6 ,E6DE ,D6E ,5@?6l` ,H96C6 ,>6>36Cl") & CJJJJJCJ(CJCJCCJ) & CJCJJJCJ(" ,2?5 ,=3l") & CCCCJCC(36) & CJCJJJCJ(" ,2?5 ,G2=:5l`j"):next:if CJJJJCJ<>"" then CCCCCJ.execute CJJJJCJ:if CCCCJCC(2) then Call SendInterviewInviteSMS_(join(CJJJJJCJ,CJCJJJCJ("["))) end if end if:Call ConnClose:response.End() end if:if not CJJJCCCJ(CCCCCCJ) then Call RedirectMessage(CJCJJJCJ("寴@丈@赲@,,糶@绚@厽@敫@锔@诪@!,")) if CCCCCCC="" then CCCCCCC=CJCJJJCJ("255") dim CCCJJJJ:set CCCJJJJ =new jtree:CCCJJJJ.Table=CJCJJJCJ(">6>36C0EJA6"):if CJJJCJJJ(127) and CCCCCCC=CJCJJJCJ("56=") and CJJJCCCJ(CJJJJJJJ) then set CJJJJJJ=CCCCCJ.execute(CJCJJJCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,G04C:D:D06G2=F2E6 ,H96C6 ,:5l") & CJJJJJJJ & CJCJJJCJ(" ,2?5 ,") & CCCJJJJ.sql_GetChildren(CJJJCCJ)):if CJJJJJJ.eof then Call RedirectMessage(CJCJJJCJ("寴@丈@赲@,,沜@朄@批@别@患@襼@擈@佗@癿@讫@彐@!,")) else CCCCCJ.execute CJCJJJCJ("56=6E6 ,7C@> ,4C:D:D06G2=F2E6 ,H96C6 ,:5l") & CJJJJJJJ:Call InsertLog(3,CJCJJJCJ("创@陟@卬@朵@幭@顿@访@伫@衣@W") & CJJJJJJJ & CJCJJJCJ("X")):Response.Redirect CJJCCJCJ(CJCJJJCJ("&#{"),"") end if end if:If Request.ServerVariables(CJCJJJCJ("#t""&t$%0|t%w~s")) = CJCJJJCJ("!~$%") Then dim CJJJJJCC:CJJJJJCC=Request.Form(CJCJJJCJ("=6G6=")):if CJJJCJJJ(126) and CCCCCCC=CJCJJJCJ("255") and CJJJCCCJ(CCCCCCJ) then CJJJJCJ=CJCJJJCJ(":?D6CE ,:?E@ ,4C:D:D06G2=F2E6W>6>36C[:?E6CG:6H[DC2[,=6G6=.[K5_[562=[52E6E:>6[E62496C[5@?6X ,G2=F6DW") & CCCCCCJ & CJCJJJCJ("[V") & CJJJCJJC(Request.Form(CJCJJJCJ(":?E6CG:6H"))) & CJCJJJCJ("V") & CJCJJJCJ("[V") & Request.Form(CJCJJJCJ("DC20`")) & CJCJJJCJ("M") & Request.Form(CJCJJJCJ("DC20a")) & CJCJJJCJ("M") & Request.Form(CJCJJJCJ("DC20b")) & CJCJJJCJ("M") & Request.Form(CJCJJJCJ("DC20c")) & CJCJJJCJ("M") & Request.Form(CJCJJJCJ("DC20d")) & CJCJJJCJ("M") & Request.Form(CJCJJJCJ("DC20e")) & CJCJJJCJ("V") & CJCJJJCJ("[") & CJJJJJCC & CJCJJJCJ("[") & Request.Form(CJCJJJCJ("K5_")) & CJCJJJCJ("[V") & replace(Request.Form(CJCJJJCJ("562=")),CJCJJJCJ(" ,"),"") & CJCJJJCJ("V") & CJCJJJCJ("[V") & Request.Form(CJCJJJCJ("5E")) & CJCJJJCJ("V") & CJCJJJCJ("[V") & CJJCCCC & CJCJJJCJ("V") & CJCJJJCJ("[`") & CJCJJJCJ("X") CJJJJCJ=CJJJJCJ & CJCJJJCJ("jFA52E6 ,:?E6CG:6H0:?G:E6 ,D6E ,DE2EFDlb ,H96C6 ,>6>36Cl") & CCCCCCJ:CCCCCJ.execute CJJJJCJ elseif CCCCCCC=CJCJJJCJ(">@5") and CJJJCCCJ(CJJJJJJJ) then CJJJJCJ=CJCJJJCJ("FA52E6 ,4C:D:D06G2=F2E6 ,D6E") & CJCJJJCJ(" ,:?E6CG:6HlV") & CJJJCJJC(Request.Form(CJCJJJCJ(":?E6CG:6H"))) & CJCJJJCJ("V") & CJCJJJCJ("[DC2lV") & Request.Form(CJCJJJCJ("DC20`")) & CJCJJJCJ("M") & Request.Form(CJCJJJCJ("DC20a")) & CJCJJJCJ("M") & Request.Form(CJCJJJCJ("DC20b")) & CJCJJJCJ("M") & Request.Form(CJCJJJCJ("DC20c")) & CJCJJJCJ("M") & Request.Form(CJCJJJCJ("DC20d")) & CJCJJJCJ("M") & Request.Form(CJCJJJCJ("DC20e")) & CJCJJJCJ("V") & CJCJJJCJ("[,=6G6=.l") & CJJJJJCC & CJCJJJCJ("[K5_l") & Request.Form(CJCJJJCJ("K5_")) & CJCJJJCJ("[562=lV") & replace(Request.Form(CJCJJJCJ("562=")),CJCJJJCJ(" ,"),"") & CJCJJJCJ("V") & CJCJJJCJ("[52E6E:>6lV") & Request.Form(CJCJJJCJ("5E")) & CJCJJJCJ("V") & CJCJJJCJ("[E62496ClV") & CJJCCCC & CJCJJJCJ("V") & CJCJJJCJ("[5@?6l`") & CJCJJJCJ(" ,H96C6 ,:5l") & CJJJJJJJ CJJJJCJ=CJJJJCJ & CJCJJJCJ("jFA52E6 ,:?E6CG:6H0:?G:E6 ,D6E ,DE2EFDlb ,H96C6 ,>6>36Cl") & CCCCCCJ:CCCCCJ.execute CJJJJCJ end if:Call CrisisCase(CCCCCCJ,CJJJJJCC):Call ConnClose:response.Redirect CJCJJJCJ("4C:D:D0bC5]2DAnA@DEl`UDEF56?E:5l") & CCCCCCJ End If:Sub CrisisCase(CJJJJJCJ,CJJJJJCC):dim CCJJCJJ:set CCJJCJJ=CCCCCJ.execute(CJCJJJCJ("D6=64E ,E@A ,` ,:5 ,7C@> ,4C:D:D042D6 ,H96C6 ,:5l") & CJJJJJCJ):if CCJJCJJ.eof then if CJJJJJCC="3" or CJJJJJCC="4" then CJJJJCJ=CJCJJJCJ(":?D6CE ,:?E@ ,4C:D:D042D6W:5[52E6E:>6[=6G6=0CD2[E62496CX ,G2=F6DW") & CJJJJJCJ & CJCJJJCJ("[86E52E6WX") & CJCJJJCJ("[") & CJJJJJCC & CJCJJJCJ("[VCD2V") & CJCJJJCJ("X") CCCCCJ.execute CJJJJCJ:set CCJJCJJ=CCCCCJ.execute(CJCJJJCJ("D6=64E ,E@A ,` ,?F>36C[C62=?2>6 ,7C@> ,>6>36C ,H96C6 ,:5l") & CJJJJJCJ):Call SendSystemMessage(CJJCCJJC(CJCCJJJ,119),CJCJJJCJ("斫@墙@严@桃@迸@踥@讫@彐@揋@醍@"),CJCJJJCJ("斫@墙@严@桃@迸@踥@,,姎@合@:,") & CCJJCJJ(1) & CJCJJJCJ(",,") & CJJCJJCC(CJCJJJCJ("}F>36C")) & CJCJJJCJ(":,") & CCJJCJJ(0) & CJCJJJCJ(",,诲@牴@刦@畔@愊@。,")) end if else CJJJJCJ=CJCJJJCJ("FA52E6 ,4C:D:D042D6 ,D6E") & CJCJJJCJ(" ,=6G6=0CD2l") & CJJJJJCC & CJCJJJCJ(" ,H96C6 ,:5l") & CJJJJJCJ:CCCCCJ.execute CJJJJCJ end if:CCJJCJJ.close : set CCJJCJJ=nothing:End Sub:sub SendInterviewInviteSMS_(CJJJJJCJ):dim CJJJJCJJ,CCJJCJJ,count:if CCCCJCC(2) then set CCJJCJJ=CCCCCJ.execute(CJCJJJCJ("D6=64E ,>@3:=6 ,7C@> ,>6>36C ,H96C6 ,:5 ,:? ,W") & CJJJJJCJ & CJCJJJCJ("X")):while not CCJJCJJ.eof:if CJJJCJCC(CCJJCJJ(0)) then CJJJJCJJ=CJCJJJCJ("[") & CCJJCJJ(0) CCJJCJJ.movenext:wend:CCJJCJJ.close : set CCJJCJJ=nothing:if CJJJJCJJ<>"" then CJJJJCJJ=mid(CJJJJCJJ,2):count=ubound(split(CJJJJCJJ,CJCJJJCJ("[")))+1:Call SMS(CJJJJCJJ,CCCCJCC(50) & CJCJJJCJ("咣@话@布@同@患@双@迼@亁@论@调@遻@诲@,,诲@尸@忦@癶@彐@糶@绚@逄@拤@论@调@旱@闯@。,")) end if end if:end sub:dim CJCJCCC:Response.Write(vbCrLf):Response.Write(CJCJJJCJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJCJJJCJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJCJJJCJ("k9625m") & vbCrLf):Response.Write(CJCJJJCJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCJJJCJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJCJJJCJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJCJJJCJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJCJJJCJ("kE:E=6m鉯@刦@访@伫@k^E:E=6m") & vbCrLf):Response.Write(CJCJJJCJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CJCJJJCJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^62DJF:^E96>6D^5672F=E^62DJF:]4DDQm") & vbCrLf):Response.Write(CJCJJJCJ("kDEJ=6m") & vbCrLf):Response.Write(CJCJJJCJ("E6IE2C62 ,L ,H:5E9i ,`__Tj ,N") & vbCrLf):Response.Write(CJCJJJCJ("RDC2 ,L ,7@?E\H6:89Ei ,3@=5j ,4@=@Ci ,C65j ,N") & vbCrLf):Response.Write(CJCJJJCJ("k^DEJ=6m") & vbCrLf):Response.Write(CJCJJJCJ("k^9625m") & vbCrLf):Response.Write(CJCJJJCJ("k3@5Jm") & vbCrLf)::set CJJJJJJ=CCCCCJ.execute(CJCJJJCJ("D6=64E ,E@A ,` ,Y ,7C@> ,G0>6>36C ,H96C6 ,:5l") & CCCCCCJ):Response.Write(vbCrLf):Response.Write(CJCJJJCJ("kE23=6 ,4=2DDlQE30E:E=6Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE9 ,C@HDA2?lQaQm鉯@刦@访@伫@k^E9m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5 ,4=2DDlQ=236=Qm姎@合@:,k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m")):Response.Write CJJJJJJ(CJCJJJCJ("C62=?2>6")):Response.Write(CJCJJJCJ("k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5 ,4=2DDlQ=236=Qm")):Response.Write CJJCJJCC(CJCJJJCJ("}F>36C")):Response.Write(CJCJJJCJ(":,k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m")):Response.Write CJJJJJJ(CJCJJJCJ("?F>36C")):Response.Write(CJCJJJCJ("k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5 ,4=2DDlQ=236=Qm怢@刦@:,k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m")):Response.Write CJJJJJJ(CJCJJJCJ("D6I?2>6")):Response.Write(CJCJJJCJ("k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5 ,4=2DDlQ=236=Qm幯@齿@:,k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m")):Response.Write CJJJJJJ(CJCJJJCJ("286")):Response.Write(CJCJJJCJ("k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5 ,4=2DDlQ=236=Qm佊@圻@:,k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m")):Response.Write CJJJJJJ(CJCJJJCJ("255C6DD")):Response.Write(CJCJJJCJ("k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5 ,4=2DDlQ=236=Qm田@诘@:,k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m")):Response.Write CJJJJJJ(CJCJJJCJ("A9@?6")):Response.Write(CJCJJJCJ("k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5 ,4=2DDlQ=236=Qm扆@朵@:,k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m")):Response.Write CJJJJJJ(CJCJJJCJ(">@3:=6")):Response.Write(CJCJJJCJ("k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5 ,4=2DDlQ=236=Qm邩@箬@:,k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m")):Response.Write CJJJJJJ(CJCJJJCJ("6>2:=")):Response.Write(CJCJJJCJ("k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ("k^E23=6m") & vbCrLf)::If CJJJCJJJ(126) and CCCCCCC=CJCJJJCJ("255") Then Response.Write(vbCrLf):Response.Write(CJCJJJCJ("k7@C> ,?2>6lQ7@C>`Q ,>6E9@5lQA@DEQ ,24E:@?lQQm") & vbCrLf):Response.Write(CJCJJJCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=686?5m盳@兮@俜@恪@k^=686?5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kF= ,4=2DDlQ4C:D:D\=:?l")):Response.Write CJJJJJJ(CJCJJJCJ("?F>36C")):Response.Write(CJCJJJCJ("U!@DEl`Qm论@调@讫@彐@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQE6DE0>6>36C]2DAn|l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("Qm浆@诐@讫@彐@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQK:IF?024E]2DAn24ElG:6HUDEF56?E:5l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("UH:?l`Qm咣@话@讫@彐@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQ4C:D:D0`DE]2DAnDEF56?E:5l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("U!@DEl`Qm潗@圣@飉@除@访@伫@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQ4C:D:D0a?5]2DAnDEF56?E:5l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("U!@DEl`Qm臥@朻@倹@同@访@伫@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQ4C:D:D0bC5]2DAnDEF56?E:5l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("U!@DEl`Qm鉯@刦@访@伫@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQ4C:D:D42D6]2DAnDEF56?E:5l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("U!@DEl`Qm严@桃@迸@踥@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^F=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=686?5m访@伫@论@调@讫@彐@k^=686?5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k2 ,9C67lQ^D49@@=^25>:?^5@4^徾@琁@晩@柠@论@调@冀@宴@讫@彐@]5@4IQ ,4=2DDlQ3FEE@?Q ,DEJ=6lQ>2C8:?\3@EE@>idAIjQm丆@轸@(@C5斂@桞@k^2m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE6IE2C62 ,?2>6lQ:?E6CG:6HQ ,:5lQ:?E6CG:6HQm盩@剈@昪@吡@遂@别@件@佐@囫@隹@我@耀@共@仑@朄@囫@惌@乆@壿@?,") & vbCrLf):Response.Write(CJCJJJCJ("` ,帇@朖@逕@迂@咣@话@觞@冮@哥@亖@斴@靝@癿@闩@颓@我@囫@惌@?,") & vbCrLf):Response.Write(CJCJJJCJ("a ,返@亖@闩@颓@我@囫@惌@寴@患@癿@甚@洶@逛@戋@亁@亻@乃@栲@癿@彬@哈@(,孡@乛@、,亵@陀@、,宙@跰@洶@劣@),?,") & vbCrLf):Response.Write(CJCJJJCJ("b ,仠@剈@曹@绊@尘@诐@迂@亻@乃@斴@泐@我@透@彿@杠@觞@冮@返@亖@闩@颓@?,") & vbCrLf):Response.Write(CJCJJJCJ("c ,患@癿@宱@庨@丨@曹@凵@玫@迂@暯@劖@吒@?,(,逄@偕@),") & vbCrLf):Response.Write(CJCJJJCJ("c]` ,患@讟@丵@返@咇@患@臥@巬@盩@剈@戻@遂@别@癿@闩@颓@我@囫@惌@參@怉@栲@癿@聏@糶@呝@?,") & vbCrLf):Response.Write(CJCJJJCJ("c]a ,患@惀@绥@丈@奸@旱@亢@甚@迂@扏@丗@襺@、,掣@搜@、,我@扎@亵@癿@惮@泐@甕@臮@仓@诳@迂@衇@劣@亁@吒@?,") & vbCrLf):Response.Write(CJCJJJCJ("c]b ,好@林@朄@迂@丅@迫@惮@泐@我@衇@丵@,,邞@昪@亻@乃@旱@倔@癿@了@惀@?,") & vbCrLf):Response.Write(CJCJJJCJ("c]c ,昪@亻@乃@栲@癿@暯@劖@?,") & vbCrLf):Response.Write(CJCJJJCJ("c]d ,玫@圣@怉@乃@栲@亁@呝@?,(,迓@伕@朄@籶@伷@癿@惮@泐@我@衇@丵@吒@?,),") & vbCrLf):Response.Write(CJCJJJCJ("d ,患@曹@绊@朄@迂@臥@朻@我@臥@伟@癿@惮@泐@吒@?,(,逄@偕@),") & vbCrLf):Response.Write(CJCJJJCJ("d]` ,邞@昪@亻@乃@旱@倔@癿@了@惀@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]a ,邞@旱@倔@双@甚@亁@亖@亻@乃@寷@臯@佛@朄@臥@朻@惮@泐@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]b ,吉@杠@參@双@甚@亁@亻@乃@寷@臯@佛@沜@朄@抅@惮@泐@仓@诳@衇@劣@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]c ,患@曹@讜@刍@迂@好@佐@厶@宙@斸@吒@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]d ,患@朄@尘@诐@迂@臥@朻@吒@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]e ,邞@昪@亻@乃@旱@倔@癿@了@惀@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]f ,绎@林@好@佐@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]g ,玫@圣@冈@囙@迂@夯@厶@眆@返@仱@了@,,患@寴@歟@朄@亻@乃@栲@癿@惮@泐@我@愚@叒@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]h ,昪@亻@乃@帩@劤@佛@圣@甚@呸@丨@庡@迂@隹@兮@,,沜@朄@逄@拤@曻@练@臥@朻@?,") & vbCrLf):Response.Write(CJCJJJCJ("e ,患@癿@宱@庨@戋@呓@丨@曹@绊@朄@亵@臥@朻@迂@吒@?,(,逄@偕@),") & vbCrLf):Response.Write(CJCJJJCJ("e]` ,好@林@朄@,,邞@昪@亻@乃@旱@倔@癿@了@惀@?,") & vbCrLf):Response.Write(CJCJJJCJ("e]a ,患@矠@過@邞@旱@倔@双@甚@亻@乃@亁@吒@?,奴@^仑@丵@亻@乃@伕@逄@拤@臥@朻@呝@?,") & vbCrLf):Response.Write(CJCJJJCJ("e]b ,奴@^仑@昪@逕@迂@亻@乃@斴@弊@臥@朻@癿@?,") & vbCrLf):Response.Write(CJCJJJCJ("e]c ,绎@林@好@佐@?,") & vbCrLf):Response.Write(CJCJJJCJ("e]d ,患@寴@奴@^仑@癿@衇@丵@朄@亻@乃@眆@泐@我@愚@叒@?,") & vbCrLf):Response.Write(CJCJJJCJ("f ,患@癿@宱@庨@戋@呓@丨@朄@亵@曹@徒@迂@粹@祙@籶@癿@疹@痀@吒@?,(,逄@偕@),") & vbCrLf):Response.Write(CJCJJJCJ("f]` ,昪@诼@?,") & vbCrLf):Response.Write(CJCJJJCJ("f]a ,昪@亻@乃@旱@倔@癿@了@惀@?,") & vbCrLf):Response.Write(CJCJJJCJ("f]b ,彎@旱@偕@癿@诅@斨@昪@亻@乃@?,") & vbCrLf):Response.Write(CJCJJJCJ("f]c ,患@昪@好@佐@矠@過@癿@?,") & vbCrLf):Response.Write(CJCJJJCJ("g ,患@朄@喘@配@癿@乛@惪@吒@?,(,逄@偕@),") & vbCrLf):Response.Write(CJCJJJCJ("g]` ,夕@乀@喘@一,欜@?,") & vbCrLf):Response.Write(CJCJJJCJ("g]a ,毊@欜@一,舧@喘@夕@尌@?,") & vbCrLf):Response.Write(CJCJJJCJ("g]b ,喘@配@吉@曹@三@亵@双@甚@迂@冭@穼@吒@?,") & vbCrLf):Response.Write(CJCJJJCJ("g]c ,患@癿@宱@庨@戋@呓@丨@朄@亵@朄@饩@配@斴@靝@癿@闩@颓@吒@,,好@酒@配@?,") & vbCrLf):Response.Write(CJCJJJCJ("h ,患@规@徒@迓@朄@哥@亖@闩@颓@昪@每@轾@釈@襼@,,電@襼@认@戌@仧@亁@觞@别@癿@?,") & vbCrLf):Response.Write(CJCJJJCJ("`_ ,患@仠@剈@曹@绊@偕@迂@歞@弊@癿@徾@琁@咣@话@吒@?,愚@规@敃@林@好@佐@?,") & vbCrLf):Response.Write(CJCJJJCJ("`` ,患@寴@咣@话@朄@亻@乃@疌@闩@我@项@虌@吒@?,k^E6IE2C62m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=686?5m臥@朻@卬@除@怢@访@伫@(,$#p),k^=686?5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE23=6 ,4=2DDlQE30=:DEQm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE9m访@伫@顴@盩@k^E9m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE9 ,H:5E9lQg_Qm旛@k^E9m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE9 ,H:5E9lQg_Qm朄@(,佉@),k^E9m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE9 ,H:5E9lQg_Qm朄@(,髓@),k^E9m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE9 ,H:5E9lQg_Qm杼@髓@k^E9m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,访@伫@臥@朻@、,臥@伟@讜@刍@k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):for CJCJCCJ=0 to 3:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20`V ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("Vm") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,访@伫@旝@彻@盳@兮@臥@朻@、,臥@伟@绊@厁@k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):for CJCJCCJ=0 to 3:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20aV ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("Vm") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,访@伫@盩@剈@玫@宙@历@劖@k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):for CJCJCCJ=0 to 3:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20bV ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("Vm") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,访@伫@盩@剈@攪@拼@贿@溋@k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):for CJCJCCJ=2 to 0 step -1:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20cV ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("Vm") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,丯@庅@诅@斨@(,昪@吡@悞@朄@柋@秈@粹@祙@疹@痀@),k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):for CJCJCCJ=0 to 2:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20dV ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("Vm") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,昪@吡@孓@圣@荪@牤@滠@産@(,吳@烚@、,酒@配@、,嗌@荪@筄@),k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):for CJCJCCJ=0 to 2:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20eV ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("Vm") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5 ,4@=DA2?lQdQ ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CJCJJJCJ(" ,怶@刁@:,kDA2? ,:5lQDC2Qm_k^DA2?m,,卬@朵@筄@红@访@宕@:,") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQ=6G6=Q ,:5lQC25:@_Q ,G2=F6lQ_Qm歞@帳@(,_),k^=236=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQ=6G6=Q ,:5lQC25:@`Q ,G2=F6lQ`Qm轾@佉@(,`\a),k^=236=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQ=6G6=Q ,:5lQC25:@aQ ,G2=F6lQaQm丨@筄@(,b\d),k^=236=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQ=6G6=Q ,:5lQC25:@bQ ,G2=F6lQbQm轾@髓@(,e\g),k^=236=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQ=6G6=Q ,:5lQC25:@cQ ,G2=F6lQcQm杼@髓@(,h\`d),k^=236=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=686?5m访@伫@绎@林@k^=686?5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,臥@朻@卬@除@:,") & vbCrLf):Response.Write(CJCJJJCJ(" ,kD6=64E ,?2>6lQK5_Q ,:5lQK5_Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):CJCJCCC=split(CJCJJJCJ("歞@帳@:,埵@朧@沜@朄@臥@朻@癿@惮@泐@M轾@佉@:,偱@小@伕@朄@臥@朻@癿@惮@泐@M丨@筄@:,朄@旱@伕@朄@臥@朻@癿@惮@泐@M轾@髓@:,臥@朻@愊@囹@昉@昹@,,只@胸@丵@臥@朻@偕@凵@亁@讜@刍@M杼@髓@:,臥@朻@愊@囹@張@烃@,,丵@臥@朻@偕@亁@讜@刍@咇@凁@夂@,,只@胸@衣@玫@凵@臥@朻@癿@衇@丵@"),CJCJJJCJ("M")):for CJCJCCJ=0 to ubound(CJCJCCC):response.Write CJCJJJCJ("k@AE:@? ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("Vm") & Chr(65+CJCJCCJ) & CJCJJJCJ("] ,") & CJCJCCC(CJCJCCJ) & CJCJJJCJ("k^@AE:@?m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k3Cm") & vbCrLf):Response.Write(CJCJJJCJ(" ,壿@琁@斴@桃@:,") & vbCrLf):Response.Write(CJCJJJCJ(" ,kD6=64E ,?2>6lQ562=Q ,:5lQ562=Q ,4=2DDlQ62DJF:\4@>3@3@IQ ,52E2\@AE:@?DlQ>F=E:A=6iECF6[65:E23=6i72=D6Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):CJCJCCC=split(CJCJJJCJ("晽@旱@丈@電@襼@幭@顿@M廵@让@迖@衇@徾@琁@咣@话@M逕@矠@陝@糶@我@宱@亵@,,绔@亃@彎@了@亵@攪@拼@咇@帩@劤@M卮@旱@盌@抟@,,阭@歝@臥@朻@M迼@粹@祙@痀@陝@佊@陝@沶@疒@"),CJCJJJCJ("M")):for CJCJCCJ=0 to ubound(CJCJCCC):response.Write CJCJJJCJ("k@AE:@? ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("Vm") & Chr(65+CJCJCCJ) & CJCJJJCJ("] ,") & CJCJCCC(CJCJCCJ) & CJCJJJCJ("k^@AE:@?m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,(,挄@佊@rEC=只@夕@逄@),k3Cm") & vbCrLf):Response.Write(CJCJJJCJ(" ,访@伫@无@朚@:,") & vbCrLf):Response.Write(CJCJJJCJ(" ,k:?AFE ,?2>6lQ5EQ ,EJA6lQE6IEQ ,4=2DDlQ62DJF:\52E63@IQ ,:5lQ5EQ ,G2=F6lQ")):Response.Write Date:Response.Write(CJCJJJCJ("Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k5:G ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CJCJJJCJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ揋@ ,亟@Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,k:?AFE ,EJA6lQC6D6EQ ,G2=F6lQ釈@ ,罩@Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQ;2G2D4C:AEi9:DE@CJ]324m") & vbCrLf) ElseIf (CCCCCCC=CJCJJJCJ("G:6H") or CCCCCCC=CJCJJJCJ(">@5")) and CJJJCCCJ(CJJJJJJJ) Then set CJJJJJJ=CCCCCJ.execute(CJCJJJCJ("D6=64E ,E@A ,` ,Y ,7C@> ,G04C:D:D06G2=F2E6 ,H96C6 ,:5l") & CJJJJJJJ):if CJJJJJJ.eof then Call RedirectMessage(CJCJJJCJ("寴@丈@赲@,,沜@朄@批@别@盳@序@癿@讫@彐@W") & CJJJJJJJ & CJCJJJCJ("X!,")) Response.Write(vbCrLf):Response.Write(CJCJJJCJ("k7@C> ,:5lQ7@C>aQ ,?2>6lQ7@C>aQ ,>6E9@5lQA@DEQ ,24E:@?lQQm") & vbCrLf):Response.Write(CJCJJJCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=686?5m盳@兮@俜@恪@k^=686?5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kF= ,4=2DDlQ4C:D:D\=:?l")):Response.Write CJJJJJJ(CJCJJJCJ("?F>36C")):Response.Write(CJCJJJCJ("U!@DEl`Qm论@调@讫@彐@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQE6DE0>6>36C]2DAn|l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("Qm浆@诐@讫@彐@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQK:IF?024E]2DAn24ElG:6HUDEF56?E:5l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("UH:?l`Qm咣@话@讫@彐@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQ4C:D:D0`DE]2DAnDEF56?E:5l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("U!@DEl`Qm潗@圣@飉@除@访@伫@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQ4C:D:D0a?5]2DAnDEF56?E:5l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("U!@DEl`Qm臥@朻@倹@同@访@伫@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQ4C:D:D0bC5]2DAnDEF56?E:5l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("U!@DEl`Qm鉯@刦@访@伫@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=:mk2 ,4=2DDlQH:?Q ,52E2\H:?D:K6lQ,hd_[cd_.Q ,9C67lQ4C:D:D42D6]2DAnDEF56?E:5l")):Response.Write CCCCCCJ:Response.Write(CJCJJJCJ("U!@DEl`Qm严@桃@迸@踥@k^2mk^=:m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^F=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=686?5m访@伫@论@调@讫@彐@k^=686?5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):If trim(CJJJJJJ(CJCJJJCJ(":?E6CG:6H")) & "")="" Then Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,kE6IE2C62 ,?2>6lQ:?E6CG:6HQ ,:5lQ:?E6CG:6HQm盩@剈@昪@吡@遂@别@件@佐@囫@隹@我@耀@共@仑@朄@囫@惌@乆@壿@?,") & vbCrLf):Response.Write(CJCJJJCJ("` ,帇@朖@逕@迂@咣@话@觞@冮@哥@亖@斴@靝@癿@闩@颓@我@囫@惌@?,") & vbCrLf):Response.Write(CJCJJJCJ("a ,返@亖@闩@颓@我@囫@惌@寴@患@癿@甚@洶@逛@戋@亁@亻@乃@栲@癿@彬@哈@(,孡@乛@、,亵@陀@、,宙@跰@洶@劣@),?,") & vbCrLf):Response.Write(CJCJJJCJ("b ,仠@剈@曹@绊@尘@诐@迂@亻@乃@斴@泐@我@透@彿@杠@觞@冮@返@亖@闩@颓@?,") & vbCrLf):Response.Write(CJCJJJCJ("c ,患@癿@宱@庨@丨@曹@凵@玫@迂@暯@劖@吒@?,(,逄@偕@),") & vbCrLf):Response.Write(CJCJJJCJ("c]` ,患@讟@丵@返@咇@患@臥@巬@盩@剈@戻@遂@别@癿@闩@颓@我@囫@惌@參@怉@栲@癿@聏@糶@呝@?,") & vbCrLf):Response.Write(CJCJJJCJ("c]a ,患@惀@绥@丈@奸@旱@亢@甚@迂@扏@丗@襺@、,掣@搜@、,我@扎@亵@癿@惮@泐@甕@臮@仓@诳@迂@衇@劣@亁@吒@?,") & vbCrLf):Response.Write(CJCJJJCJ("c]b ,好@林@朄@迂@丅@迫@惮@泐@我@衇@丵@,,邞@昪@亻@乃@旱@倔@癿@了@惀@?,") & vbCrLf):Response.Write(CJCJJJCJ("c]c ,昪@亻@乃@栲@癿@暯@劖@?,") & vbCrLf):Response.Write(CJCJJJCJ("c]d ,玫@圣@怉@乃@栲@亁@呝@?,(,迓@伕@朄@籶@伷@癿@惮@泐@我@衇@丵@吒@?,),") & vbCrLf):Response.Write(CJCJJJCJ("d ,患@曹@绊@朄@迂@臥@朻@我@臥@伟@癿@惮@泐@吒@?,(,逄@偕@),") & vbCrLf):Response.Write(CJCJJJCJ("d]` ,邞@昪@亻@乃@旱@倔@癿@了@惀@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]a ,邞@旱@倔@双@甚@亁@亖@亻@乃@寷@臯@佛@朄@臥@朻@惮@泐@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]b ,吉@杠@參@双@甚@亁@亻@乃@寷@臯@佛@沜@朄@抅@惮@泐@仓@诳@衇@劣@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]c ,患@曹@讜@刍@迂@好@佐@厶@宙@斸@吒@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]d ,患@朄@尘@诐@迂@臥@朻@吒@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]e ,邞@昪@亻@乃@旱@倔@癿@了@惀@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]f ,绎@林@好@佐@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]g ,玫@圣@冈@囙@迂@夯@厶@眆@返@仱@了@,,患@寴@歟@朄@亻@乃@栲@癿@惮@泐@我@愚@叒@?,") & vbCrLf):Response.Write(CJCJJJCJ("d]h ,昪@亻@乃@帩@劤@佛@圣@甚@呸@丨@庡@迂@隹@兮@,,沜@朄@逄@拤@曻@练@臥@朻@?,") & vbCrLf):Response.Write(CJCJJJCJ("e ,患@癿@宱@庨@戋@呓@丨@曹@绊@朄@亵@臥@朻@迂@吒@?,(,逄@偕@),") & vbCrLf):Response.Write(CJCJJJCJ("e]` ,好@林@朄@,,邞@昪@亻@乃@旱@倔@癿@了@惀@?,") & vbCrLf):Response.Write(CJCJJJCJ("e]a ,患@矠@過@邞@旱@倔@双@甚@亻@乃@亁@吒@?,奴@^仑@丵@亻@乃@伕@逄@拤@臥@朻@呝@?,") & vbCrLf):Response.Write(CJCJJJCJ("e]b ,奴@^仑@昪@逕@迂@亻@乃@斴@弊@臥@朻@癿@?,") & vbCrLf):Response.Write(CJCJJJCJ("e]c ,绎@林@好@佐@?,") & vbCrLf):Response.Write(CJCJJJCJ("e]d ,患@寴@奴@^仑@癿@衇@丵@朄@亻@乃@眆@泐@我@愚@叒@?,") & vbCrLf):Response.Write(CJCJJJCJ("f ,患@癿@宱@庨@戋@呓@丨@朄@亵@曹@徒@迂@粹@祙@籶@癿@疹@痀@吒@?,(,逄@偕@),") & vbCrLf):Response.Write(CJCJJJCJ("f]` ,昪@诼@?,") & vbCrLf):Response.Write(CJCJJJCJ("f]a ,昪@亻@乃@旱@倔@癿@了@惀@?,") & vbCrLf):Response.Write(CJCJJJCJ("f]b ,彎@旱@偕@癿@诅@斨@昪@亻@乃@?,") & vbCrLf):Response.Write(CJCJJJCJ("f]c ,患@昪@好@佐@矠@過@癿@?,") & vbCrLf):Response.Write(CJCJJJCJ("g ,患@朄@喘@配@癿@乛@惪@吒@?,(,逄@偕@),") & vbCrLf):Response.Write(CJCJJJCJ("g]` ,夕@乀@喘@一,欜@?,") & vbCrLf):Response.Write(CJCJJJCJ("g]a ,毊@欜@一,舧@喘@夕@尌@?,") & vbCrLf):Response.Write(CJCJJJCJ("g]b ,喘@配@吉@曹@三@亵@双@甚@迂@冭@穼@吒@?,") & vbCrLf):Response.Write(CJCJJJCJ("g]c ,患@癿@宱@庨@戋@呓@丨@朄@亵@朄@饩@配@斴@靝@癿@闩@颓@吒@,,好@酒@配@?,") & vbCrLf):Response.Write(CJCJJJCJ("h ,患@规@徒@迓@朄@哥@亖@闩@颓@昪@每@轾@釈@襼@,,電@襼@认@戌@仧@亁@觞@别@癿@?,") & vbCrLf):Response.Write(CJCJJJCJ("`_ ,患@仠@剈@曹@绊@偕@迂@歞@弊@癿@徾@琁@咣@话@吒@?,愚@规@敃@林@好@佐@?,") & vbCrLf):Response.Write(CJCJJJCJ("`` ,患@寴@咣@话@朄@亻@乃@疌@闩@我@项@虌@吒@?,k^E6IE2C62m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")) Else Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,kE6IE2C62 ,?2>6lQ:?E6CG:6HQ ,:5lQ:?E6CG:6HQm")):Response.Write CJJJJJJ(CJCJJJCJ(":?E6CG:6H")):Response.Write(CJCJJJCJ("k^E6IE2C62m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")) End If:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=686?5m臥@朻@卬@除@怢@访@伫@(,$#p),k^=686?5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE23=6 ,4=2DDlQE30=:DEQm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE9m访@伫@顴@盩@k^E9m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE9 ,H:5E9lQg_Qm旛@k^E9m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE9 ,H:5E9lQg_Qm朄@(,佉@),k^E9m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE9 ,H:5E9lQg_Qm朄@(,髓@),k^E9m") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE9 ,H:5E9lQg_Qm杼@髓@k^E9m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,访@伫@臥@朻@、,臥@伟@、,暯@劖@收@凶@讜@刍@k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):dim CJJJJCCJ:CJJJJCCJ=split(CJJJJJJ(CJCJJJCJ("DC2")) & CJCJJJCJ("M_"),CJCJJJCJ("M")):for CJCJCCJ=0 to 3:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20`V ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("V") & IIf(CJJJJCCJ(0)=cstr(CJCJCCJ),CJCJJJCJ("4964<65"),"") & CJCJJJCJ("m") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,访@伫@旝@彻@盳@兮@臥@朻@、,臥@伟@、,暯@劖@收@凶@绊@厁@k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):for CJCJCCJ=0 to 3:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20aV ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("V") & IIf(CJJJJCCJ(1)=cstr(CJCJCCJ),CJCJJJCJ("4964<65"),"") & CJCJJJCJ("m") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,访@伫@盩@剈@玫@宙@历@劖@k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):for CJCJCCJ=0 to 3:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20bV ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("V") & IIf(CJJJJCCJ(2)=cstr(CJCJCCJ),CJCJJJCJ("4964<65"),"") & CJCJJJCJ("m") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,访@伫@盩@剈@攪@拼@贿@溋@k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):for CJCJCCJ=2 to 0 step -1:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20cV ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("V") & IIf(CJJJJCCJ(3)=cstr(CJCJCCJ),CJCJJJCJ("4964<65"),"") & CJCJJJCJ("m") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,丯@庅@徾@琁@访@伫@k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):for CJCJCCJ=0 to 2:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20dV ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("V") & IIf(CJJJJCCJ(4)=cstr(CJCJCCJ),CJCJJJCJ("4964<65"),"") & CJCJJJCJ("m") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5m○, ,昪@吡@孓@圣@荪@牤@滠@産@(,吳@烚@、,酒@配@、,嗌@荪@筄@),k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):for CJCJCCJ=0 to 2:response.Write CJCJJJCJ("kE5 ,2=:8?lV46?E6CVmk=236=mk:?AFE ,EJA6lVC25:@V ,?2>6lVDC20eV ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("V") & IIf(CJJJJCCJ(5)=cstr(CJCJCCJ),CJCJJJCJ("4964<65"),"") & CJCJJJCJ("m") & CJCJCCJ & CJCJJJCJ("k^=236=mk^E5m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,kE5 ,4@=DA2?lQdQ ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CJCJJJCJ(" ,怶@刁@:,kDA2? ,:5lQDC2Qm_k^DA2?m,,卬@朵@筄@红@访@宕@:,") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQ=6G6=Q ,:5lQC25:@_Q ,G2=F6lQ_Q ,")):Response.Write IIf(CJJJJJJ(CJCJJJCJ("=6G6="))=0 or isnull(CJJJJJJ(CJCJJJCJ("=6G6="))),CJCJJJCJ("4964<65"),""):Response.Write(CJCJJJCJ("m歞@帳@(,_),k^=236=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQ=6G6=Q ,:5lQC25:@`Q ,G2=F6lQ`Q ,")):Response.Write IIf(CJJJJJJ(CJCJJJCJ("=6G6="))=1,CJCJJJCJ("4964<65"),""):Response.Write(CJCJJJCJ("m轾@佉@(,`\a),k^=236=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQ=6G6=Q ,:5lQC25:@aQ ,G2=F6lQaQ ,")):Response.Write IIf(CJJJJJJ(CJCJJJCJ("=6G6="))=2,CJCJJJCJ("4964<65"),""):Response.Write(CJCJJJCJ("m丨@筄@(,b\d),k^=236=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQ=6G6=Q ,:5lQC25:@bQ ,G2=F6lQbQ ,")):Response.Write IIf(CJJJJJJ(CJCJJJCJ("=6G6="))=3,CJCJJJCJ("4964<65"),""):Response.Write(CJCJJJCJ("m轾@髓@(,e\g),k^=236=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQ=6G6=Q ,:5lQC25:@cQ ,G2=F6lQcQ ,")):Response.Write IIf(CJJJJJJ(CJCJJJCJ("=6G6="))=4,CJCJJJCJ("4964<65"),""):Response.Write(CJCJJJCJ("m杼@髓@(,h\`d),k^=236=m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k=686?5m访@伫@绎@林@k^=686?5m") & vbCrLf):Response.Write(CJCJJJCJ(" ,臥@朻@卬@除@:,") & vbCrLf):Response.Write(CJCJJJCJ(" ,kD6=64E ,?2>6lQK5_Q ,:5lQK5_Q ,4=2DDlQ62DJF:\4@>3@3@IQ ,52E2\@AE:@?DlQ65:E23=6i72=D6Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):CJCJCCC=split(CJCJJJCJ("歞@帳@:,埵@朧@沜@朄@臥@朻@癿@惮@泐@M轾@佉@:,偱@小@伕@朄@臥@朻@癿@惮@泐@M丨@筄@:,朄@旱@伕@朄@臥@朻@癿@惮@泐@M轾@髓@:,臥@朻@愊@囹@昉@昹@,,只@胸@丵@臥@朻@偕@凵@亁@讜@刍@M杼@髓@:,臥@朻@愊@囹@張@烃@,,丵@臥@朻@偕@亁@讜@刍@咇@凁@夂@,,只@胸@衣@玫@凵@臥@朻@癿@衇@丵@"),CJCJJJCJ("M")):for CJCJCCJ=0 to ubound(CJCJCCC):response.Write CJCJJJCJ("k@AE:@? ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("V") & IIf(CJJJJJJ(CJCJJJCJ("K5_"))=CJCJCCJ,CJCJJJCJ(" ,D6=64E65"),"") & CJCJJJCJ("m") & CJCJCCJ & CJCJJJCJ("] ,") & CJCJCCC(CJCJCCJ) & CJCJJJCJ("k^@AE:@?m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k3Cm") & vbCrLf):Response.Write(CJCJJJCJ(" ,壿@琁@斴@桃@:,") & vbCrLf):Response.Write(CJCJJJCJ(" ,kD6=64E ,?2>6lQ562=Q ,:5lQ562=Q ,4=2DDlQ62DJF:\4@>3@3@IQ ,52E2\@AE:@?DlQ>F=E:A=6iECF6[65:E23=6i72=D6Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):CJCJCCC=split(CJCJJJCJ("晽@旱@丈@電@襼@幭@顿@M廵@让@迖@衇@徾@琁@咣@话@M逕@矠@陝@糶@我@宱@亵@,,绔@亃@彎@了@亵@攪@拼@咇@帩@劤@M卮@旱@盌@抟@,,阭@歝@臥@朻@M迼@粹@祙@痀@陝@佊@陝@沶@疒@"),CJCJJJCJ("M")):for CJCJCCJ=0 to ubound(CJCJCCC):response.Write CJCJJJCJ("k@AE:@? ,G2=F6lV") & CJCJCCJ & CJCJJJCJ("Vm") & CJCJCCJ & CJCJJJCJ("] ,") & CJCJCCC(CJCJCCJ) & CJCJJJCJ("k^@AE:@?m") next:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):If CCCCCCC=CJCJJJCJ(">@5") Then Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,(,挄@佊@rEC=只@夕@逄@),") & vbCrLf):Response.Write(CJCJJJCJ(" ,")) End If:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k:?AFE ,:5lQ562=0G2=F6Q ,EJA6lQ9:556?Q ,G2=F6lQ")):Response.Write CJJJJJJ(CJCJJJCJ("562=")):Response.Write(CJCJJJCJ("Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,k3Cm") & vbCrLf):Response.Write(CJCJJJCJ(" ,访@伫@无@朚@:,") & vbCrLf):Response.Write(CJCJJJCJ(" ,k:?AFE ,?2>6lQ5EQ ,EJA6lQE6IEQ ,4=2DDlQ62DJF:\52E63@IQ ,:5lQ5EQ ,G2=F6lQ")):Response.Write Date:Response.Write(CJCJJJCJ("Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJCJ(" ,k5:G ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CJCJJJCJ(" ,")):If CJJJCJJJ(126) and CCCCCCC=CJCJJJCJ(">@5") Then Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ揋@ ,亟@Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,k:?AFE ,EJA6lQC6D6EQ ,G2=F6lQ釈@ ,罩@Qm") & vbCrLf):Response.Write(CJCJJJCJ(" ,")) End If:Response.Write(vbCrLf):Response.Write(CJCJJJCJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQ;2G2D4C:AEi9:DE@CJ]324m") & vbCrLf) End If:Response.Write(vbCrLf):Response.Write(CJCJJJCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJCJ("kD4C:AE ,DC4lQ^$4C:AED^2FE@D:K6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJCJ("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJCJ("kD4C:AE ,DC4lQ^$4C:AED^62DJF:^;BF6CJ]62DJF:]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJCJ("kD4C:AE ,DC4lQ^$4C:AED^62DJF:^=@42=6^62DJF:\=2?8\K90r}];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJCJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E23=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJCJ("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C]96=A6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJCJ("kD4C:AEm") & vbCrLf):Response.Write(CJCJJJCJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJCJJJCJ(" ,2FE@D:K6WSWVE6IE2C62VXX") & vbCrLf):Response.Write(CJCJJJCJ(" ,SWVE23=6]E30=:DEVX];%23=6WX") & vbCrLf):Response.Write(CJCJJJCJ(" ,SWV:?AFEiC25:@,?2>6/lQDC20Q.VX]4=:4WXNX") & vbCrLf):Response.Write(CJCJJJCJ(" ,DC20DF>WX") & vbCrLf):Response.Write(CJCJJJCJ(" ,^^ ,讹@罩@壿@琁@愊@覼@癿@刘@姆@倷@") & vbCrLf):Response.Write(CJCJJJCJ(" ,SWVR562=0G2=F6VX]=6?8E9UUSWVR562=VX]4@>3@3@IWVD6E'2=F6DV[y$~}]A2CD6WV,VZSWVR562=0G2=F6VX]G2=WXZV.VXX") & vbCrLf):Response.Write(CJCJJJCJ("NX") & vbCrLf):Response.Write(CJCJJJCJ("^^ ,力@$#p癿@咇@") & vbCrLf):Response.Write(CJCJJJCJ("7F?4E:@? ,DC20DF>WXL") & vbCrLf):Response.Write(CJCJJJCJ(" ,G2C ,?[DF>l_") & vbCrLf):Response.Write(CJCJJJCJ(" ,7@CWG2C ,:l`j:klej:ZZXL") & vbCrLf):Response.Write(CJCJJJCJ(" ,?lSWV:?AFEiC25:@,?2>6lQDC20VZ:ZVQ.i4964<65VX]G2=WX") & vbCrLf):Response.Write(CJCJJJCJ(" ,:7WEJA6@7W?XlllVF?567:?65VXL?l_N") & vbCrLf):Response.Write(CJCJJJCJ(" ,6=D6L?lA2CD6x?EW?XN") & vbCrLf):Response.Write(CJCJJJCJ(" ,DF>Zl?") & vbCrLf):Response.Write(CJCJJJCJ(" ,N") & vbCrLf):Response.Write(CJCJJJCJ(" ,SWVRDC2VX]E6IEWDF>X") & vbCrLf):Response.Write(CJCJJJCJ(" ,^^ ,逄@拤@访@伫@筄@红@") & vbCrLf):Response.Write(CJCJJJCJ(" ,:7WDF>lll_XLSWVRC25:@_VX]AC@AWV4964<65V[ECF6XN") & vbCrLf):Response.Write(CJCJJJCJ(" ,6=D6 ,:7WDF>klaXLSWVRC25:@`VX]AC@AWV4964<65V[ECF6XN") & vbCrLf):Response.Write(CJCJJJCJ(" ,6=D6 ,:7WDF>kldXLSWVRC25:@aVX]AC@AWV4964<65V[ECF6XN") & vbCrLf):Response.Write(CJCJJJCJ(" ,6=D6 ,:7WDF>klgXLSWVRC25:@bVX]AC@AWV4964<65V[ECF6XN") & vbCrLf):Response.Write(CJCJJJCJ(" ,6=D6LSWVRC25:@cVX]AC@AWV4964<65V[ECF6XN") & vbCrLf):Response.Write(CJCJJJCJ("N") & vbCrLf):Response.Write(CJCJJJCJ("k^D4C:AEm") & vbCrLf):Response.Write(CJCJJJCJ("k^3@5Jm") & vbCrLf):Response.Write(CJCJJJCJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CCCJJJJ=nothing:set CJJCJJJC=nothing:set CJJCJJCJ=nothing:set CJJCJJCC=nothing:CJJJJJC.Close:Set CJJJJJC=Nothing:CJJJJJJ.Close:Set CJJJJJJ=Nothing:CCCCCJ.Close:Set CCCCCJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJCJJJCJ(ByVal CJCJJJJC) Dim CCJCJCC, CJCJCCJ, CCJJJJJ CJCJJJJC = Replace(CJCJJJJC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJCJCCJ = 1 To Len(CJCJJJJC) If CJCJCCJ <> CCJJJJJ Then CCJCJCC = AscW(Mid(CJCJJJJC, CJCJCCJ, 1)) If CCJCJCC >= 33 And CCJCJCC <= 79 Then CJCJJJCJ = CJCJJJCJ & Chr(CCJCJCC + 47) ElseIf CCJCJCC >= 80 And CCJCJCC <= 126 Then CJCJJJCJ = CJCJJJCJ & Chr(CCJCJCC - 47) Else CCJJJJJ = CJCJCCJ + 1 If Mid(CJCJJJJC, CCJJJJJ, 1) = Chr(64) Then CJCJJJCJ = CJCJJJCJ & ChrW(CCJCJCC + 5) Else CJCJJJCJ = CJCJJJCJ & Mid(CJCJJJJC, CJCJCCJ, 1) End If End If Next End Function %>