<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCJJJJ, CCJJJC,CCJJCJ, CCJJCC, CCJCJJ:Set CCJJJJ = server.CreateObject(CJCCJCJJ("ps~sq]r@??64E:@?")):CCJJJJ.open Application(CJCCJCJJ("r@??64E:@?$EC:?8")):Set CCJJJC=CCJJJJ::Dim CCJCJC,CCJCCJ,CCJCCC,CCCJJJ,CCCJJC,CCCJCJ,CCCJCC,CCCCJJ,CCCCJC:Dim CCCCCJ,CCCCCC,CJJJJJJ,CJJJJJC,CJJJJCJ,CJJJJCC:Dim CJJJCJJ,CJJJCJC,CJJJCCJ:Dim CJJJCCC:CJJJCCC=Trim(Request.Cookies(CJCCJCJJ("!$*|t|qt#"))):if CJJJCCC="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CCJCJC>0 then CCJCJJ=CJCCJCJJ("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(CJCCJCJJ("弬@寁@矼@,,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,")) Call SetMemberCookie(CCJCJC,CCJCCJ) End IF end if:Sub CheckRight(CJCJCCC):dim CJJCJJJ,CJJCJJC:if CCJCJC=0 then Call ConnClose:Call ClearMemberCookie:Call RedirectMessage(CJCCJCJJ("癶@彐@俜@恪@夬@敃@,,诲@釈@斫@癶@彐@。,")) elseIf not CJJCCJCC(CJCJCCC) then Call RedirectMessage(CJCCJCJJ("朾@陋@W") & CJCJCCC & CJCCJCJJ("X袦@祼@歝@,,诲@三@糶@绚@箜@琁@呓@聏@糶@。,")) end if:End Sub:Function CJJCCJCC(CJCJCCC):dim CJJCJJJ,CJJCJJC:CJJCJJC=split(CJCJCCC,CJCCJCJJ("[")):CJJCCJCC=False:for CJJCJJJ=0 to ubound(CJJCJJC):If Mid(CCJCCC,CJJCJJC(CJJCJJJ),1)="1" then CJJCCJCC=True:exit function end if:next:End Function:Sub CheckLogined():if CCJCJC=0 then Call ClearMemberCookie:Call ConnClose:dim CJJCJCJ:CJJCJCJ=trim(request.QueryString(CJCCJCJJ("D49@@="))):if isnumeric(CJJCJCJ) then response.Redirect CJCCJCJJ("^>^G2?E^R^D49@@=^") & CJJCJCJ & CJCCJCJJ("^DEF56?E^=@8:?nC65:C64El") & url else Call RedirectMessage(CJCCJCJJ("癶@彐@俜@恪@夬@敃@,,诲@釈@斫@癶@彐@。,")) end if end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CJCCJCJJ("!$*|t|qt#"))="":CCJCJC=0:CCCJCJ=0:CCJCCJ=Empty:CCCJJC=0:CCCCJJ=0:CCCJCC=0:CCCJJJ=0:CCCCCJ=False:CJJJCJC=False:CJJJCCJ=Empty:End Sub:Sub CheckMemberCookie():dim CJJCJCC,CJJCCJJ,CJJCJJJ,CJJCCJC,CJJCCCJ:CJJCJCC=split(CJJJCCC,CJCCJCJJ("]")):if ubound(CJJCJCC)<>2 then Call ClearMemberCookie elseif not isnumeric(CJJCJCC(0)) or len(CJJCJCC(1))<>32 or len(CJJCJCC(2))<>32 then Call ClearMemberCookie else CJJCCJJ=CJJCJCC(1):for CJJCJJJ=1 to len(CJJCCJJ):CJJCCJC=mid(CJJCCJJ,CJJCJJJ,1):if isnumeric(CJJCCJC) then CJJCCCJ=CJJCCCJ & CJJCCJC if len(CJJCCCJ)=7 then exit for next:CJJCCJJ=CJJCJCC(2):if CJJCCCJ<>mid(CJJCCJJ,6,7) then Call ClearMemberCookie else CJJCCJC=mid(CJJCCJJ,18,10)/2:if CJJCCJC6"), CJCCJCJJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJCCJCJJ("kD4C:AE"), CJCCJCJJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJCJJJJ=new RegExp:CJCJJJJ.Pattern=CJCCJCJJ("@?W,2\K.ZXl"):CJCJJJJ.IgnoreCase = True:CJCJJJJ.Global=True:str=CJCJJJJ.Replace(str,CJCCJCJJ("@?S`U6BF2=Dj")):set CJCJJJJ=nothing:CJJCCCJJ=str End If:End Function:Function IIf(CJCCJCCJ, CJCCJCCC, CJCCCJJJ):if isnull(CJCCJCCJ) or isempty(CJCCJCCJ) then IIf = CJCCCJJJ elseif CJCCJCCJ Then IIf = CJCCJCCC Else IIf = CJCCCJJJ end if:End Function:Const CJJJJCJJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":Function CJJCCCCJ(str):if isnull(str) or str="" then CJJCCCCJ=False:exit function end if:Dim CJCJJJJ:Set CJCJJJJ = New RegExp:CJCJJJJ.Pattern = CJCCJCJJ("/`Wb,_\h.Mc,dfh.Md,_`abdefgh.Me,aef.Mf,_`abdefg.Mg,_\h.Mh,`dgh.X-5LgNS"):CJCJJJJ.IgnoreCase = True:CJJCCCCJ = CJCJJJJ.test(str):set CJCJJJJ=nothing:End Function::Sub Debug(str):response.Charset=CJCCJCJJ("FE7\g"):dim CJJCJJJ,CJJCCJC,CJCJJJC:if isarray(str) then on error resume next:CJJCJJJ=ubound(str,2):CJCJJJC=err.number:err.clear:on error goto 0:if CJCJJJC<>0 then for CJJCJJJ=0 to ubound(str):if CJJCJJJ>0 then response.Write CJCCJCJJ("k3C ,^m") response.Write CJJCJJJ & CJCCJCJJ("i ,") & str(CJJCJJJ):next else response.Write CJCCJCJJ("kE23=6 ,3@C56ClV`VmkECmkE9mk^E9m") for CJJCJJJ=0 to ubound(str,2):response.Write CJCCJCJJ("kE9 ,2=:8?lV=67EVm") & CJJCJJJ & CJCCJCJJ("k^E9m") next:response.Write CJCCJCJJ("k^ECm"):for CJJCJJJ=0 to ubound(str):response.Write CJCCJCJJ("kECmkE9m") & CJJCJJJ & CJCCJCJJ("k^E9m"):for CJJCCJC=0 to ubound(str,2):response.Write CJCCJCJJ("kE5m") & str(CJJCJJJ,CJJCCJC) & CJCCJCJJ("k^E5m"):next:response.Write CJCCJCJJ("k^ECm"):next:response.Write CJCCJCJJ("k^E23=6m") end if elseif isnull(str) then response.Write CJCCJCJJ(",}F==.") else Response.Write replace(str,vbcrlf,CJCCJCJJ("k3Cm")) end if:Call ConnClose:Response.End:End Sub::Sub SetHttpOnlyCookie(CJCCCJJC,CJCCCJCJ):dim CJJCJCC:CJJCJCC=CJCCCJJC & CJCCJCJJ("l") & CJCCCJCJ & CJCCJCJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJCCJCJJ("$6E\r@@<:6"),CJJCJCC):End Sub:::::::Function CJJCCCCC(CJCJJJC):if isnull(CJCJJJC) or trim(CJCJJJC)="" or not isnumeric(CJCJJJC) then CJJCCCCC=false else Dim CJCJJJJ:Set CJCJJJJ = New RegExp:CJCJJJJ.Pattern = CJCCJCJJ("/-5ZS"):CJCJJJJ.IgnoreCase = True:CJJCCCCC = CJCJJJJ.test(CJCJJJC):set CJCJJJJ=nothing end if:End Function:::::Sub ConnClose():On Error Resume Next:set CJCJJJJJ=nothing:set CJCJJJJC=nothing:set CJCJJJCJ=nothing:set CJCJJJCC=nothing:CJCJCCJ.close : set CJCJCCJ=nothing:CCJJCC.Close : Set CCJJCC=Nothing:CCJJCJ.Close : Set CCJJCJ=Nothing:CJCJJCJJ.Close : Set CJCJJCJJ = Nothing:CCJJJJ.Close : Set CCJJJJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJCCCJCC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJCCJCJJ("!$*0|6DD286"),server.URLEncode(CJCCCJCC)):Response.Redirect CJCCJCJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::Function CJCJJCJC(ByVal CJCJJCCJ,style):if not isdate(CJCJJCCJ) then CJCJJCJC=CJCJJCCJ:exit function end if:dim CJCJJCJ,CJCJJCC,CJCJCJJ,CJCJCJC:CJCJJCCJ=cdate(CJCJJCCJ):CJCJJCJ=Year(CJCJJCCJ):CJCJJCC=Month(CJCJJCCJ):CJCJCJJ=Day(CJCJJCCJ):select case style:case 0:CJCJJCJC=CJCJJCJ & CJCCJCJJ("\") & right(0 & CJCJJCC,2) & CJCCJCJJ("\") & right(0 & CJCJCJJ,2):case 1:CJCJJCJC=CJCJJCJ & right(0 & CJCJJCC,2) & right(0 & CJCJCJJ,2):case 2:CJCJJCJC=right(CJCJJCJ,2) & CJCCJCJJ("\") & right(0 & CJCJJCC,2) & CJCCJCJJ("\") & right(0 & CJCJCJJ,2):case 3:CJCJJCJC=CJCJJCJ & CJCCJCJJ("\") & right(0 & CJCJJCC,2):case 4:CJCJJCJC=right(0 & CJCJJCC,2) & CJCCJCJJ("\") & right(0 & CJCJCJJ,2):case 5:CJCJJCJC=right(0 & CJCJCJJ,2):case 6:CJCJJCJC=CJCJJCJ & CJCCJCJJ("幯@") & right(0 & CJCJJCC,2) & CJCCJCJJ("會@") & right(0 & CJCJCJJ,2) & CJCCJCJJ("无@"):case else CJCJJCJC=CJCJJCCJ:end select:End Function:Function CJCJJCCC(CJCCCCJJ):Dim CJCJCCJ, CJCJCCC, str(), CJJCJJJ,CJJCCJC,CJCCJJJ:CJCCJJJ=UCase(CJCCCCJJ):If Not IsArray(Application(CJCCJCJJ("!$*0") & CJCCJJJ)) Then CCJCJJ=CJCCJCJJ("D6=64E ,:5[?2>6[>6>36CEJA6 ,7C@> ,,") & CJCCCCJJ & CJCCJCJJ(". ,@C56C ,3J ,D@CE[:5"):set CJCJCCJ=server.createobject(CJCCJCJJ("25@53]C64@C5D6E")):CJCJCCJ.open CCJCJJ,CCJJJJ,1:CJCJCCC = CJCJCCJ.RecordCount:ReDim str(CJCJCCC, 2):If CJCJCCC > 0 Then For CJJCJJJ = 1 To CJCJCCC:for CJJCCJC=0 to 2:str(CJJCJJJ, CJJCCJC) = CJCJCCJ(CJJCCJC):next:CJCJCCJ.MoveNext:Next End If:CJCJCCJ.Close: Set CJCJCCJ = Nothing:Application(CJCCJCJJ("!$*0") & CJCCJJJ) = str End If:CJCJJCCC = Application(CJCCJCJJ("!$*0") & CJCCJJJ):End Function:Sub ShowListSelect(CJCCCCJC,CJCCCCCJ,CJCCCCCC):Dim str, CJJCJJJ, CJCCJJC:CJCCJJC = CJCJJCCC(CJCCCCJC):For CJJCJJJ = 1 To UBound(CJCCJJC):if Cstr(CJCCJJC(CJJCJJJ,2))=Cstr(CJCCCCCJ) then str = str & CJCCJCJJ("k@AE:@? ,G2=F6lV") & CJCCJJC(CJJCJJJ, 0) & CJCCJCJJ("V") If CStr(CJCCJJC(CJJCJJJ, 0)) = CJCCCCCC & "" Then str = str & CJCCJCJJ(" ,D6=64E65lVD6=64E65V") str = str & CJCCJCJJ("m") & CJCCJJC(CJJCJJJ, 1) & CJCCJCJJ("k^@AE:@?m") end if:Next:Response.Write str:End Sub:Function CJCJCJJJ(CJCCCCJC,CJCCCCCJ,CCCCCCC):Dim str, CJJCJJJ, CJCCJJC:CJCCJJC = CJCJJCCC(CJCCCCJC):For CJJCJJJ = 1 To UBound(CJCCJJC):if Cstr(CJCCJJC(CJJCJJJ,2))=Cstr(CJCCCCCJ) and CStr(CJCCJJC(CJJCJJJ, 0)) = CCCCCCC & "" then str=CJCCJJC(CJJCJJJ,1):exit for end if:Next:if str="" then str=CJCCJCJJ(",朥@矠@.") CJCJCJJJ=str:End Function:::::::::::::::::::Private Const CJJJJCJC =8:Private Const CJJJJCCJ =4:Private Const CJJJJCCC =32:Private CJCCJCJ(30):Private CJCCJCC(30):Private Function CJCJCJJC(CCJJJJJJ, CCJJJJJC):If CCJJJJJC = 0 Then CJCJCJJC = CCJJJJJJ:Exit Function ElseIf CCJJJJJC = 31 Then If CCJJJJJJ And 1 Then CJCJCJJC = &H80000000 Else CJCJCJJC = 0 End If:Exit Function ElseIf CCJJJJJC < 0 Or CCJJJJJC > 31 Then Err.Raise 6 End If:If (CCJJJJJJ And CJCCJCC(31 - CCJJJJJC)) Then CJCJCJJC = ((CCJJJJJJ And CJCCJCJ(31 - (CCJJJJJC + 1))) * CJCCJCC(CCJJJJJC)) Or &H80000000 Else CJCJCJJC = ((CCJJJJJJ And CJCCJCJ(31 - CCJJJJJC)) * CJCCJCC(CCJJJJJC)) End If:End Function:Private Function CJCJCJCJ(CCJJJJJJ, CCJJJJJC):If CCJJJJJC = 0 Then CJCJCJCJ = CCJJJJJJ:Exit Function ElseIf CCJJJJJC = 31 Then If CCJJJJJJ And &H80000000 Then CJCJCJCJ = 1 Else CJCJCJCJ = 0 End If:Exit Function ElseIf CCJJJJJC < 0 Or CCJJJJJC > 31 Then Err.Raise 6 End If:CJCJCJCJ = (CCJJJJJJ And &H7FFFFFFE) \ CJCCJCC(CCJJJJJC):If (CCJJJJJJ And &H80000000) Then CJCJCJCJ = (CJCJCJCJ Or (&H40000000 \ CJCCJCC(CCJJJJJC - 1))) End If:End Function:Private Function CJCJCJCC(CCJJJJJJ, CCJJJJJC):CJCJCJCC = CJCJCJJC(CCJJJJJJ, CCJJJJJC) Or CJCJCJCJ(CCJJJJJJ, (32 - CCJJJJJC)):End Function:Private Function CJCJCCJJ(CCJJJJCJ, CCJJJJCC):Dim CJCCCJJ:Dim CJCCCJC:Dim CJCCCCJ:Dim CJCCCCC:Dim CCJJJJJ:CJCCCCJ = CCJJJJCJ And &H80000000:CJCCCCC = CCJJJJCC And &H80000000:CJCCCJJ = CCJJJJCJ And &H40000000:CJCCCJC = CCJJJJCC And &H40000000:CCJJJJJ = (CCJJJJCJ And &H3FFFFFFF) + (CCJJJJCC And &H3FFFFFFF):If CJCCCJJ And CJCCCJC Then CCJJJJJ = CCJJJJJ Xor &H80000000 Xor CJCCCCJ Xor CJCCCCC ElseIf CJCCCJJ Or CJCCCJC Then If CCJJJJJ And &H40000000 Then CCJJJJJ = CCJJJJJ Xor &HC0000000 Xor CJCCCCJ Xor CJCCCCC Else CCJJJJJ = CCJJJJJ Xor &H40000000 Xor CJCCCCJ Xor CJCCCCC End If Else CCJJJJJ = CCJJJJJ Xor CJCCCCJ Xor CJCCCCC End If:CJCJCCJJ = CCJJJJJ:End Function:Private Function CJCJCCJC(CCJCJJC, CJCJJCJ, CCJJJCJJ):CJCJCCJC = (CCJCJJC And CJCJJCJ) Or ((Not CCJCJJC) And CCJJJCJJ):End Function:Private Function CJCJCCCJ(CCJCJJC, CJCJJCJ, CCJJJCJJ):CJCJCCCJ = (CCJCJJC And CCJJJCJJ) Or (CJCJJCJ And (Not CCJJJCJJ)):End Function:Private Function CJCJCCCC(CCJCJJC, CJCJJCJ, CCJJJCJJ):CJCJCCCC = (CCJCJJC Xor CJCJJCJ Xor CCJJJCJJ):End Function:Private Function CJCCJJJJ(CCJCJJC, CJCJJCJ, CCJJJCJJ):CJCCJJJJ = (CJCJJCJ Xor (CCJCJJC Or (Not CCJJJCJJ))):End Function:Private Sub md5_FF(CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC, CCJJJCJC, CCJJJCCJ):CCJCCCJ = CJCJCCJJ(CCJCCCJ, CJCJCCJJ(CJCJCCJJ(CJCJCCJC(CCJCCCC, CCCJJJJ, CJCJCJJ), CCJCJJC), CCJJJCCJ)):CCJCCCJ = CJCJCJCC(CCJCCCJ, CCJJJCJC):CCJCCCJ = CJCJCCJJ(CCJCCCJ, CCJCCCC):End Sub:Private Sub md5_GG(CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC, CCJJJCJC, CCJJJCCJ):CCJCCCJ = CJCJCCJJ(CCJCCCJ, CJCJCCJJ(CJCJCCJJ(CJCJCCCJ(CCJCCCC, CCCJJJJ, CJCJCJJ), CCJCJJC), CCJJJCCJ)):CCJCCCJ = CJCJCJCC(CCJCCCJ, CCJJJCJC):CCJCCCJ = CJCJCCJJ(CCJCCCJ, CCJCCCC):End Sub:Private Sub md5_HH(CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC, CCJJJCJC, CCJJJCCJ):CCJCCCJ = CJCJCCJJ(CCJCCCJ, CJCJCCJJ(CJCJCCJJ(CJCJCCCC(CCJCCCC, CCCJJJJ, CJCJCJJ), CCJCJJC), CCJJJCCJ)):CCJCCCJ = CJCJCJCC(CCJCCCJ, CCJJJCJC):CCJCCCJ = CJCJCCJJ(CCJCCCJ, CCJCCCC):End Sub:Private Sub md5_II(CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC, CCJJJCJC, CCJJJCCJ):CCJCCCJ = CJCJCCJJ(CCJCCCJ, CJCJCCJJ(CJCJCCJJ(CJCCJJJJ(CCJCCCC, CCCJJJJ, CJCJCJJ), CCJCJJC), CCJJJCCJ)):CCJCCCJ = CJCJCJCC(CCJCCCJ, CCJJJCJC):CCJCCCJ = CJCJCCJJ(CCJCCCJ, CCJCCCC):End Sub:Private Function CJCCJJJC(CCJJJCCC):Dim CCJJJJC:Dim CCJJJCJ:Dim CCJJJCC():Dim CCJJCJJ:Dim CCJJCJC:Dim CCJJCCJ:Const CJJJCJJJ =512:Const CJJJCJJC =448:CCJJJJC = Len(CCJJJCCC):CCJJJCJ = (((CCJJJJC + ((CJJJCJJJ - CJJJCJJC) \ CJJJJCJC)) \ (CJJJCJJJ \ CJJJJCJC)) + 1) * (CJJJCJJJ \ CJJJJCCC):ReDim CCJJJCC(CCJJJCJ - 1):CCJJCJJ = 0:CCJJCJC = 0:Do Until CCJJCJC >= CCJJJJC:CCJJCCJ = CCJJCJC \ CJJJJCCJ:CCJJCJJ = (CCJJCJC Mod CJJJJCCJ) * CJJJJCJC:CCJJJCC(CCJJCCJ) = CCJJJCC(CCJJCCJ) Or CJCJCJJC(Asc(Mid(CCJJJCCC, CCJJCJC + 1, 1)), CCJJCJJ):CCJJCJC = CCJJCJC + 1:Loop:CCJJCCJ = CCJJCJC \ CJJJJCCJ:CCJJCJJ = (CCJJCJC Mod CJJJJCCJ) * CJJJJCJC:CCJJJCC(CCJJCCJ) = CCJJJCC(CCJJCCJ) Or CJCJCJJC(&H80, CCJJCJJ):CCJJJCC(CCJJJCJ - 2) = CJCJCJJC(CCJJJJC, 3):CCJJJCC(CCJJJCJ - 1) = CJCJCJCJ(CCJJJJC, 29):CJCCJJJC = CCJJJCC:End Function:Private Function CJCCJJCJ(CCJJJJJJ):Dim CCJJCCC:Dim CCJCJJJ:For CCJCJJJ = 0 To 3:CCJJCCC = CJCJCJCJ(CCJJJJJJ, CCJCJJJ * CJJJJCJC) And CJCCJCJ(CJJJJCJC - 1):CJCCJJCJ = CJCCJJCJ & Right("0" & Hex(CCJJCCC), 2):Next:End Function:Public Function CJCCJJCC(CCJJJCCC):CJCCJCJ(0) = CLng(1):CJCCJCJ(1) = CLng(3):CJCCJCJ(2) = CLng(7):CJCCJCJ(3) = CLng(15):CJCCJCJ(4) = CLng(31):CJCCJCJ(5) = CLng(63):CJCCJCJ(6) = CLng(127):CJCCJCJ(7) = CLng(255):CJCCJCJ(8) = CLng(511):CJCCJCJ(9) = CLng(1023):CJCCJCJ(10) = CLng(2047):CJCCJCJ(11) = CLng(4095):CJCCJCJ(12) = CLng(8191):CJCCJCJ(13) = CLng(16383):CJCCJCJ(14) = CLng(32767):CJCCJCJ(15) = CLng(65535):CJCCJCJ(16) = CLng(131071):CJCCJCJ(17) = CLng(262143):CJCCJCJ(18) = CLng(524287):CJCCJCJ(19) = CLng(1048575):CJCCJCJ(20) = CLng(2097151):CJCCJCJ(21) = CLng(4194303):CJCCJCJ(22) = CLng(8388607):CJCCJCJ(23) = CLng(16777215):CJCCJCJ(24) = CLng(33554431):CJCCJCJ(25) = CLng(67108863):CJCCJCJ(26) = CLng(134217727):CJCCJCJ(27) = CLng(268435455):CJCCJCJ(28) = CLng(536870911):CJCCJCJ(29) = CLng(1073741823):CJCCJCJ(30) = CLng(2147483647):CJCCJCC(0) = CLng(1):CJCCJCC(1) = CLng(2):CJCCJCC(2) = CLng(4):CJCCJCC(3) = CLng(8):CJCCJCC(4) = CLng(16):CJCCJCC(5) = CLng(32):CJCCJCC(6) = CLng(64):CJCCJCC(7) = CLng(128):CJCCJCC(8) = CLng(256):CJCCJCC(9) = CLng(512):CJCCJCC(10) = CLng(1024):CJCCJCC(11) = CLng(2048):CJCCJCC(12) = CLng(4096):CJCCJCC(13) = CLng(8192):CJCCJCC(14) = CLng(16384):CJCCJCC(15) = CLng(32768):CJCCJCC(16) = CLng(65536):CJCCJCC(17) = CLng(131072):CJCCJCC(18) = CLng(262144):CJCCJCC(19) = CLng(524288):CJCCJCC(20) = CLng(1048576):CJCCJCC(21) = CLng(2097152):CJCCJCC(22) = CLng(4194304):CJCCJCC(23) = CLng(8388608):CJCCJCC(24) = CLng(16777216):CJCCJCC(25) = CLng(33554432):CJCCJCC(26) = CLng(67108864):CJCCJCC(27) = CLng(134217728):CJCCJCC(28) = CLng(268435456):CJCCJCC(29) = CLng(536870912):CJCCJCC(30) = CLng(1073741824):Dim CCJCJJC:Dim CJJCCCJ:Dim CCJCJCJ:Dim CCJCJCC:Dim CCJCCJJ:Dim CCJCCJC:Dim CCJCCCJ:Dim CCJCCCC:Dim CCCJJJJ:Dim CJCJCJJ:Const CJJJCJCJ =7:Const CJJJCJCC =12:Const CJJJCCJJ =17:Const CJJJCCJC =22:Const CJJJCCCJ =5:Const CJJJCCCC =9:Const CJJCJJJJ =14:Const CJJCJJJC =20:Const CJJCJJCJ =4:Const CJJCJJCC =11:Const CJJCJCJJ =16:Const CJJCJCJC =23:Const CJJCJCCJ =6:Const CJJCJCCC =10:Const CJJCCJJJ =15:Const CJJCCJJC =21:CCJCJJC = CJCCJJJC(CCJJJCCC):CCJCCCJ = &H67452301:CCJCCCC = &HEFCDAB89:CCCJJJJ = &H98BADCFE:CJCJCJJ = &H10325476:For CJJCCCJ = 0 To UBound(CCJCJJC) Step 16:CCJCJCJ = CCJCCCJ:CCJCJCC = CCJCCCC:CCJCCJJ = CCCJJJJ:CCJCCJC = CJCJCJJ:md5_FF CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 0), CJJJCJCJ, &HD76AA478:md5_FF CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 1), CJJJCJCC, &HE8C7B756:md5_FF CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 2), CJJJCCJJ, &H242070DB:md5_FF CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 3), CJJJCCJC, &HC1BDCEEE:md5_FF CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 4), CJJJCJCJ, &HF57C0FAF:md5_FF CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 5), CJJJCJCC, &H4787C62A:md5_FF CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 6), CJJJCCJJ, &HA8304613:md5_FF CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 7), CJJJCCJC, &HFD469501:md5_FF CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 8), CJJJCJCJ, &H698098D8:md5_FF CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 9), CJJJCJCC, &H8B44F7AF:md5_FF CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 10), CJJJCCJJ, &HFFFF5BB1:md5_FF CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 11), CJJJCCJC, &H895CD7BE:md5_FF CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 12), CJJJCJCJ, &H6B901122:md5_FF CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 13), CJJJCJCC, &HFD987193:md5_FF CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 14), CJJJCCJJ, &HA679438E:md5_FF CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 15), CJJJCCJC, &H49B40821:md5_GG CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 1), CJJJCCCJ, &HF61E2562:md5_GG CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 6), CJJJCCCC, &HC040B340:md5_GG CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 11), CJJCJJJJ, &H265E5A51:md5_GG CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 0), CJJCJJJC, &HE9B6C7AA:md5_GG CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 5), CJJJCCCJ, &HD62F105D:md5_GG CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 10), CJJJCCCC, &H2441453:md5_GG CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 15), CJJCJJJJ, &HD8A1E681:md5_GG CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 4), CJJCJJJC, &HE7D3FBC8:md5_GG CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 9), CJJJCCCJ, &H21E1CDE6:md5_GG CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 14), CJJJCCCC, &HC33707D6:md5_GG CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 3), CJJCJJJJ, &HF4D50D87:md5_GG CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 8), CJJCJJJC, &H455A14ED:md5_GG CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 13), CJJJCCCJ, &HA9E3E905:md5_GG CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 2), CJJJCCCC, &HFCEFA3F8:md5_GG CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 7), CJJCJJJJ, &H676F02D9:md5_GG CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 12), CJJCJJJC, &H8D2A4C8A:md5_HH CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 5), CJJCJJCJ, &HFFFA3942:md5_HH CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 8), CJJCJJCC, &H8771F681:md5_HH CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 11), CJJCJCJJ, &H6D9D6122:md5_HH CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 14), CJJCJCJC, &HFDE5380C:md5_HH CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 1), CJJCJJCJ, &HA4BEEA44:md5_HH CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 4), CJJCJJCC, &H4BDECFA9:md5_HH CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 7), CJJCJCJJ, &HF6BB4B60:md5_HH CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 10), CJJCJCJC, &HBEBFBC70:md5_HH CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 13), CJJCJJCJ, &H289B7EC6:md5_HH CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 0), CJJCJJCC, &HEAA127FA:md5_HH CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 3), CJJCJCJJ, &HD4EF3085:md5_HH CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 6), CJJCJCJC, &H4881D05:md5_HH CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 9), CJJCJJCJ, &HD9D4D039:md5_HH CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 12), CJJCJJCC, &HE6DB99E5:md5_HH CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 15), CJJCJCJJ, &H1FA27CF8:md5_HH CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 2), CJJCJCJC, &HC4AC5665:md5_II CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 0), CJJCJCCJ, &HF4292244:md5_II CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 7), CJJCJCCC, &H432AFF97:md5_II CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 14), CJJCCJJJ, &HAB9423A7:md5_II CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 5), CJJCCJJC, &HFC93A039:md5_II CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 12), CJJCJCCJ, &H655B59C3:md5_II CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 3), CJJCJCCC, &H8F0CCC92:md5_II CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 10), CJJCCJJJ, &HFFEFF47D:md5_II CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 1), CJJCCJJC, &H85845DD1:md5_II CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 8), CJJCJCCJ, &H6FA87E4F:md5_II CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 15), CJJCJCCC, &HFE2CE6E0:md5_II CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 6), CJJCCJJJ, &HA3014314:md5_II CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 13), CJJCCJJC, &H4E0811A1:md5_II CCJCCCJ, CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCJJC(CJJCCCJ + 4), CJJCJCCJ, &HF7537E82:md5_II CJCJCJJ, CCJCCCJ, CCJCCCC, CCCJJJJ, CCJCJJC(CJJCCCJ + 11), CJJCJCCC, &HBD3AF235:md5_II CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCCCC, CCJCJJC(CJJCCCJ + 2), CJJCCJJJ, &H2AD7D2BB:md5_II CCJCCCC, CCCJJJJ, CJCJCJJ, CCJCCCJ, CCJCJJC(CJJCCCJ + 9), CJJCCJJC, &HEB86D391:CCJCCCJ = CJCJCCJJ(CCJCCCJ, CCJCJCJ):CCJCCCC = CJCJCCJJ(CCJCCCC, CCJCJCC):CCCJJJJ = CJCJCCJJ(CCCJJJJ, CCJCCJJ):CJCJCJJ = CJCJCCJJ(CJCJCJJ, CCJCCJC):Next:CJCCJJCC = LCase(CJCCJJCJ(CCJCCCJ) & CJCCJJCJ(CCJCCCC) & CJCCJJCJ(CCCJJJJ) & CJCCJJCJ(CJCJCJJ)):End Function::dim CJJCJCJ:CCJCJJ=Request.ServerVariables(CJCCJCJJ("!p%w0x}u~")):if instr(CCJCJJ,CJCCJCJJ("^D49@@=^25>:?^"))>0 then Call CheckLogined:if not CCCCCJ and not CJJJCJC then Call RedirectMessage(CJCCJCJJ("寴@丈@赲@,,患@沜@朄@迖@兠@诠@顰@靝@癿@朾@陋@。,")) CJJCJCJ=CCCJCC elseif instr(CCJCJJ,CJCCJCJJ("^>^D49@@=^DEF56?E^"))>0 or instr(CCJCJJ,CJCCJCJJ("^DEF56?E^"))>0 then Call CheckLogined:CJJCJCJ=CCCJCC elseif instr(CCJCJJ,CJCCJCJJ("^D49@@="))>0 then CJJCJCJ=Request.QueryString(CJCCJCJJ("D49@@=")):if not CJJCCCCC(CJJCJCJ) then CJJCJCJ=Request.QueryString(CJCCJCJJ("F")) if not CJJCCCCC(CJJCJCJ) then CJJCJCJ=Request.QueryString(CJCCJCJJ("D4")) if not CJJCCCCC(CJJCJCJ) then Call RedirectMessage(CJCCJCJJ("糶@绚@厽@敫@W$49@@=X忀@顶@丵@敫@孒@。,")) CJJCJCJ=csng(CJJCJCJ) end if:if CJJCJCJ=0 then Call RedirectMessage(CJCCJCJJ("糶@绚@厽@敫@W$49@@=X锔@诪@W_X。,")) Dim CCCJJJC:Call SetConfig:Sub SetConfig():dim CJJCJJC,CJCJCCJ:CCJCJJ=CJCCJCJJ("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")):CJJCJJC(3)=CJCJCCJ(CJCCJCJJ("4FDE@>8C@FA")) & "":CJJCJJC(4)=CJCJCCJ(CJCCJCJJ("D:5632C0@E96C")) & "":CJJCJJC(5)=IIf(isnull(CJCJCCJ(CJCCJCJJ("E6DEC6DF=EG:6H"))),0,CJCJCCJ(CJCCJCJJ("E6DEC6DF=EG:6H"))):CJJCJJC(6)=CJCJCCJ(CJCCJCJJ("K:IF?E:>6")):CJJCJJC(7)=CJCJCCJ(CJCCJCJJ("766")):CJJCJJC(8)=CJCJCCJ(CJCCJCJJ("C6E6DE52J")):CJJCJJC(9)=CJCJCCJ(CJCCJCJJ("6IA:C652E6")):CJJCJJC(10)=CJCJCCJ(CJCCJCJJ("E:E=6")):CJJCJJC(11)=CJCJCCJ(CJCCJCJJ(":?EC@")) & "":CJJCJJC(12)=CJCJCCJ(CJCCJCJJ("A:4EFC6")) & "":CJJCJJC(13)=CJCJCCJ(CJCCJCJJ("72>:=J")):CJJCJJC(14)=CJCJCCJ(CJCCJCJJ("4@AJC:89E")) & "":CJJCJJC(15)=IIf(isnull(CJCJCCJ(CJCCJCJJ("D6>6DE6C0DE2CE052E6"))),CJCCJCJJ("`h__\`\`"),CJCJCCJ(CJCCJCJJ("D6>6DE6C0DE2CE052E6"))):CJJCJJC(16)=IIf(isnull(CJCJCCJ(CJCCJCJJ("K:IF?0E:>6D09:89=:89E"))),0,CJCJCCJ(CJCCJCJJ("K:IF?0E:>6D09:89=:89E"))):CJJCJJC(17)=CJCJCCJ(CJCCJCJJ("4@?E24E")) & "":CJJCJJC(18)=CJCJCCJ(CJCCJCJJ("D2?5E23=6")):CJJCJJC(19)=CJCJCCJ(CJCCJCJJ("4C:D:D")):CJJCJJC(20)=CJCJCCJ(CJCCJCJJ("JJ52E6")):CJJCJJC(21)=CJCJCCJ(CJCCJCJJ("BB")):CJJCJJC(22)=CJCJCCJ(CJCCJCJJ("JFJF60D>D0EA=")) & "":CJJCJJC(23)=CJCJCCJ(CJCCJCJJ("JFJF60E6DE0=3")) & "":CJJCJJC(25)=CJCJCCJ(CJCCJCJJ("6IA6CE")):CJJCJJC(26)=CJCJCCJ(CJCCJCJJ(">@5:?7@")):CJJCJJC(27)=CJCJCCJ(CJCCJCJJ("9@>6A286E@AA:4EFC6")) & "":CJJCJJC(28)=CJCJCCJ(CJCCJCJJ("4C:D:D=3")):CJJCJJC(29)=IIf(CJCJCCJ(CJCCJCJJ("4C:D:D@=5")),False,True):CJJCJJC(30)=CJCJCCJ(CJCCJCJJ("8C@FA8F:52?46")):CJJCJJC(31)=CJCJCCJ(CJCCJCJJ("3:@7665324<")):CJJCJJC(32)=CJCJCCJ(CJCCJCJJ("<6JDEC")):CJJCJJC(33)=CJCJCCJ(CJCCJCJJ("=@8@")) & "":CJJCJJC(34)=CJCJCCJ(CJCCJCJJ("K:46")):CJJCJJC(35)=IIf(CJCJCCJ(CJCCJCJJ(":D?6H")),True,False):CJJCJJC(36)=121:CJJCJJC(37)=111:CJJCJJC(38)=160:CJJCJJC(39)=CJCJCCJ(CJCCJCJJ("8F6DE3@@<")):CJJCJJC(40)=CJCJCCJ(CJCCJCJJ("75D")):CJJCJJC(42)=CJCJCCJ(CJCCJCJJ("9@>6=@8:?")):CJJCJJC(43)=CJCJCCJ(CJCCJCJJ("K:IF?0?6657665324<")):CJJCJJC(44)=CJCJCCJ(CJCCJCJJ("K:IF?0E:>6D0=:>:E")):CJJCJJC(45)=CJCJCCJ(CJCCJCJJ("4@>A=6E60:?7@")):CJJCJJC(46)=CJCJCCJ(CJCCJCJJ("E6DE:?EC@")) & "":CJJCJJC(47)=IIf(isnull(CJCJCCJ(CJCCJCJJ("JFJF60367@C60E:>6"))),0,CJCJCCJ(CJCCJCJJ("JFJF60367@C60E:>6"))):CJJCJJC(49)=CJCJCCJ(CJCCJCJJ("D>D0C646:G6C")):CJJCJJC(50)=CJCJCCJ(CJCCJCJJ("D>D0D:8?")) & "":CJJCJJC(52)=CJCJCCJ(CJCCJCJJ("JFJF602CC2?86")):CJJCJJC(53)=IIf(isnull(CJCJCCJ(CJCCJCJJ("DEF56?E0BF6DE:@?04@F?E"))),0,CJCJCCJ(CJCCJCJJ("DEF56?E0BF6DE:@?04@F?E"))):CJJCJJC(54)=CJCJCCJ(CJCCJCJJ("9:560=30@FE@7286")):CJJCJJC(55)=CJCJCCJ(CJCCJCJJ("JFJF60E6DE052JD")):CJJCJJC(56)=CJCJCCJ(CJCCJCJJ("JFJF60H66<0=:>:E")):CJJCJJC(57)=CJCJCCJ(CJCCJCJJ("JFJF604964<65")):CJJCJJC(58)=CJCJCCJ(CJCCJCJJ("K:IF?0?6657665324<0?6IE")):CJJCJJC(59)=CJCJCCJ(CJCCJCJJ("49642E6"),CJCCJCJJ("}F>36C"),CJCCJCJJ("%62496C"),CJCCJCJJ("!2C6?E")):select case CCCJJJC(1):case 1,2 : CCCJJCC=Array(CJCCJCJJ("孡@栜@"),CJCCJCJJ("孡@甚@"),CJCCJCJJ("珨@红@"),CJCCJCJJ("幯@红@"),CJCCJCJJ("吇@孡@"),CJCCJCJJ("孡@史@"),CJCCJCJJ("敔@布@"),CJCCJCJJ("宱@镺@")):case 3,16 : CCCJJCC=Array(CJCCJCJJ("孡@栜@"),CJCCJCJJ("孡@甚@"),CJCCJCJJ("陝@糶@"),CJCCJCJJ("幯@红@"),CJCCJCJJ("吇@孡@"),CJCCJCJJ("孡@史@"),CJCCJCJJ("敔@布@"),CJCCJCJJ("宱@镺@")):case 4 : CCCJJCC=Array(CJCCJCJJ("匶@陝@"),CJCCJCJJ("杠@论@耀@"),CJCCJCJJ("卐@佈@"),CJCCJCJJ("幯@仸@"),CJCCJCJJ("吇@了@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("匶@甚@"),CJCCJCJJ("宱@屙@")):case 5 : CCCJJCC=Array(CJCCJCJJ("卐@佈@"),CJCCJCJJ("呓@巠@"),CJCCJCJJ("郣@闣@"),CJCCJCJJ("幯@仸@"),CJCCJCJJ("吇@了@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("呓@巠@"),CJCCJCJJ("宱@屙@")):case 6 : CCCJJCC=Array(CJCCJCJJ("卐@佈@"),CJCCJCJJ("杠@论@耀@"),CJCCJCJJ("线@刦@"),CJCCJCJJ("幯@仸@"),CJCCJCJJ("吇@了@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("咣@话@布@"),CJCCJCJJ("宱@屙@")):case 7 : CCCJJCC=Array(CJCCJCJJ("卐@佈@"),CJCCJCJJ("宓@兰@"),CJCCJCJJ("郣@闣@"),CJCCJCJJ("幯@仸@"),CJCCJCJJ("戓@叆@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("咣@话@布@"),CJCCJCJJ("宱@屙@")):case 8 : CCCJJCC=Array(CJCCJCJJ("卐@佈@"),CJCCJCJJ("杠@论@耀@"),CJCCJCJJ("卐@佈@"),CJCCJCJJ("兠@聇@幯@仸@"),CJCCJCJJ("吇@了@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("咣@话@布@"),CJCCJCJJ("酈@偱@")):case 9 : CCCJJCC=Array(CJCCJCJJ("卐@佈@"),CJCCJCJJ("敔@布@"),CJCCJCJJ("卐@佈@"),CJCCJCJJ("幯@仸@"),CJCCJCJJ("吇@了@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("咣@话@布@"),CJCCJCJJ("酈@偱@")):case 10 : CCCJJCC=Array(CJCCJCJJ("卐@佈@"),CJCCJCJJ("氌@譡@"),CJCCJCJJ("郣@闣@"),CJCCJCJJ("兠@譡@幯@仸@"),CJCCJCJJ("吇@了@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("咣@话@布@"),CJCCJCJJ("宱@屙@")):case 11 : CCCJJCC=Array(CJCCJCJJ("卐@佈@"),CJCCJCJJ("內@劜@呓@"),CJCCJCJJ("郣@闣@"),CJCCJCJJ("幯@仸@"),CJCCJCJJ("吇@了@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("咣@话@布@"),CJCCJCJJ("宱@屙@")):case 12 : CCCJJCC=Array(CJCCJCJJ("卐@佈@"),CJCCJCJJ("幭@譡@"),CJCCJCJJ("卐@佈@"),CJCCJCJJ("兠@譡@幯@仸@"),CJCCJCJJ("吇@了@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("咣@话@布@"),CJCCJCJJ("宱@屙@")):case 13 : CCCJJCC=Array(CJCCJCJJ("卐@佈@"),CJCCJCJJ("孡@呓@"),CJCCJCJJ("卐@佈@"),CJCCJCJJ("幯@仸@"),CJCCJCJJ("戓@叆@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("敔@呓@"),CJCCJCJJ("宱@屙@")):case 14 : CCCJJCC=Array(CJCCJCJJ("月@劜@炴@"),CJCCJCJJ("局@氌@"),CJCCJCJJ("线@刦@"),CJCCJCJJ("幯@仸@"),CJCCJCJJ("邶@采@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("咣@话@布@"),CJCCJCJJ("宱@屙@")):case 15 : CCCJJCC=Array(CJCCJCJJ("卐@佈@"),CJCCJCJJ("盌@独@氌@譡@"),CJCCJCJJ("卐@佈@"),CJCCJCJJ("兠@譡@幯@仸@"),CJCCJCJJ("吇@了@"),CJCCJCJJ("缑@史@"),CJCCJCJJ("咣@话@布@"),CJCCJCJJ("宱@屙@")):case else : CCCJJCC=CCCJJCJ end select:for CJJCJJJ=0 to Ubound(CJJCJJC):CJJCJJC(CJJCJJJ,0)=CCCJJCJ(CJJCJJJ):CJJCJJC(CJJCJJJ,1)=CCCJJCC(CJJCJJJ):next:for CJJCJJJ=0 to Ubound(CJJCJJC):if CJJCJJC(CJJCJJJ,0)=CCJJCJJJ then CJCJJJCC=CJJCJJC(CJJCJJJ,1):exit for end if:next:End Function::if CCCJJJC(7)<3 then Call RedirectMessage(CJCCJCJJ("寴@丈@赲@,,患@癿@糶@绚@丈@攪@拼@诠@劚@胸@!,")) Call CheckRight(63):Const CJJCCJCJ=false:dim CCCJCJJ:CCCJCJJ=Date:If Request.ServerVariables(CJCCJCJJ("#t""&t$%0|t%w~s"))=CJCCJCJJ("!~$%") then dim CJCCJJC,CCCJCJC,CCCJCCJ,CCCJCCC:CCCJCJC=Request.Form(CJCCJCJJ("56AE")):CCCJCCJ=Request.Form(CJCCJCJJ("8C256")):CCCJCCC=Request.Form(CJCCJCJJ("8C@FA")):CJCCJJC=Request.Form(CJCCJCJJ("=:DE")):if not CJJCCCCC(CCCJCCJ) then CCCJCCJ="0" if not CJJCCCCC(CCCJCCC) then CCCJCCC="0" if not CJJCCJCJ then set CCJJCJ=CCJJJJ.execute(CJCCJCJJ("D6=64E ,E@A ,` ,=2DE:>A@CEE:>6 ,7C@> ,4@?7:8 ,H96C6 ,:5l`")):if not isnull(CCJJCJ(0)) then if DateDiff(CJCCJCJJ("?"),CCJJCJ(0),Now)<3 then debug CJCCJCJJ("×, ,幮@叫@彎@剈@朄@共@仑@産@戲@歞@圣@迖@衇@寷@兠@擈@佗@,,诲@稈@筄@凛@刁@钚@吉@冈@诐@!,") end if:CCJJJJ.execute CJCCJCJJ("FA52E6 ,4@?7:8 ,D6E ,=2DE:>A@CEE:>6l86E52E6WX") end if:dim CJCJJJC,CJJCJJJ,CJJCCJC:dim CCCCJJJ,CJCJCCC,CCCCJJC,CCCCJCJ,CCCCJCC,CCCCCJJ:set CCJJCJ=CCJJJJ.execute(CJCCJCJJ("D6=64E ,E@A ,` ,:5 ,7C@> ,>6>36C ,@C56C ,3J ,:5 ,56D4")):CCCCJJJ=CCJJCJ(0)+1:dim CCCCCJC,CCCCCCJ,CCCCCCC,CJJJJJJJ,CJJJJJJC,CJJJJJCJ:CCCCCJC=0:CCCCCCJ=0:CJJJJJJC=split(CJCCJJC,vbcrlf):for CJJCJJJ=0 to ubound(CJJJJJJC):CJJJJJCJ=split(CJJJJJJC(CJJCJJJ) & CJCCJCJJ("MMMM"),CJCCJCJJ("M")):for CJJCCJC=0 to 4:CJJJJJCJ(CJJCCJC)=trim(CJJJJJCJ(CJJCCJC)):next:CJCJCCC=replace(replace(replace(replace(trim(CJJJJJCJ(0)),CJCCJCJJ("V"),""),chr(9),""),vbcr,""),vblf,"") CCCCJJC=CJJJJJCJ(1):if CCCCJJC="" then CCCCJJC=CJCJCCC else CCCCJJC=CJJCCCJJ(CCCCJJC) end if:CCCCJCJ=CJJJJJCJ(2):if CCCCJCJ=CJCCJCJJ("甲@") or CCCCJCJ="1" then CCCCJCJ=1 elseif CCCCJCJ=CJCCJCJJ("奮@") or CCCCJCJ="0" then CCCCJCJ=0 else CCCCJCJ=1 end if:CCCCJCC=CJJJJJCJ(3):if isdate(CCCCJCC) then CCCCJCC=cdate(CCCCJCC):if CCCCJCC>#2079-6-6# or CCCCJCC<#1900-1-1# then CCCCJCC=CCCJCJJ elseif len(CCCCJCC)=8 then CCCCJCC=left(CCCCJCC,4) & CJCCJCJJ("\") & mid(CCCCJCC,5,2) & CJCCJCJJ("\") & right(CCCCJCC,2):if isdate(CCCCJCC) then CCCCJCC=cdate(CCCCJCC):if CCCCJCC>#2079-6-6# or CCCCJCC<#1900-1-1# then CCCCJCC=CCCJCJJ else CCCCJCC=CCCJCJJ end if else CCCCJCC=CCCJCJJ end if:CCCCCJJ=CJJJJJCJ(4):if CJJCCCCJ(CCCCCJJ) then CCCCCJJ=CJCCJCJJ("V") & CCCCCJJ & CJCCJCJJ("V") else CCCCCJJ=CJCCJCJJ("?F==") CJJJJJJJ=right(CJCJCCC,6):set CCJJCJ=CCJJJJ.execute(CJCCJCJJ("D6=64E ,E@A ,` ,:5 ,7C@> ,G0>6>36C ,H:E9 ,W?@=@436ClV") & CJCJCCC & CJCCJCJJ("V ,2?5 ,:DDEF56?El` ,2?5 ,>6>36C0EJA60E@Al") & CJJCJCJ) if CCJJCJ.eof then CCJCJJ=CJCCJCJJ(":?D6CE ,:?E@ ,>6>36CW:5[?F>36C[A2DDH@C5[C62=?2>6[D6I[3:CE952J[EJA6[8C256[4FDE@>8C@FA[,DE2E6.[,8C@FA.[:DDEF56?E[>@3:=6X ,G2=F6DW") & CCCCJJJ & CJCCJCJJ("[V") & CJCJCCC & CJCCJCJJ("V") & CJCCJCJJ("[V") & CJCCJJCC(CJJJJJJJ) & CJCCJCJJ("V") & CJCCJCJJ("[}V") & CCCCJJC & CJCCJCJJ("V") & CJCCJCJJ("[") & CCCCJCJ & CJCCJCJJ("[V") & CCCCJCC & CJCCJCJJ("V") & CJCCJCJJ("[") & CCCJCJC & CJCCJCJJ("[") & CCCJCCJ & CJCCJCJJ("[") & CCCJCCC & CJCCJCJJ("[d[`[`") & CJCCJCJJ("[") & CCCCCJJ & CJCCJCJJ("X") CCCCJJJ=CCCCJJJ+1:if CJJCCJCJ then response.Write CCJCJJ & vbcrlf else CCJJJJ.execute CCJCJJ end if:CCCCCJC=CCCCCJC+1 else CCCCCCC=CCJJCJ(0):CCJCJJ=CJCCJCJJ("FA52E6 ,>6>36C ,D6E") & CJCCJCJJ(" ,C62=?2>6l}V") & CCCCJJC & CJCCJCJJ("V") & CJCCJCJJ("[D6Il") & CCCCJCJ & CJCCJCJJ("[EJA6l") & CCCJCJC & CJCCJCJJ("[8C256l") & CCCJCCJ & CJCCJCJJ("[4FDE@>8C@FAl") & CCCJCCC if CCCCJCC<>CCCJCJJ then CCJCJJ=CCJCJJ & CJCCJCJJ("[3:CE952JlV") & CCCCJCC & CJCCJCJJ("V") if CCCCCJJ<>CJCCJCJJ("?F==") then CCJCJJ=CCJCJJ & CJCCJCJJ("[>@3:=6l") & CCCCCJJ CCJCJJ=CCJCJJ & CJCCJCJJ(" ,H96C6 ,:5l") & CCCCCCC:if CJJCCJCJ then response.Write CCJCJJ & vbcrlf else CCJJJJ.execute CCJCJJ end if:CCCCCCJ=CCCCCCJ+1 end if:next:if not CJJCCJCJ then CCJJJJ.execute CJCCJCJJ("FA52E6 ,4@?7:8 ,D6E ,=2DE:>A@CEE:>6l?F==") Response.Write CJCCJCJJ(",") & CCCCCJC & CJCCJCJJ("[") & CCCCCCJ & CJCCJCJJ("."):Call ConnClose:response.End end if:Response.Write(vbCrLf):Response.Write(CJCCJCJJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJCCJCJJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJCCJCJJ("k9625m") & vbCrLf):Response.Write(CJCCJCJJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCCJCJJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJCCJCJJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJCCJCJJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJCCJCJJ("kE:E=6m孡@甚@敫@捩@刁@线@寷@兠@k^E:E=6m") & vbCrLf):Response.Write(CJCCJCJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CJCCJCJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^49@D6?^49@D6?]>:?]4DDQm") & vbCrLf):Response.Write(CJCCJCJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^5C@A:7J^4DD^5C@A:7J]>:?]4DDQm") & vbCrLf):Response.Write(CJCCJCJJ("kDEJ=6m") & vbCrLf):Response.Write(CJCCJCJJ("]5C@A:7J\HC2AA6C ,LH:5E9i2FE@jN") & vbCrLf):Response.Write(CJCCJCJJ("]5C@A:7J\>6DD286 ,A ,LE6IE\2=:8?i46?E6CjN") & vbCrLf):Response.Write(CJCCJCJJ("]5C@A:7J ,L5:DA=2Ji?@?6jN") & vbCrLf):Response.Write(CJCCJCJJ("RAC6G:6H ,L5:DA=2Ji?@?6jN") & vbCrLf):Response.Write(CJCCJCJJ("RAC6G:6H\4@?E6?E ,E9[RAC6G:6H\4@?E6?E ,E5 ,L7@?E\D:K6i`aAIjN") & vbCrLf):Response.Write(CJCCJCJJ("R>D8\HC2A ,L5:DA=2Ji?@?6jN") & vbCrLf):Response.Write(CJCCJCJJ("R3E?\:>A@CE ,L5:DA=2Ji?@?6jN") & vbCrLf):Response.Write(CJCCJCJJ("k^DEJ=6m") & vbCrLf):Response.Write(CJCCJCJJ("k^9625m") & vbCrLf):Response.Write(CJCCJCJJ("k3@5Jm") & vbCrLf):Response.Write(CJCCJCJJ("kF= ,:5lQE23Qm") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:mk2 ,9C67lQDEF56?E255]2DAQm扴@释@彐@兠@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:mk2 ,9C67lQDEF56?E0:>A@CE]2DAQmtI46=寷@兠@\线@吃@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=: ,4=2DDlQ4FCC6?EQmk2 ,9C67lQDEF56?E0:>A@CE056AE08C256]2DAQmtI46=寷@兠@\刁@线@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:mk2 ,9C67lQDEF56?E0:>A@CE056AE]2DAQmtI46=寷@兠@\合@秫@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,")):If CCCJJJC(1)=3 Then Response.Write(vbCrLf):Response.Write(CJCCJCJJ(" ,k=:mk2 ,9C67lQDEF56?EC625]2DAQm诶@发@丨@闯@庎@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,")) End If:Response.Write(vbCrLf):Response.Write(CJCCJCJJ(" ,k=:mk2 ,9C67lQDEF56?E255@?6]2DAQm严@刦@淶@力@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,")):if CCCJJJC(7)>=2 then Response.Write(vbCrLf):Response.Write(CJCCJCJJ(" ,k=:mk2 ,9C67lQDEF56?E?6H]2DAQm臥@劤@泣@冇@k^2mk^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,")) End If:Response.Write(vbCrLf):Response.Write(CJCCJCJJ("k^F=m") & vbCrLf):Response.Write(CJCCJCJJ("k:?AFE ,EJA6lQ7:=6Q ,4=2DDlQ5C@A:7JQ ,:5lQ7:=6Q ,52E2\96:89ElQ`__Q ,52E2\2==@H65\7:=6\6IE6?D:@?DlQI=D ,I=DI ,4DGQm") & vbCrLf):Response.Write(CJCCJCJJ("k3Cm") & vbCrLf):Response.Write(CJCCJCJJ("k7@C>m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=686?5m逄@拤@寷@兠@佈@罩@k^=686?5m") & vbCrLf):Response.Write(CJCCJCJJ(" ,kD6=64E ,?2>6lQ56AEQmk^D6=64Em") & vbCrLf):Response.Write(CJCCJCJJ(" ,")):If CCCJJJC(1)>=3 Then Response.Write(vbCrLf):Response.Write(CJCCJCJJ(" ,kD6=64E ,?2>6lQ8C256Qm") & vbCrLf):Response.Write(CJCCJCJJ(" ,")):if CCCCJJ=0 then response.Write CJCCJCJJ("k@AE:@? ,G2=F6lVVm,穵@.k^@AE:@?m") Call ShowListSelect(CJCCJCJJ(">6>36C08C256"),IIf(CCCJJJC(1)<=2,0,CJJCJCJ),CCCJCCJ) else response.Write CJCCJCJJ("k@AE:@? ,G2=F6lV") & CCCCJJ & CJCCJCJJ("Vm") & CJCJCJJJ(CJCCJCJJ(">6>36C08C256"),CJJCJCJ,CCCCJJ) & CJCCJCJJ("k^@AE:@?m") end if:Response.Write(vbCrLf):Response.Write(CJCCJCJJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCCJCJJ(" ,")) End If:If CCCJJJC(3)<>"" Then Response.Write(vbCrLf):Response.Write(CJCCJCJJ(" ,kD6=64E ,?2>6lQ8C@FAQm") & vbCrLf):Response.Write(CJCCJCJJ(" ,k@AE:@? ,G2=F6lQQm,穵@.k^@AE:@?m") & vbCrLf):Response.Write(CJCCJCJJ(" ,")):Call ShowListSelect(CJCCJCJJ(">6>36C04FDE@>8C@FA"),CJJCJCJ,0):Response.Write(vbCrLf):Response.Write(CJCCJCJJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCCJCJJ(" ,")) End If:Response.Write(vbCrLf):Response.Write(CJCCJCJJ(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQ=:DEQm") & vbCrLf):Response.Write(CJCCJCJJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCCJCJJ("k^7@C>m") & vbCrLf):Response.Write(CJCCJCJJ("k7:6=5D6E ,:5lQAC6G:6HQm") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=686?5m顿@觃@tI46=丨@敫@捩@(,怶@敫@:,kDA2?mk^DA2?m),k^=686?5m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k5:G ,:5lQAC6G:6H\4@?E6?EQmk^5:Gm") & vbCrLf):Response.Write(CJCCJCJJ(" ,k3Cm") & vbCrLf):Response.Write(CJCCJCJJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,:5lQ3E?\:>A@CEQ ,G2=F6lQ廻@姆@寷@兠@Qm") & vbCrLf):Response.Write(CJCCJCJJ("k^7:6=5D6Em") & vbCrLf):Response.Write(CJCCJCJJ("k7:6=5D6E ,:5lQ>D8\HC2AQm") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=686?5m俜@恪@k^=686?5m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k5:G ,:5lQ>D8Qmk^5:Gm") & vbCrLf):Response.Write(CJCCJCJJ("k^7:6=5D6Em") & vbCrLf):Response.Write(CJCCJCJJ("k7:6=5D6Em") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=686?5m擈@佗@揋@礵@k^=686?5m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k@=m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:m句@诶@发@tI46=巠@佗@簺@癿@笧@一,弛@巠@佗@衣@,,丏@敫@捩@衣@丈@胸@朄@卐@儾@样@吃@幱@惀@冰@,,笧@一,衇@丵@衣@夯@,,仉@笧@亇@衇@廻@姆@讫@彐@敫@捩@;,k^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:m巠@佗@衣@划@挄@煢@仠@丆@页@床@掍@划@丏@丈@胸@穵@缵@:,")):Response.Write CJCJJJCC(CJCCJCJJ("}F>36C")):Response.Write(CJCCJCJJ("^躦@仸@讼@史@、,姎@合@、,怢@刦@、,凵@甚@无@朚@、,扆@朵@史@矼@(,公@d划@),,,共@丨@:,") & vbCrLf):Response.Write(CJCCJCJJ(" ,kF=m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:m")):Response.Write CJCJJJCC(CJCCJCJJ("}F>36C")):Response.Write(CJCCJCJJ(":,苬@斂@(,夢@尊@冔@丈@陋@),、,敫@孒@我@耀@线@吃@,,丈@胸@凵@玫@汄@孒@筄@牴@殅@孒@笡@,,诠@顴@丵@忀@顶@,,好@林@穵@缵@封@佗@丵@旛@敃@敫@捩@耇@袦@忸@畠@,,好@林@")):Response.Write CJCJJJCC(CJCCJCJJ("}F>36C")):Response.Write(CJCCJCJJ("釈@夈@封@曯@斫@贿@斔@;,k^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:m姎@合@:,晩@逕@斂@孒@,,好@林@穵@缵@刔@仠@")):Response.Write CJCJJJCC(CJCCJCJJ("}F>36C")):Response.Write(CJCCJCJJ("丵@共@姎@合@;,k^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:m怢@刦@:,甲@怢@産@汄@孒@“,甲@”,我@敫@孒@“,`”,、,奮@怢@産@汄@孒@“,奮@”,我@敫@孒@“,_”,衣@礵@,,好@林@歟@顴@穵@缵@我@耀@样@弊@丈@歞@硩@刔@黓@讟@丵@甲@怢@;,k^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:m甚@无@:,仠@JJJJ\>>\55我@JJJJ>>55样@弊@衣@礵@,,好@林@丵@穵@黓@讟@丵@")):Response.Write CJCJJCJC(CCCJCJJ,0):Response.Write(CJCCJCJJ(";,k^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:m扆@朵@:,扆@朵@史@矼@,,好@林@丈@昪@吃@泐@扆@朵@史@样@弊@封@袦@忸@畠@;,k^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k^F=m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:m寷@兠@旱@斫@墙@癿@亵@呓@刘@姆@寁@矼@丵@")):Response.Write CJCJJJCC(CJCCJCJJ("}F>36C")):Response.Write(CJCCJCJJ("吉@e佈@,,好@林@丈@趮@e佈@癿@,,尬@産@")):Response.Write CJCJJJCC(CJCCJCJJ("}F>36C")):Response.Write(CJCCJCJJ("佗@寁@矼@;,k^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:m好@林@寷@兠@")):Response.Write CJCJJJCC(CJCCJCJJ("}F>36C")):Response.Write(CJCCJCJJ("圣@糶@绚@巭@绊@孓@圣@,,封@産@斫@癿@贿@斔@曯@斫@既@癿@贿@斔@(,共@丨@凵@甚@无@朚@、,扆@朵@咇@寁@矼@丈@丵@穵@曯@斫@诠@顴@,,丵@穵@丈@曯@斫@诠@顴@),;,k^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k=:m逄@拤@斂@仱@吉@凵@玫@划@敫@揋@礵@我@衣@样@丨@朄@髓@亩@敫@捩@衇@,,诲@俩@歞@tI46=吉@釈@斫@擈@佗@,,好@林@敫@捩@沜@闩@颓@圣@顿@觃@衣@样@丆@斴@封@凵@玫@“,廻@姆@寷@兠@”,挄@钩@,,炴@凶@吉@扈@寷@兠@,,廻@姆@寷@兠@吉@挄@钩@丆@斴@伕@揋@礵@迖@庡@叅@曻@练@绎@林@。,k^=:m") & vbCrLf):Response.Write(CJCCJCJJ(" ,k^@=m") & vbCrLf):Response.Write(CJCCJCJJ("k^7:6=5D6Em") & vbCrLf):Response.Write(CJCCJCJJ("k:?AFE ,EJA6lQ9:556?Q ,:5lQ>6>\EJA6Q ,G2=F6lQ")):Response.Write CCCJJJ:Response.Write(CJCCJCJJ("Qm") & vbCrLf):Response.Write(CJCCJCJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCJJ("kD4C:AE ,DC4lQ^$4C:AED^49@D6?^49@D6?];BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCJJ("kD4C:AE ,DC4lQ^$4C:AED^I=DI]4@C6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCJJ("kD4C:AE ,DC4lQ^$4C:AED^5C@A:7J^;D^5C@A:7J]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCJJ("kD4C:AE ,DC4lQ^$4C:AED^52J;D^52J;D]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCJJ("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCJJ("kD4C:AE ,DC4lV^$4C:AED^;BF6CJ]D6=64E42496];DVmk^D4C:AEm") & vbCrLf):Response.Write(CJCCJCJJ("kD4C:AEm") & vbCrLf):Response.Write(CJCCJCJJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,=:DE") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,梻@浆@浊@觃@噣@樜@弊@(,句@攪@拼@杼@通@樜@弊@),") & vbCrLf):Response.Write(CJCCJCJJ(" ,:7WH:?5@H]p4E:G6)~3;64EPllF?567:?65XL") & vbCrLf):Response.Write(CJCCJCJJ(" ,=2J6C]2=6CEWV彎@剈@劚@胸@句@攪@拼@浊@觃@噣@杼@通@樜@弊@,,诲@刂@捝@吉@釈@诐@。,VX") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,陝@糶@、,幯@红@、,线@刦@") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVD6=64E,?2>6lQ8C256Q.[D6=64E,?2>6lQ8C@FAQ.VX]H:5E9W7F?4E:@?W:[HXLC6EFC? ,HZ`aNX]49@D6?WL5:D23=60D62C490E9C6D9@=5i`_[?@0C6DF=ED0E6IEiV沜@朄@绎@林@匴@酈@:,V[D62C4904@?E2:?DiECF6NX") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVD6=64E,?2>6lQ56AEQ.VX]D6=64E42496WL") & vbCrLf):Response.Write(CJCCJCJJ(" ,FC=iV^56A2CE>6?E^2==49:=5C6?n:5lVZSWVR>6>\EJA6VX]G2=WX[") & vbCrLf):Response.Write(CJCCJCJJ(" ,EC66iECF6") & vbCrLf):Response.Write(CJCCJCJJ(" ,NX") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,炴@凶@力@轸@斂@仱@擈@佗@匵@埚@") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWV:?AFE]5C@A:7JVX]D9@HWX]5C@A:7JWL") & vbCrLf):Response.Write(CJCCJCJJ(" ,>6DD286DiL") & vbCrLf):Response.Write(CJCCJCJJ(" ,5672F=EiV患@只@仠@炴@凶@逄@拤@我@耀@拑@劣@tI46=斂@仱@别@歟@佈@罩@(,攪@拼@I=D、,I=DI我@4DG样@弊@),V[") & vbCrLf):Response.Write(CJCCJCJJ(" ,C6A=246iV襼@曯@捝@斂@仱@只@炴@凶@釈@逄@我@耀@拑@劣@斂@仱@别@歟@V[") & vbCrLf):Response.Write(CJCCJCJJ(" ,C6>@G6iV秶@陟@V[") & vbCrLf):Response.Write(CJCCJCJJ(" ,6CC@CiV貇@伷@凵@锔@亁@V") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,NX]@?WV5C@A:7J]27E6Cr=62CV[7F?4E:@?WXL") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVRAC6G:6H\4@?E6?EVX]6>AEJWX") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVRAC6G:6HVX]9:56WX") & vbCrLf):Response.Write(CJCCJCJJ(" ,NX") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,逄@拤@斂@仱@吉@") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVR7:=6VX]@?WV492?86V[7F?4E:@?W6XL") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,7:=6Dl6]E2C86E]7:=6D") & vbCrLf):Response.Write(CJCCJCJJ(" ,:7W7:=6D]=6?8E9m_XL") & vbCrLf):Response.Write(CJCCJCJJ(" ,=2J6C]=@25WX") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,7:=6l7:=6D,_.") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,C6256Cl?6H ,u:=6#6256CWX") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,诶@发@吉@擈@佗@(,斴@泐@宕@乄@圣@剈@靝@),") & vbCrLf):Response.Write(CJCCJCJJ(" ,C6256C]@?=@25l7F?4E:@?W6XL") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,52E2l6]E2C86E]C6DF=E") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,46==%6IEi72=D6寷@臯@孡@史@丵@夕@佈@敫@孒@昹@礵@戋@秌@孡@讜@敫@泐@") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,H@C<3@@6DlH@C<3@@<]$966E}2>6D") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,H@C6D,_..") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,4DGl){$)]FE:=D]D966E0E@04DGWH@C>Q\Q55V[#$iV,r#{u.V[u$iVMVNX") & vbCrLf):Response.Write(CJCCJCJJ(" ,4DGl4DG]C6A=246W^-?^8[VVX") & vbCrLf):Response.Write(CJCCJCJJ(" ,=2J6C]4=@D6p==WX") & vbCrLf):Response.Write(CJCCJCJJ(" ,4DGaE23=6W4DGX") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,俩@歞@釈@逄@吇@一,严@斂@仱@@?492?86丈@觡@双@癿@闩@颓@") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVR7:=6VX]G2=WVVX") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,诶@发@") & vbCrLf):Response.Write(CJCCJCJJ(" ,C6256C]C625pDq:?2CJ$EC:?8W7:=6X") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,NX") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,封@r$'轧@捝@丵@w%|{衣@样@") & vbCrLf):Response.Write(CJCCJCJJ(" ,7F?4E:@? ,4DGaE23=6W4DGXL") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,9E>=lVkE23=6 ,4=2DDlQE30DE2EQmV") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,C@HDl4DG]DA=:EWV,r#{u.VX") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,G2=:5lECF6") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,4@=D=6?8E9lC@HD,_.]DA=:EWVMVX]=6?8E9") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVRAC6G:6HVX]49:=5C6?WV=686?5VX]49:=5C6?WVDA2?VX]E6IEWC@HD]=6?8E9\aX") & vbCrLf):Response.Write(CJCCJCJJ(" ,C@HD]A@AWX") & vbCrLf):Response.Write(CJCCJCJJ(" ,:7W4@=D=6?8E9kdXL") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2=:5l72=D6") & vbCrLf):Response.Write(CJCCJCJJ(" ,=2J6C]2=6CEWVtI46=丨@巠@佗@衣@划@敫@丈@多@(,電@ ,d ,划@),VX") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,7@CW=6E ,:l_j:kC@HD]=6?8E9j:ZZXL") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,C@HlC@HD,:.") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,4@=F>?D ,l ,C@H]DA=:EWVMVX") & vbCrLf):Response.Write(CJCCJCJJ(" ,:7W:lll_XL") & vbCrLf):Response.Write(CJCCJCJJ(" ,9E>=ZlVkE9mRk^E9mV") & vbCrLf):Response.Write(CJCCJCJJ(" ,4@=F>?D]7@Ct249W7F?4E:@?W4@=[:XL9E>=ZlVkE9mVZW:Z`XZV] ,VZ4@=ZVk^E9mVNX") & vbCrLf):Response.Write(CJCCJCJJ(" ,9E>=ZlVkE9m夂@泣@k^E9mV") & vbCrLf):Response.Write(CJCCJCJJ(" ,N6=D6L") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,>D8lV√,V") & vbCrLf):Response.Write(CJCCJCJJ(" ,:7W4@=F>?D,_.lllVVXL") & vbCrLf):Response.Write(CJCCJCJJ(" ,>D8lV×, ,孡@史@^缑@史@丵@穵@V") & vbCrLf):Response.Write(CJCCJCJJ(" ,9E>=ZlVkEC ,DEJ=6lQ324<8C@F?5iR77_jQmV") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2=:5l72=D6") & vbCrLf):Response.Write(CJCCJCJJ(" ,N6=D6 ,:7W4@=F>?D,b.UUP^/W`hMa_X-5LaN\nWW_n,`\h.XMW`,_\a.XX\nWW_n,`\h.XMW,`\a.-5XMb_Mb`XS^]E6DEW4@=F>?D,b.XXL") & vbCrLf):Response.Write(CJCCJCJJ(" ,>D8lV×, ,凵@甚@无@朚@样@弊@丈@寴@V") & vbCrLf):Response.Write(CJCCJCJJ(" ,9E>=ZlVkEC ,DEJ=6lQ324<8C@F?5iR77_jQmV") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2=:5l72=D6") & vbCrLf):Response.Write(CJCCJCJJ(" ,N6=D6L") & vbCrLf):Response.Write(CJCCJCJJ(" ,9E>=ZlVkECmV") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,9E>=ZlVkE5mVZ:ZVk^E5mV") & vbCrLf):Response.Write(CJCCJCJJ(" ,4@=F>?D]7@Ct249W7F?4E:@?W4@=XL9E>=ZlVkE5mVZ4@=ZVk^E5mVNX") & vbCrLf):Response.Write(CJCCJCJJ(" ,7@CW=6E ,;l_j;k4@=D=6?8E9\4@=F>?D]=6?8E9j;ZZXL9E>=ZlVkE5mk^E5mVN") & vbCrLf):Response.Write(CJCCJCJJ(" ,9E>=ZlVkE5 ,4=2DDlQE6IE\=67EQmVZ>D8ZVk^E5mk^ECmV") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,9E>=ZlVk^E23=6mV") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVRAC6G:6HVX]D=:56s@H?WX") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVRAC6G:6H\4@?E6?EVX]9E>=W9E>=X") & vbCrLf):Response.Write(CJCCJCJJ(" ,:7WG2=:5XL") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVR3E?\:>A@CEVX]D9@HWX") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVR>D8VX]6>AEJWX") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVR>D8\HC2AVX]9:56WX") & vbCrLf):Response.Write(CJCCJCJJ(" ,=:DElC@HD") & vbCrLf):Response.Write(CJCCJCJJ(" ,=:DE]D9:7EWX") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,4@?D@=6]=@8W=:DEX") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,廻@姆@寷@兠@") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,DE2CEl_") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,:?D6CE4@F?El_") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,FA52E64@F?El_") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVR3E?\:>A@CEVX]@?WV4=:4A@CEVX]AC@AWV5:D23=65V[ECF6X]G2=WV歞@圣@寷@兠@,,诲@稈@倔@…,…,VX") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVR>D8\HC2AVX]D=:56s@H?WX") & vbCrLf):Response.Write(CJCCJCJJ(" ,DE2CEl_") & vbCrLf):Response.Write(CJCCJCJJ(" ,:?D6CE4@F?El_") & vbCrLf):Response.Write(CJCCJCJJ(" ,FA52E64@F?El_") & vbCrLf):Response.Write(CJCCJCJJ(" ,x>A@CE:?8WX") & vbCrLf):Response.Write(CJCCJCJJ(" ,NX") & vbCrLf):Response.Write(CJCCJCJJ(" ,^^ ,寷@兠@丨@") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,S=:DElSWV:?AFE,?2>6lQ=:DEQ.VX") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,S>D8lSWVR>D8VX") & vbCrLf):Response.Write(CJCCJCJJ(" ,7F?4E:@? ,x>A@CE:?8WXL") & vbCrLf):Response.Write(CJCCJCJJ(" ,:7WDE2CEk=:DE]=6?8E9XL") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,6?5l|2E9]>:?W=:DE]=6?8E9[DE2CEZ`__X") & vbCrLf):Response.Write(CJCCJCJJ(" ,S>D8]2AA6?5WV歞@圣@寷@兠@VZWDE2CEZ`XZVOVZ6?5ZV杜@…,…,VX") & vbCrLf):Response.Write(CJCCJCJJ(" ,S=:DE]G2=W=:DE]D=:46WDE2CE[DE2CEZ`__X];@:?WV-C-?VX]C6A=246W^-E^8[VVXX") & vbCrLf):Response.Write(CJCCJCJJ(" ,S]A@DEWVDEF56?E0:>A@CE056AE08C256]2DAV[SWV7@C>VX]D6C:2=:K6WX[7F?4E:@?WC6DXL") & vbCrLf):Response.Write(CJCCJCJJ(" ,:7WC6D]492CpEW_XlllV×,VXL") & vbCrLf):Response.Write(CJCCJCJJ(" ,S>D8]9E>=WC6DX") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVR3E?\:>A@CEVX]AC@AWV5:D23=65V[72=D6X]G2=WV廻@姆@寷@兠@VX") & vbCrLf):Response.Write(CJCCJCJJ(" ,N6=D6L") & vbCrLf):Response.Write(CJCCJCJJ(" ,G2C ,C6DF=Ely$~}]A2CD6WC6DX") & vbCrLf):Response.Write(CJCCJCJJ(" ,:?D6CE4@F?EZlC6DF=E,_.") & vbCrLf):Response.Write(CJCCJCJJ(" ,FA52E64@F?EZlC6DF=E,`.") & vbCrLf):Response.Write(CJCCJCJJ(" ,DE2CEZl`__") & vbCrLf):Response.Write(CJCCJCJJ(" ,S>D8]2AA6?5WV宇@戋@k3CmVX") & vbCrLf):Response.Write(CJCCJCJJ(" ,x>A@CE:?8WX") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,NX") & vbCrLf):Response.Write(CJCCJCJJ(" ,N6=D6L") & vbCrLf):Response.Write(CJCCJCJJ(" ,S>D8]2AA6?5WV√, ,戻@朄@敫@捩@寷@兠@宇@戋@(,斫@墙@:,VZ:?D6CE4@F?EZV,,曯@斫@:,VZFA52E64@F?EZV),VX") & vbCrLf):Response.Write(CJCCJCJJ(" ,SWVR3E?\:>A@CEVX]AC@AWV5:D23=65V[72=D6X]G2=WV廻@姆@寷@兠@VX]9:56WX") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ(" ,N") & vbCrLf):Response.Write(CJCCJCJJ("NX") & vbCrLf):Response.Write(CJCCJCJJ("k^D4C:AEm") & vbCrLf):Response.Write(CJCCJCJJ("k^3@5Jm") & vbCrLf):Response.Write(CJCCJCJJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJCJJJJJ=nothing:set CJCJJJJC=nothing:set CJCJJJCJ=nothing:set CJCJJJCC=nothing:CCJJCC.Close:Set CCJJCC=Nothing:CCJJCJ.Close:Set CCJJCJ=Nothing:CCJJJJ.Close:Set CCJJJJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJCCJCJJ(ByVal CCCJJJJ) Dim CJJJJJCC, CJJCJJJ, CJCJJJC CCCJJJJ = Replace(CCCJJJJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJJCJJJ = 1 To Len(CCCJJJJ) If CJJCJJJ <> CJCJJJC Then CJJJJJCC = AscW(Mid(CCCJJJJ, CJJCJJJ, 1)) If CJJJJJCC >= 33 And CJJJJJCC <= 79 Then CJCCJCJJ = CJCCJCJJ & Chr(CJJJJJCC + 47) ElseIf CJJJJJCC >= 80 And CJJJJJCC <= 126 Then CJCCJCJJ = CJCCJCJJ & Chr(CJJJJJCC - 47) Else CJCJJJC = CJJCJJJ + 1 If Mid(CCCJJJJ, CJCJJJC, 1) = Chr(64) Then CJCCJCJJ = CJCCJCJJ & ChrW(CJJJJJCC + 5) Else CJCCJCJJ = CJCCJCJJ & Mid(CCCJJJJ, CJJCJJJ, 1) End If End If Next End Function %>