<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCJJJ, CCJJC,CCJCJ, CCJCC, CCCJJ:Set CCJJJ = server.CreateObject(CJJCCJJJ("ps~sq]r@??64E:@?")):CCJJJ.open Application(CJJCCJJJ("r@??64E:@?$EC:?8")):Set CCJJC=CCJJJ::Dim CCCJC,CCCCJ,CCCCC,CJJJJJ,CJJJJC,CJJJCJ,CJJJCC,CJJCJJ,CJJCJC:Dim CJJCCJ,CJJCCC,CJCJJJ,CJCJJC,CJCJCJ,CJCJCC:Dim CJCCJJ,CJCCJC,CJCCCJ:Dim CJCCCC:CJCCCC=Trim(Request.Cookies(CJJCCJJJ("!$*|t|qt#"))):if CJCCCC="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CCCJC>0 then CCCJJ=CJJCCJJJ("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(CJJCCJJJ("弬@寁@矼@，,诲@聏@糶@箜@琁@呓@俩@攴@寁@矼@吉@冈@欜@癶@彐@。,")) Call SetMemberCookie(CCCJC,CCCCJ) End IF end if:::Sub CheckLogined():if CCCJC=0 then Call ClearMemberCookie:Call ConnClose:dim CCJJJJ:CCJJJJ=trim(request.QueryString(CJJCCJJJ("D49@@="))):if isnumeric(CCJJJJ) then response.Redirect CJJCCJJJ("^>^G2?E^R^D49@@=^") & CCJJJJ & CJJCCJJJ("^DEF56?E^=@8:?nC65:C64El") & url else Call RedirectMessage(CJJCCJJJ("癶@彐@俜@恪@夬@敃@，,诲@釈@斫@癶@彐@。,")) end if end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CJJCCJJJ("!$*|t|qt#"))="":CCCJC=0:CJJJCJ=0:CCCCJ=Empty:CJJJJC=0:CJJCJJ=0:CJJJCC=0:CJJJJJ=0:CJJCCJ=False:CJCCJC=False:CJCCCJ=Empty:End Sub:Sub CheckMemberCookie():dim CCJJJC,CCJJCJ,CCJJCC,CCJCJJ,CCJCJC:CCJJJC=split(CJCCCC,CJJCCJJJ("]")):if ubound(CCJJJC)<>2 then Call ClearMemberCookie elseif not isnumeric(CCJJJC(0)) or len(CCJJJC(1))<>32 or len(CCJJJC(2))<>32 then Call ClearMemberCookie else CCJJCJ=CCJJJC(1):for CCJJCC=1 to len(CCJJCJ):CCJCJJ=mid(CCJJCJ,CCJJCC,1):if isnumeric(CCJCJJ) then CCJCJC=CCJCJC & CCJCJJ if len(CCJCJC)=7 then exit for next:CCJJCJ=CCJJJC(2):if CCJCJC<>mid(CCJJCJ,6,7) then Call ClearMemberCookie else CCJCJJ=mid(CCJJCJ,18,10)/2:if CCJCJJ6"), CJJCCJJJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJJCCJJJ("kD4C:AE"), CJJCCJJJ("U=EjD4C:AE"),1,-1,1):str=Replace(str,CJJCCJJJ(";2G2D4C:AEi"), CJJCCJJJ(",IDD."),1,-1,1):str=Replace(str,CJJCCJJJ("2=6CEW"), CJJCCJJJ(",IDD."),1,-1,1):str=Replace(str,CJJCCJJJ("4@?7:C>W"), CJJCCJJJ(",IDD."),1,-1,1):str=Replace(str,CJJCCJJJ("AC@>AEW"), CJJCCJJJ(",IDD."),1,-1,1):str=Replace(str,CJJCCJJJ("6G2=W"), CJJCCJJJ(",IDD."),1,-1,1):str=Replace(str,CJJCCJJJ("5@4F>6?E]"), CJJCCJJJ(",IDD."),1,-1,1):On Error Goto 0:set CCJCCC=new RegExp:CCJCCC.Pattern=CJJCCJJJ("@?W,2\K.ZXl"):CCJCCC.IgnoreCase = True:CCJCCC.Global=True:str=CCJCCC.Replace(str,CJJCCJJJ("@?S`U6BF2=Dj")):set CCJCCC=nothing:CCCCCCC=str End If:End Function:Function IIf(CJJCCCJJ, CJJCCCJC, CJJCCCCJ):if isnull(CJJCCCJJ) or isempty(CJJCCCJJ) then IIf = CJJCCCCJ elseif CJJCCCJJ Then IIf = CJJCCCJC Else IIf = CJJCCCCJ end if:End Function:Const CCJCJJC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":Function CJJJJJJC(str):if isnull(str) or str="" then CJJJJJJC=False:exit function end if:Dim CCJCCC:Set CCJCCC = New RegExp:CCJCCC.Pattern = CJJCCJJJ("/`Wb,_\h.Mc,dfh.Md,_`abdefgh.Me,aef.Mf,_`abdefg.Mg,_\h.Mh,`dgh.X-5LgNS"):CCJCCC.IgnoreCase = True:CJJJJJJC = CCJCCC.test(str):set CCJCCC=nothing:End Function::::Sub SetHttpOnlyCookie(CJJCCCCC,CJCJJJJJ):dim CCJJJC:CCJJJC=CJJCCCCC & CJJCCJJJ("l") & CJCJJJJJ & CJJCCJJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJJCCJJJ("$6E\r@@<:6"),CCJJJC):End Sub::::::sub ShowMessage(CCJJJCC):response.Charset=CJJCCJJJ("FE7\g"):Response.Write CJJCCJJJ("k3Cmk5:G ,2=:8?lV46?E6CVmk5:G ,DEJ=6lV4@=@CiC65j ,7@?E\H6:89Ei3@=5j ,E6IE\2=:8?i46?E6Cj ,3@C56Ci`AI ,D@=:5 ,Rrrrrrrj ,324<8C@F?5\4@=@CiRtgtgtgj ,A255:?8icAI ,aAI ,aAIj ,H:5E9ibd_AIj ,7@?E\D:K6i`aAIVm") & CCJJJCC & CJJCCJJJ("k^5:Gmk^5:Gmk3Cm") end sub:Function CJJJJJCJ(CJJJJCJ):if isnull(CJJJJCJ) or trim(CJJJJCJ)="" or not isnumeric(CJJJJCJ) then CJJJJJCJ=false else Dim CCJCCC:Set CCJCCC = New RegExp:CCJCCC.Pattern = CJJCCJJJ("/-5ZS"):CCJCCC.IgnoreCase = True:CJJJJJCJ = CCJCCC.test(CJJJJCJ):set CCJCCC=nothing end if:End Function::Function CJJJJJCC():dim CCCJJJ,CCCJJC,CCCJCJ:CCCJCJ=10001:CCCJJJ=CJJCCJJJ("H:E9 ,E6>AE3 ,2D ,WD6=64E ,:5[:5\WC@H0?F>36CWX@G6CW@C56C ,3J ,:5XZ") & CCCJCJ-1 & CJJCCJJJ("X ,2D ,5:77 ,7C@> ,>6>36C ,H96C6 ,:5m") & CCCJCJ-1 & CJJCCJJJ("X ,D6=64E ,>2IW:5XZ` ,7C@> ,E6>AE3 ,H96C6 ,5:77l_"):set CCCJJC=CCJJJ.execute(CCCJJJ):CJJJJJCC = CCCJJC(0):if isnull(CJJJJJCC) then CJJJJJCC=CCCJCJ CCCJJC.close : set CCCJJC=nothing:End Function:::Sub ConnClose():On Error Resume Next:set CJJJJCJJ=nothing:set CJJJJCJC=nothing:set CJJJJCCJ=nothing:set CJJJJCCC=nothing:CCCJJC.close : set CCCJJC=nothing:CCJCC.Close : Set CCJCC=Nothing:CCJCJ.Close : Set CCJCJ=Nothing:CJJJCJJJ.Close : Set CJJJCJJJ = Nothing:CCJJJ.Close : Set CCJJJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCJJJCC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJJCCJJJ("!$*0|6DD286"),server.URLEncode(CCJJJCC)):Response.Redirect CJJCCJJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::Function CJJJCJJC(ByVal CJJJCJCJ,style):if not isdate(CJJJCJCJ) then CJJJCJJC=CJJJCJCJ:exit function end if:dim CCCJCC,CCCCJJ,CCCCJC,CCCCCJ:CJJJCJCJ=cdate(CJJJCJCJ):CCCJCC=Year(CJJJCJCJ):CCCCJJ=Month(CJJJCJCJ):CCCCJC=Day(CJJJCJCJ):select case style:case 0:CJJJCJJC=CCCJCC & CJJCCJJJ("\") & right(0 & CCCCJJ,2) & CJJCCJJJ("\") & right(0 & CCCCJC,2):case 1:CJJJCJJC=CCCJCC & right(0 & CCCCJJ,2) & right(0 & CCCCJC,2):case 2:CJJJCJJC=right(CCCJCC,2) & CJJCCJJJ("\") & right(0 & CCCCJJ,2) & CJJCCJJJ("\") & right(0 & CCCCJC,2):case 3:CJJJCJJC=CCCJCC & CJJCCJJJ("\") & right(0 & CCCCJJ,2):case 4:CJJJCJJC=right(0 & CCCCJJ,2) & CJJCCJJJ("\") & right(0 & CCCCJC,2):case 5:CJJJCJJC=right(0 & CCCCJC,2):case 6:CJJJCJJC=CCCJCC & CJJCCJJJ("幯@") & right(0 & CCCCJJ,2) & CJJCCJJJ("會@") & right(0 & CCCCJC,2) & CJJCCJJJ("无@"):case else CJJJCJJC=CJJJCJCJ:end select:End Function:Function CJJJCJCC(CJCJJJJC):Dim CCCJJC, CCCCCC, str(), CCJJCC,CCJCJJ,CJJJJJJ:CJJJJJJ=UCase(CJCJJJJC):If Not IsArray(Application(CJJCCJJJ("!$*0") & CJJJJJJ)) Then CCCJJ=CJJCCJJJ("D6=64E ,:5[?2>6[>6>36CEJA6 ,7C@> ,,") & CJCJJJJC & CJJCCJJJ(". ,@C56C ,3J ,D@CE[:5"):set CCCJJC=server.createobject(CJJCCJJJ("25@53]C64@C5D6E")):CCCJJC.open CCCJJ,CCJJJ,1:CCCCCC = CCCJJC.RecordCount:ReDim str(CCCCCC, 2):If CCCCCC > 0 Then For CCJJCC = 1 To CCCCCC:for CCJCJJ=0 to 2:str(CCJJCC, CCJCJJ) = CCCJJC(CCJCJJ):next:CCCJJC.MoveNext:Next End If:CCCJJC.Close: Set CCCJJC = Nothing:Application(CJJCCJJJ("!$*0") & CJJJJJJ) = str End If:CJJJCJCC = Application(CJJCCJJJ("!$*0") & CJJJJJJ):End Function:Sub ShowListSelect(CJCJJJCJ,CJCJJJCC,CJCJJCJJ):Dim str, CCJJCC, CJJJJJC:CJJJJJC = CJJJCJCC(CJCJJJCJ):For CCJJCC = 1 To UBound(CJJJJJC):if Cstr(CJJJJJC(CCJJCC,2))=Cstr(CJCJJJCC) then str = str & CJJCCJJJ("k@AE:@? ,G2=F6lV") & CJJJJJC(CCJJCC, 0) & CJJCCJJJ("V") If CStr(CJJJJJC(CCJJCC, 0)) = CJCJJCJJ & "" Then str = str & CJJCCJJJ(" ,D6=64E65lVD6=64E65V") str = str & CJJCCJJJ("m") & CJJJJJC(CCJJCC, 1) & CJJCCJJJ("k^@AE:@?m") end if:Next:Response.Write str:End Sub::::::::Sub CheckQueryTime(CJCJJCJC,CJCJJCCJ):dim str,CJJJJCJ:str=CJJCCJJJ("!$*0") & Ucase(CJCJJCJC):if Session(str)<>"" then CJJJJCJ=DateDiff(CJJCCJJJ("D"),Session(str),Time):if CJJJJCJ0 then Call ConnClose:Call ShowMessage(CJJCCJJJ("柠@话@闯@随@忀@顶@夢@争@ ,") & CJCJJCCJ & CJJCCJJJ(" ,种@，,迓@剤@ ,") & CJCJJCCJ-CJJJJCJ & CJJCCJJJ(" ,种@！,")):response.End() else Session.Contents.Remove(str) end if end if:Session(str)=Time:End Sub:::::::::Function CJJJCCJJ(str,CJCJJCCC):if isnull(str) or str="" or CJCJJCCC="" then CJJJCCJJ=False:exit function end if:Dim CCJCCC:Set CCJCCC = New RegExp:CCJCCC.Pattern = CJCJJCCC:CCJCCC.IgnoreCase = True:CJJJCCJJ = CCJCCC.test(str):set CCJCCC=nothing:End Function:::Private Const CCJCJCJ =8:Private Const CCJCJCC =4:Private Const CCJCCJJ =32:Private CJJJJCC(30):Private CJJJCJJ(30):Private Function CJJJCCJC(CJCJCJJJ, CJCJCJJC):If CJCJCJJC = 0 Then CJJJCCJC = CJCJCJJJ:Exit Function ElseIf CJCJCJJC = 31 Then If CJCJCJJJ And 1 Then CJJJCCJC = &H80000000 Else CJJJCCJC = 0 End If:Exit Function ElseIf CJCJCJJC < 0 Or CJCJCJJC > 31 Then Err.Raise 6 End If:If (CJCJCJJJ And CJJJCJJ(31 - CJCJCJJC)) Then CJJJCCJC = ((CJCJCJJJ And CJJJJCC(31 - (CJCJCJJC + 1))) * CJJJCJJ(CJCJCJJC)) Or &H80000000 Else CJJJCCJC = ((CJCJCJJJ And CJJJJCC(31 - CJCJCJJC)) * CJJJCJJ(CJCJCJJC)) End If:End Function:Private Function CJJJCCCJ(CJCJCJJJ, CJCJCJJC):If CJCJCJJC = 0 Then CJJJCCCJ = CJCJCJJJ:Exit Function ElseIf CJCJCJJC = 31 Then If CJCJCJJJ And &H80000000 Then CJJJCCCJ = 1 Else CJJJCCCJ = 0 End If:Exit Function ElseIf CJCJCJJC < 0 Or CJCJCJJC > 31 Then Err.Raise 6 End If:CJJJCCCJ = (CJCJCJJJ And &H7FFFFFFE) \ CJJJCJJ(CJCJCJJC):If (CJCJCJJJ And &H80000000) Then CJJJCCCJ = (CJJJCCCJ Or (&H40000000 \ CJJJCJJ(CJCJCJJC - 1))) End If:End Function:Private Function CJJJCCCC(CJCJCJJJ, CJCJCJJC):CJJJCCCC = CJJJCCJC(CJCJCJJJ, CJCJCJJC) Or CJJJCCCJ(CJCJCJJJ, (32 - CJCJCJJC)):End Function:Private Function CJJCJJJJ(CJCJCJCJ, CJCJCJCC):Dim CJJJCJC:Dim CJJJCCJ:Dim CJJJCCC:Dim CJJCJJJ:Dim CJJCJJC:CJJJCCC = CJCJCJCJ And &H80000000:CJJCJJJ = CJCJCJCC And &H80000000:CJJJCJC = CJCJCJCJ And &H40000000:CJJJCCJ = CJCJCJCC And &H40000000:CJJCJJC = (CJCJCJCJ And &H3FFFFFFF) + (CJCJCJCC And &H3FFFFFFF):If CJJJCJC And CJJJCCJ Then CJJCJJC = CJJCJJC Xor &H80000000 Xor CJJJCCC Xor CJJCJJJ ElseIf CJJJCJC Or CJJJCCJ Then If CJJCJJC And &H40000000 Then CJJCJJC = CJJCJJC Xor &HC0000000 Xor CJJJCCC Xor CJJCJJJ Else CJJCJJC = CJJCJJC Xor &H40000000 Xor CJJJCCC Xor CJJCJJJ End If Else CJJCJJC = CJJCJJC Xor CJJJCCC Xor CJJCJJJ End If:CJJCJJJJ = CJJCJJC:End Function:Private Function CJJCJJJC(CJCJJCJ, CCCJCC, CJCJCCJJ):CJJCJJJC = (CJCJJCJ And CCCJCC) Or ((Not CJCJJCJ) And CJCJCCJJ):End Function:Private Function CJJCJJCJ(CJCJJCJ, CCCJCC, CJCJCCJJ):CJJCJJCJ = (CJCJJCJ And CJCJCCJJ) Or (CCCJCC And (Not CJCJCCJJ)):End Function:Private Function CJJCJJCC(CJCJJCJ, CCCJCC, CJCJCCJJ):CJJCJJCC = (CJCJJCJ Xor CCCJCC Xor CJCJCCJJ):End Function:Private Function CJJCJCJJ(CJCJJCJ, CCCJCC, CJCJCCJJ):CJJCJCJJ = (CCCJCC Xor (CJCJJCJ Or (Not CJCJCCJJ))):End Function:Private Sub md5_FF(CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ, CJCJCCJC, CJCJCCCJ):CJCJCCC = CJJCJJJJ(CJCJCCC, CJJCJJJJ(CJJCJJJJ(CJJCJJJC(CJCCJJJ, CJCCJJC, CCCCJC), CJCJJCJ), CJCJCCCJ)):CJCJCCC = CJJJCCCC(CJCJCCC, CJCJCCJC):CJCJCCC = CJJCJJJJ(CJCJCCC, CJCCJJJ):End Sub:Private Sub md5_GG(CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ, CJCJCCJC, CJCJCCCJ):CJCJCCC = CJJCJJJJ(CJCJCCC, CJJCJJJJ(CJJCJJJJ(CJJCJJCJ(CJCCJJJ, CJCCJJC, CCCCJC), CJCJJCJ), CJCJCCCJ)):CJCJCCC = CJJJCCCC(CJCJCCC, CJCJCCJC):CJCJCCC = CJJCJJJJ(CJCJCCC, CJCCJJJ):End Sub:Private Sub md5_HH(CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ, CJCJCCJC, CJCJCCCJ):CJCJCCC = CJJCJJJJ(CJCJCCC, CJJCJJJJ(CJJCJJJJ(CJJCJJCC(CJCCJJJ, CJCCJJC, CCCCJC), CJCJJCJ), CJCJCCCJ)):CJCJCCC = CJJJCCCC(CJCJCCC, CJCJCCJC):CJCJCCC = CJJCJJJJ(CJCJCCC, CJCCJJJ):End Sub:Private Sub md5_II(CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ, CJCJCCJC, CJCJCCCJ):CJCJCCC = CJJCJJJJ(CJCJCCC, CJJCJJJJ(CJJCJJJJ(CJJCJCJJ(CJCCJJJ, CJCCJJC, CCCCJC), CJCJJCJ), CJCJCCCJ)):CJCJCCC = CJJJCCCC(CJCJCCC, CJCJCCJC):CJCJCCC = CJJCJJJJ(CJCJCCC, CJCCJJJ):End Sub:Private Function CJJCJCJC(CJCJCCCC):Dim CJJCJCJ:Dim CJJCJCC:Dim CJJCCJJ():Dim CJJCCJC:Dim CJJCCCJ:Dim CJJCCCC:Const CCJCCJC =512:Const CCJCCCJ =448:CJJCJCJ = Len(CJCJCCCC):CJJCJCC = (((CJJCJCJ + ((CCJCCJC - CCJCCCJ) \ CCJCJCJ)) \ (CCJCCJC \ CCJCJCJ)) + 1) * (CCJCCJC \ CCJCCJJ):ReDim CJJCCJJ(CJJCJCC - 1):CJJCCJC = 0:CJJCCCJ = 0:Do Until CJJCCCJ >= CJJCJCJ:CJJCCCC = CJJCCCJ \ CCJCJCC:CJJCCJC = (CJJCCCJ Mod CCJCJCC) * CCJCJCJ:CJJCCJJ(CJJCCCC) = CJJCCJJ(CJJCCCC) Or CJJJCCJC(Asc(Mid(CJCJCCCC, CJJCCCJ + 1, 1)), CJJCCJC):CJJCCCJ = CJJCCCJ + 1:Loop:CJJCCCC = CJJCCCJ \ CCJCJCC:CJJCCJC = (CJJCCCJ Mod CCJCJCC) * CCJCJCJ:CJJCCJJ(CJJCCCC) = CJJCCJJ(CJJCCCC) Or CJJJCCJC(&H80, CJJCCJC):CJJCCJJ(CJJCJCC - 2) = CJJJCCJC(CJJCJCJ, 3):CJJCCJJ(CJJCJCC - 1) = CJJJCCCJ(CJJCJCJ, 29):CJJCJCJC = CJJCCJJ:End Function:Private Function CJJCJCCJ(CJCJCJJJ):Dim CJCJJJJ:Dim CJCJJJC:For CJCJJJC = 0 To 3:CJCJJJJ = CJJJCCCJ(CJCJCJJJ, CJCJJJC * CCJCJCJ) And CJJJJCC(CCJCJCJ - 1):CJJCJCCJ = CJJCJCCJ & Right("0" & Hex(CJCJJJJ), 2):Next:End Function:Public Function CJJCJCCC(CJCJCCCC):CJJJJCC(0) = CLng(1):CJJJJCC(1) = CLng(3):CJJJJCC(2) = CLng(7):CJJJJCC(3) = CLng(15):CJJJJCC(4) = CLng(31):CJJJJCC(5) = CLng(63):CJJJJCC(6) = CLng(127):CJJJJCC(7) = CLng(255):CJJJJCC(8) = CLng(511):CJJJJCC(9) = CLng(1023):CJJJJCC(10) = CLng(2047):CJJJJCC(11) = CLng(4095):CJJJJCC(12) = CLng(8191):CJJJJCC(13) = CLng(16383):CJJJJCC(14) = CLng(32767):CJJJJCC(15) = CLng(65535):CJJJJCC(16) = CLng(131071):CJJJJCC(17) = CLng(262143):CJJJJCC(18) = CLng(524287):CJJJJCC(19) = CLng(1048575):CJJJJCC(20) = CLng(2097151):CJJJJCC(21) = CLng(4194303):CJJJJCC(22) = CLng(8388607):CJJJJCC(23) = CLng(16777215):CJJJJCC(24) = CLng(33554431):CJJJJCC(25) = CLng(67108863):CJJJJCC(26) = CLng(134217727):CJJJJCC(27) = CLng(268435455):CJJJJCC(28) = CLng(536870911):CJJJJCC(29) = CLng(1073741823):CJJJJCC(30) = CLng(2147483647):CJJJCJJ(0) = CLng(1):CJJJCJJ(1) = CLng(2):CJJJCJJ(2) = CLng(4):CJJJCJJ(3) = CLng(8):CJJJCJJ(4) = CLng(16):CJJJCJJ(5) = CLng(32):CJJJCJJ(6) = CLng(64):CJJJCJJ(7) = CLng(128):CJJJCJJ(8) = CLng(256):CJJJCJJ(9) = CLng(512):CJJJCJJ(10) = CLng(1024):CJJJCJJ(11) = CLng(2048):CJJJCJJ(12) = CLng(4096):CJJJCJJ(13) = CLng(8192):CJJJCJJ(14) = CLng(16384):CJJJCJJ(15) = CLng(32768):CJJJCJJ(16) = CLng(65536):CJJJCJJ(17) = CLng(131072):CJJJCJJ(18) = CLng(262144):CJJJCJJ(19) = CLng(524288):CJJJCJJ(20) = CLng(1048576):CJJJCJJ(21) = CLng(2097152):CJJJCJJ(22) = CLng(4194304):CJJJCJJ(23) = CLng(8388608):CJJJCJJ(24) = CLng(16777216):CJJJCJJ(25) = CLng(33554432):CJJJCJJ(26) = CLng(67108864):CJJJCJJ(27) = CLng(134217728):CJJJCJJ(28) = CLng(268435456):CJJJCJJ(29) = CLng(536870912):CJJJCJJ(30) = CLng(1073741824):Dim CJCJJCJ:Dim CCJCJC:Dim CJCJJCC:Dim CJCJCJJ:Dim CJCJCJC:Dim CJCJCCJ:Dim CJCJCCC:Dim CJCCJJJ:Dim CJCCJJC:Dim CCCCJC:Const CCJCCCC =7:Const CCCJJJJ =12:Const CCCJJJC =17:Const CCCJJCJ =22:Const CCCJJCC =5:Const CCCJCJJ =9:Const CCCJCJC =14:Const CCCJCCJ =20:Const CCCJCCC =4:Const CCCCJJJ =11:Const CCCCJJC =16:Const CCCCJCJ =23:Const CCCCJCC =6:Const CCCCCJJ =10:Const CCCCCJC =15:Const CCCCCCJ =21:CJCJJCJ = CJJCJCJC(CJCJCCCC):CJCJCCC = &H67452301:CJCCJJJ = &HEFCDAB89:CJCCJJC = &H98BADCFE:CCCCJC = &H10325476:For CCJCJC = 0 To UBound(CJCJJCJ) Step 16:CJCJJCC = CJCJCCC:CJCJCJJ = CJCCJJJ:CJCJCJC = CJCCJJC:CJCJCCJ = CCCCJC:md5_FF CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 0), CCJCCCC, &HD76AA478:md5_FF CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 1), CCCJJJJ, &HE8C7B756:md5_FF CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 2), CCCJJJC, &H242070DB:md5_FF CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 3), CCCJJCJ, &HC1BDCEEE:md5_FF CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 4), CCJCCCC, &HF57C0FAF:md5_FF CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 5), CCCJJJJ, &H4787C62A:md5_FF CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 6), CCCJJJC, &HA8304613:md5_FF CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 7), CCCJJCJ, &HFD469501:md5_FF CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 8), CCJCCCC, &H698098D8:md5_FF CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 9), CCCJJJJ, &H8B44F7AF:md5_FF CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 10), CCCJJJC, &HFFFF5BB1:md5_FF CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 11), CCCJJCJ, &H895CD7BE:md5_FF CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 12), CCJCCCC, &H6B901122:md5_FF CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 13), CCCJJJJ, &HFD987193:md5_FF CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 14), CCCJJJC, &HA679438E:md5_FF CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 15), CCCJJCJ, &H49B40821:md5_GG CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 1), CCCJJCC, &HF61E2562:md5_GG CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 6), CCCJCJJ, &HC040B340:md5_GG CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 11), CCCJCJC, &H265E5A51:md5_GG CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 0), CCCJCCJ, &HE9B6C7AA:md5_GG CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 5), CCCJJCC, &HD62F105D:md5_GG CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 10), CCCJCJJ, &H2441453:md5_GG CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 15), CCCJCJC, &HD8A1E681:md5_GG CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 4), CCCJCCJ, &HE7D3FBC8:md5_GG CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 9), CCCJJCC, &H21E1CDE6:md5_GG CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 14), CCCJCJJ, &HC33707D6:md5_GG CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 3), CCCJCJC, &HF4D50D87:md5_GG CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 8), CCCJCCJ, &H455A14ED:md5_GG CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 13), CCCJJCC, &HA9E3E905:md5_GG CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 2), CCCJCJJ, &HFCEFA3F8:md5_GG CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 7), CCCJCJC, &H676F02D9:md5_GG CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 12), CCCJCCJ, &H8D2A4C8A:md5_HH CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 5), CCCJCCC, &HFFFA3942:md5_HH CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 8), CCCCJJJ, &H8771F681:md5_HH CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 11), CCCCJJC, &H6D9D6122:md5_HH CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 14), CCCCJCJ, &HFDE5380C:md5_HH CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 1), CCCJCCC, &HA4BEEA44:md5_HH CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 4), CCCCJJJ, &H4BDECFA9:md5_HH CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 7), CCCCJJC, &HF6BB4B60:md5_HH CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 10), CCCCJCJ, &HBEBFBC70:md5_HH CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 13), CCCJCCC, &H289B7EC6:md5_HH CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 0), CCCCJJJ, &HEAA127FA:md5_HH CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 3), CCCCJJC, &HD4EF3085:md5_HH CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 6), CCCCJCJ, &H4881D05:md5_HH CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 9), CCCJCCC, &HD9D4D039:md5_HH CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 12), CCCCJJJ, &HE6DB99E5:md5_HH CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 15), CCCCJJC, &H1FA27CF8:md5_HH CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 2), CCCCJCJ, &HC4AC5665:md5_II CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 0), CCCCJCC, &HF4292244:md5_II CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 7), CCCCCJJ, &H432AFF97:md5_II CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 14), CCCCCJC, &HAB9423A7:md5_II CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 5), CCCCCCJ, &HFC93A039:md5_II CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 12), CCCCJCC, &H655B59C3:md5_II CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 3), CCCCCJJ, &H8F0CCC92:md5_II CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 10), CCCCCJC, &HFFEFF47D:md5_II CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 1), CCCCCCJ, &H85845DD1:md5_II CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 8), CCCCJCC, &H6FA87E4F:md5_II CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 15), CCCCCJJ, &HFE2CE6E0:md5_II CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 6), CCCCCJC, &HA3014314:md5_II CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 13), CCCCCCJ, &H4E0811A1:md5_II CJCJCCC, CJCCJJJ, CJCCJJC, CCCCJC, CJCJJCJ(CCJCJC + 4), CCCCJCC, &HF7537E82:md5_II CCCCJC, CJCJCCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CCJCJC + 11), CCCCCJJ, &HBD3AF235:md5_II CJCCJJC, CCCCJC, CJCJCCC, CJCCJJJ, CJCJJCJ(CCJCJC + 2), CCCCCJC, &H2AD7D2BB:md5_II CJCCJJJ, CJCCJJC, CCCCJC, CJCJCCC, CJCJJCJ(CCJCJC + 9), CCCCCCJ, &HEB86D391:CJCJCCC = CJJCJJJJ(CJCJCCC, CJCJJCC):CJCCJJJ = CJJCJJJJ(CJCCJJJ, CJCJCJJ):CJCCJJC = CJJCJJJJ(CJCCJJC, CJCJCJC):CCCCJC = CJJCJJJJ(CCCCJC, CJCJCCJ):Next:CJJCJCCC = LCase(CJJCJCCJ(CJCJCCC) & CJJCJCCJ(CJCCJJJ) & CJJCJCCJ(CJCCJJC) & CJJCJCCJ(CCCCJC)):End Function::dim CCJJJJ:CCCJJ=Request.ServerVariables(CJJCCJJJ("!p%w0x}u~")):if instr(CCCJJ,CJJCCJJJ("^D49@@=^25>:?^"))>0 then Call CheckLogined:if not CJJCCJ and not CJCCJC then Call RedirectMessage(CJJCCJJJ("寴@丈@赲@，,患@沜@朄@迖@兠@诠@顰@靝@癿@朾@陋@。,")) CCJJJJ=CJJJCC elseif instr(CCCJJ,CJJCCJJJ("^>^D49@@=^DEF56?E^"))>0 or instr(CCCJJ,CJJCCJJJ("^DEF56?E^"))>0 then Call CheckLogined:CCJJJJ=CJJJCC elseif instr(CCCJJ,CJJCCJJJ("^D49@@="))>0 then CCJJJJ=Request.QueryString(CJJCCJJJ("D49@@=")):if not CJJJJJCJ(CCJJJJ) then CCJJJJ=Request.QueryString(CJJCCJJJ("F")) if not CJJJJJCJ(CCJJJJ) then CCJJJJ=Request.QueryString(CJJCCJJJ("D4")) if not CJJJJJCJ(CCJJJJ) then Call RedirectMessage(CJJCCJJJ("糶@绚@厽@敫@W$49@@=X忀@顶@丵@敫@孒@。,")) CCJJJJ=csng(CCJJJJ) end if:if CCJJJJ=0 then Call RedirectMessage(CJJCCJJJ("糶@绚@厽@敫@W$49@@=X锔@诪@W_X。,")) Dim CJCCJCJ:Call SetConfig:Sub SetConfig():dim CJCCJCC,CCCJJC:CCCJJ=CJJCCJJJ("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")):CJCCJCC(3)=CCCJJC(CJJCCJJJ("4FDE@>8C@FA")) & "":CJCCJCC(4)=CCCJJC(CJJCCJJJ("D:5632C0@E96C")) & "":CJCCJCC(5)=IIf(isnull(CCCJJC(CJJCCJJJ("E6DEC6DF=EG:6H"))),0,CCCJJC(CJJCCJJJ("E6DEC6DF=EG:6H"))):CJCCJCC(6)=CCCJJC(CJJCCJJJ("K:IF?E:>6")):CJCCJCC(7)=CCCJJC(CJJCCJJJ("766")):CJCCJCC(8)=CCCJJC(CJJCCJJJ("C6E6DE52J")):CJCCJCC(9)=CCCJJC(CJJCCJJJ("6IA:C652E6")):CJCCJCC(10)=CCCJJC(CJJCCJJJ("E:E=6")):CJCCJCC(11)=CCCJJC(CJJCCJJJ(":?EC@")) & "":CJCCJCC(12)=CCCJJC(CJJCCJJJ("A:4EFC6")) & "":CJCCJCC(13)=CCCJJC(CJJCCJJJ("72>:=J")):CJCCJCC(14)=CCCJJC(CJJCCJJJ("4@AJC:89E")) & "":CJCCJCC(15)=IIf(isnull(CCCJJC(CJJCCJJJ("D6>6DE6C0DE2CE052E6"))),CJJCCJJJ("`h__\`\`"),CCCJJC(CJJCCJJJ("D6>6DE6C0DE2CE052E6"))):CJCCJCC(16)=IIf(isnull(CCCJJC(CJJCCJJJ("K:IF?0E:>6D09:89=:89E"))),0,CCCJJC(CJJCCJJJ("K:IF?0E:>6D09:89=:89E"))):CJCCJCC(17)=CCCJJC(CJJCCJJJ("4@?E24E")) & "":CJCCJCC(18)=CCCJJC(CJJCCJJJ("D2?5E23=6")):CJCCJCC(19)=CCCJJC(CJJCCJJJ("4C:D:D")):CJCCJCC(20)=CCCJJC(CJJCCJJJ("JJ52E6")):CJCCJCC(21)=CCCJJC(CJJCCJJJ("BB")):CJCCJCC(22)=CCCJJC(CJJCCJJJ("JFJF60D>D0EA=")) & "":CJCCJCC(23)=CCCJJC(CJJCCJJJ("JFJF60E6DE0=3")) & "":CJCCJCC(25)=CCCJJC(CJJCCJJJ("6IA6CE")):CJCCJCC(26)=CCCJJC(CJJCCJJJ(">@5:?7@")):CJCCJCC(27)=CCCJJC(CJJCCJJJ("9@>6A286E@AA:4EFC6")) & "":CJCCJCC(28)=CCCJJC(CJJCCJJJ("4C:D:D=3")):CJCCJCC(29)=IIf(CCCJJC(CJJCCJJJ("4C:D:D@=5")),False,True):CJCCJCC(30)=CCCJJC(CJJCCJJJ("8C@FA8F:52?46")):CJCCJCC(31)=CCCJJC(CJJCCJJJ("3:@7665324<")):CJCCJCC(32)=CCCJJC(CJJCCJJJ("<6JDEC")):CJCCJCC(33)=CCCJJC(CJJCCJJJ("=@8@")) & "":CJCCJCC(34)=CCCJJC(CJJCCJJJ("K:46")):CJCCJCC(35)=IIf(CCCJJC(CJJCCJJJ(":D?6H")),True,False):CJCCJCC(36)=121:CJCCJCC(37)=111:CJCCJCC(38)=160:CJCCJCC(39)=CCCJJC(CJJCCJJJ("8F6DE3@@<")):CJCCJCC(40)=CCCJJC(CJJCCJJJ("75D")):CJCCJCC(42)=CCCJJC(CJJCCJJJ("9@>6=@8:?")):CJCCJCC(43)=CCCJJC(CJJCCJJJ("K:IF?0?6657665324<")):CJCCJCC(44)=CCCJJC(CJJCCJJJ("K:IF?0E:>6D0=:>:E")):CJCCJCC(45)=CCCJJC(CJJCCJJJ("4@>A=6E60:?7@")):CJCCJCC(46)=CCCJJC(CJJCCJJJ("E6DE:?EC@")) & "":CJCCJCC(47)=IIf(isnull(CCCJJC(CJJCCJJJ("JFJF60367@C60E:>6"))),0,CCCJJC(CJJCCJJJ("JFJF60367@C60E:>6"))):CJCCJCC(49)=CCCJJC(CJJCCJJJ("D>D0C646:G6C")):CJCCJCC(50)=CCCJJC(CJJCCJJJ("D>D0D:8?")) & "":CJCCJCC(52)=CCCJJC(CJJCCJJJ("JFJF602CC2?86")):CJCCJCC(53)=IIf(isnull(CCCJJC(CJJCCJJJ("DEF56?E0BF6DE:@?04@F?E"))),0,CCCJJC(CJJCCJJJ("DEF56?E0BF6DE:@?04@F?E"))):CJCCJCC(54)=CCCJJC(CJJCCJJJ("9:560=30@FE@7286")):CJCCJCC(55)=CCCJJC(CJJCCJJJ("JFJF60E6DE052JD")):CJCCJCC(56)=CCCJJC(CJJCCJJJ("JFJF60H66<0=:>:E")):CJCCJCC(57)=CCCJJC(CJJCCJJJ("JFJF604964<65")):CJCCJCC(58)=CCCJJC(CJJCCJJJ("K:IF?0?6657665324<0?6IE")):CJCCJCC(59)=CCCJJC(CJJCCJJJ("49642E6"),CJJCCJJJ("}F>36C"),CJJCCJJJ("%62496C"),CJJCCJJJ("!2C6?E")):select case CJCCJCJ(1):case 1,2 : CJCCCJC=Array(CJJCCJJJ("孡@栜@"),CJJCCJJJ("孡@甚@"),CJJCCJJJ("珨@红@"),CJJCCJJJ("幯@红@"),CJJCCJJJ("吇@孡@"),CJJCCJJJ("孡@史@"),CJJCCJJJ("敔@布@"),CJJCCJJJ("宱@镺@")):case 3,16 : CJCCCJC=Array(CJJCCJJJ("孡@栜@"),CJJCCJJJ("孡@甚@"),CJJCCJJJ("陝@糶@"),CJJCCJJJ("幯@红@"),CJJCCJJJ("吇@孡@"),CJJCCJJJ("孡@史@"),CJJCCJJJ("敔@布@"),CJJCCJJJ("宱@镺@")):case 4 : CJCCCJC=Array(CJJCCJJJ("匶@陝@"),CJJCCJJJ("杠@论@耀@"),CJJCCJJJ("卐@佈@"),CJJCCJJJ("幯@仸@"),CJJCCJJJ("吇@了@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("匶@甚@"),CJJCCJJJ("宱@屙@")):case 5 : CJCCCJC=Array(CJJCCJJJ("卐@佈@"),CJJCCJJJ("呓@巠@"),CJJCCJJJ("郣@闣@"),CJJCCJJJ("幯@仸@"),CJJCCJJJ("吇@了@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("呓@巠@"),CJJCCJJJ("宱@屙@")):case 6 : CJCCCJC=Array(CJJCCJJJ("卐@佈@"),CJJCCJJJ("杠@论@耀@"),CJJCCJJJ("线@刦@"),CJJCCJJJ("幯@仸@"),CJJCCJJJ("吇@了@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("咣@话@布@"),CJJCCJJJ("宱@屙@")):case 7 : CJCCCJC=Array(CJJCCJJJ("卐@佈@"),CJJCCJJJ("宓@兰@"),CJJCCJJJ("郣@闣@"),CJJCCJJJ("幯@仸@"),CJJCCJJJ("戓@叆@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("咣@话@布@"),CJJCCJJJ("宱@屙@")):case 8 : CJCCCJC=Array(CJJCCJJJ("卐@佈@"),CJJCCJJJ("杠@论@耀@"),CJJCCJJJ("卐@佈@"),CJJCCJJJ("兠@聇@幯@仸@"),CJJCCJJJ("吇@了@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("咣@话@布@"),CJJCCJJJ("酈@偱@")):case 9 : CJCCCJC=Array(CJJCCJJJ("卐@佈@"),CJJCCJJJ("敔@布@"),CJJCCJJJ("卐@佈@"),CJJCCJJJ("幯@仸@"),CJJCCJJJ("吇@了@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("咣@话@布@"),CJJCCJJJ("酈@偱@")):case 10 : CJCCCJC=Array(CJJCCJJJ("卐@佈@"),CJJCCJJJ("氌@譡@"),CJJCCJJJ("郣@闣@"),CJJCCJJJ("兠@譡@幯@仸@"),CJJCCJJJ("吇@了@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("咣@话@布@"),CJJCCJJJ("宱@屙@")):case 11 : CJCCCJC=Array(CJJCCJJJ("卐@佈@"),CJJCCJJJ("內@劜@呓@"),CJJCCJJJ("郣@闣@"),CJJCCJJJ("幯@仸@"),CJJCCJJJ("吇@了@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("咣@话@布@"),CJJCCJJJ("宱@屙@")):case 12 : CJCCCJC=Array(CJJCCJJJ("卐@佈@"),CJJCCJJJ("幭@譡@"),CJJCCJJJ("卐@佈@"),CJJCCJJJ("兠@譡@幯@仸@"),CJJCCJJJ("吇@了@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("咣@话@布@"),CJJCCJJJ("宱@屙@")):case 13 : CJCCCJC=Array(CJJCCJJJ("卐@佈@"),CJJCCJJJ("孡@呓@"),CJJCCJJJ("卐@佈@"),CJJCCJJJ("幯@仸@"),CJJCCJJJ("戓@叆@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("敔@呓@"),CJJCCJJJ("宱@屙@")):case 14 : CJCCCJC=Array(CJJCCJJJ("月@劜@炴@"),CJJCCJJJ("局@氌@"),CJJCCJJJ("线@刦@"),CJJCCJJJ("幯@仸@"),CJJCCJJJ("邶@采@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("咣@话@布@"),CJJCCJJJ("宱@屙@")):case 15 : CJCCCJC=Array(CJJCCJJJ("卐@佈@"),CJJCCJJJ("盌@独@氌@譡@"),CJJCCJJJ("卐@佈@"),CJJCCJJJ("兠@譡@幯@仸@"),CJJCCJJJ("吇@了@"),CJJCCJJJ("缑@史@"),CJJCCJJJ("咣@话@布@"),CJJCCJJJ("宱@屙@")):case else : CJCCCJC=CJCCCJJ end select:for CCJJCC=0 to Ubound(CJCCJCC):CJCCJCC(CCJJCC,0)=CJCCCJJ(CCJJCC):CJCCJCC(CCJJCC,1)=CJCCCJC(CCJJCC):next:for CCJJCC=0 to Ubound(CJCCJCC):if CJCCJCC(CCJJCC,0)=CJCJJCJC then CJJJJCCC=CJCCJCC(CCJJCC,1):exit for end if:next:End Function::dim CJCCCCJ,CJCCCCC:CJCCCCJ=CJJCCJJJ("kDA2? ,4=2DDlVC65DE2CVmYk^DA2?m") CJCCCCC=CJJCCJJJ("C6BF:C65"):If Request.ServerVariables(CJJCCJJJ("#t""&t$%0|t%w~s")) = CJJCCJJJ("!~$%") Then Call CheckQueryTime(CJJCCJJJ("C68:DE"),15):dim CCCCCC,CCJJJJJ,CCJJJJC,CCJJJCJ,CCJJJCC,CCJJCJJ:CCCCCC=Request.Form(CJJCCJJJ("?F>")):CCJJJJJ=Request.Form(CJJCCJJJ(">@3:=6")):CCJJJJC=Request.Form(CJJCCJJJ("3:CE952J")):CCJJCJJ=Request.Form(CJJCCJJJ("56AE")):CCJJJCJ=Request.Form(CJJCCJJJ("2;2I")):if not CJJJCCJJ(CCCCCC,CJJCCJJJ("/,p\+2\K_\h.ZS")) then CCJJJCC=CJJCCJJJ("寴@丈@赲@，,") & CJJJJCCC(CJJCCJJJ("}F>36C")) & CJJCCJJJ("样@弊@丈@吃@泐@。,") elseif CCJJJJJ<>"" and not CJJJJJJC(CCJJJJJ) then CCJJJCC=CJJCCJJJ("寴@丈@赲@，,扆@朵@史@样@弊@丈@吃@泐@。,") elseif not isdate(CCJJJJC) then CCJJJCC=CJJCCJJJ("寴@丈@赲@，,凵@甚@无@朚@样@弊@丈@吃@泐@。,") elseif not CJJJJJCJ(CCJJCJJ) then CCJJJCC=CJJCCJJJ("寴@丈@赲@，,诲@逄@拤@") & CJJJJCCC(CJJCCJJJ("s6AE")) & CJJCCJJJ("。,") else CCCJJ=CJJCCJJJ("D6=64E ,E@A ,` ,:5 ,7C@> ,G0>6>36C ,H96C6 ,?F>36ClV") & CCCCCC & CJJCCJJJ("V ,2?5 ,>6>36C0EJA60E@Al") & CCJJJJ set CCJCJ=CCJJJ.execute(CCCJJ):if not CCJCJ.eof then CCJJJCC=CJJCCJJJ("寴@丈@赲@，,患@癿@") & CJJJJCCC(CJJCCJJJ("}F>36C")) & CJJCCJJJ("巭@绊@袦@泣@冇@。,") else dim CCJJCJC,CCJJCCJ,CCJJCCC:CCJJCJC=request.Form(CJJCCJJJ("8C256")):CCJJCCJ=request.Form(CJJCCJJJ("8C@FA")):CCJJCCC=Request.Form(CJJCCJJJ("D6I")):if not CJJJJJCJ(CCJJCJC) then CCJJCJC=0 if not CJJJJJCJ(CCJJCCJ) then CCJJCCJ=0 if CCJJCCC<>"1" and CCJJCCC<>"0" then CCJJCCC=1 CCCJJ=CJJCCJJJ(":?D6CE ,:?E@ ,>6>36CW:5[?F>36C[A2DDH@C5[C62=?2>6[EJA6[8C256[4FDE@>8C@FA[,DE2E6.[,8C@FA.[D6I[3:CE952J[:DDEF56?E[>@3:=6[AC@G:?46[4:EJ[5:DEC:4EX ,G2=F6DW") & CJJJJJCC & CJJCCJJJ("[V") & CCCCCC & CJJCCJJJ("V") & CJJCCJJJ("[V") & CJJCJCCC(request.Form(CJJCCJJJ("A2DDH@C5"))) & CJJCCJJJ("V") & CJJCCJJJ("[}V") & CCCCCCC(Request.Form(CJJCCJJJ("C62=?2>6"))) & CJJCCJJJ("V") & CJJCCJJJ("[") & CCJJCJJ & CJJCCJJJ("[") & CCJJCJC & CJJCCJJJ("[") & CCJJCCJ & CJJCCJJJ("[") & IIf(CJCCJCJ(59),0,5) & CJJCCJJJ("[`") & CJJCCJJJ("[") & CCJJCCC & CJJCCJJJ("[V") & CCJJJJC & CJJCCJJJ("V") & CJJCCJJJ("[`") & CJJCCJJJ("[V") & CCJJJJJ & CJJCCJJJ("V") & CJJCCJJJ("[V") & CCCCCCC(Request.Form(CJJCCJJJ("AC@G:?46"))) & CJJCCJJJ("V") & CJJCCJJJ("[V") & CCCCCCC(Request.Form(CJJCCJJJ("4:EJ"))) & CJJCCJJJ("V") & CJJCCJJJ("[V") & CCCCCCC(Request.Form(CJJCCJJJ("5:DEC:4E"))) & CJJCCJJJ("V") & CJJCCJJJ("X") on error resume next:CCJJJ.Execute CCCJJ:if err then CCJJJCC=CJJCCJJJ("糶@绚@凵@玫@锔@诪@，,诲@硩@讟@患@昪@圣@歞@帳@擈@佗@。,") on error goto 0 end if end if:if CCJJJCJ="1" then Response.Write CCJJJCC elseif CCJJJCC<>"" then Call RedirectMessage(CCJJJCC) elseif CJJJCCJJ(Request.ServerVariables(CJJCCJJJ("w%%!0&$t#0pvt}%")),CJJCCJJJ(":!9@?6M:!@5Mp?5C@:5M:@DM(:?5@HD ,!9@?6Mq=24^G2?E^R^D49@@=^") & CCJJJJ & CJJCCJJJ("^DEF56?E^=@8:?Vm迏@囙@癶@彐@顰@靝@k^2m。,")) else Call RedirectMessage(CJJCCJJJ("患@巭@绊@泣@冇@戋@劚@，,诲@炴@凶@歟@壿@k2 ,9C67lV^D49@@=^:?56I]2DAnD49@@=l") & CCJJJJ & CJJCCJJJ("Vm迏@囙@癶@彐@顰@靝@k^2m。,")) end if:Response.End end if:Response.Write(vbCrLf):Response.Write(CJJCCJJJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJJCCJJJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJJCCJJJ("k9625m") & vbCrLf):Response.Write(CJJCCJJJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJJCCJJJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJJCCJJJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJJCCJJJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJJCCJJJ("kE:E=6m")):Response.Write CJCCJCJ(10):Response.Write(CJJCCJJJ("\泣@冇@k^E:E=6m") & vbCrLf):Response.Write(CJJCCJJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2>2K6F:^4DD^2>2K6F:]>:?]4DDQm") & vbCrLf):Response.Write(CJJCCJJJ("kDEJ=6m") & vbCrLf):Response.Write(CJJCCJJJ("]96256C ,L ,E6IE\2=:8?i ,46?E6Cj ,324<8C@F?5i ,Ru`u`u`j ,N") & vbCrLf):Response.Write(CJJCCJJJ("]96256C ,9` ,L ,7@?E\D:K6i ,a__Tj ,4@=@Ci ,Rbbbj ,>2C8:?\E@Ai ,b_AIj ,N") & vbCrLf):Response.Write(CJJCCJJJ("]C65DE2C ,L4@=@CiC65jN") & vbCrLf):Response.Write(CJJCCJJJ("k^DEJ=6m") & vbCrLf):Response.Write(CJJCCJJJ("k^9625m") & vbCrLf):Response.Write(CJJCCJJJ("k3@5Jm") & vbCrLf):Response.Write(CJJCCJJJ("k5:G ,4=2DDlQ96256CQm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\8Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k9`m")):Response.Write CJCCJCJ(10):Response.Write(CJJCCJJJ("\泣@冇@k^9`m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ("k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ("k5:G ,4=2DDlQ2>\8Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\F\=8\e ,2>\F\>5\g ,2>\F\D>\46?E6C65Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k7@C> ,>6E9@5lQA@DEQ ,4=2DDlQ2>\7@C>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FA ,2>\7@C>\8C@FA\D>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k=236=mkDA2? ,4=2DDlQC65DE2CQmYk^DA2?m")):Response.Write CJJJJCCC(CJJCCJJJ("s6AE")):Response.Write(CJJCCJJJ("：,k^=236=m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k3Cm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k:?AFE ,?2>6lQ56AEQ ,G2=F6lQ")):Response.Write CCJJJJ:Response.Write(CJJCCJJJ("Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,")):If CJCCJCJ(1)>=3 Then Response.Write(vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FA ,2>\7@C>\8C@FA\D>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k=236=m")):Response.Write CJCCCCJ::Response.Write CJJJJCCC(CJJCCJJJ("vC256")):Response.Write(CJJCCJJJ("：,k^=236=m") & vbCrLf):Response.Write(CJJCCJJJ(" ,kD6=64E ,?2>6lQ8C256Q ,4=2DDlQ2>\7@C>\7:6=5Q ,")):Response.Write CJCCCCC:Response.Write(CJJCCJJJ("m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k@AE:@? ,G2=F6lQQm,诲@逄@拤@.k^@AE:@?m") & vbCrLf):Response.Write(CJJCCJJJ(" ,")):Call ShowListSelect(CJJCCJJJ(">6>36C08C256"),CCJJJJ,0):Response.Write(vbCrLf):Response.Write(CJJCCJJJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,")) end if::If CJCCJCJ(3)<>"" Then Response.Write(vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FA ,2>\7@C>\8C@FA\D>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k=236=mkDA2? ,4=2DDlQC65DE2CQmYk^DA2?m")):Response.Write CJCCJCJ(3):Response.Write(CJJCCJJJ("：,k^=236=m") & vbCrLf):Response.Write(CJJCCJJJ(" ,kD6=64E ,?2>6lQ8C@FAQ ,4=2DDlQ2>\7@C>\7:6=5Q ,C6BF:C65m") & vbCrLf):Response.Write(CJJCCJJJ(" ,")):Call ShowListSelect(CJJCCJJJ(">6>36C04FDE@>8C@FA"),CCJJJJ,0):Response.Write(vbCrLf):Response.Write(CJJCCJJJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,")) end if:Response.Write(vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FA ,2>\7@C>\8C@FA\D>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k=236=mkDA2? ,4=2DDlQC65DE2CQmYk^DA2?m")):Response.Write CJJJJCCC(CJJCCJJJ("}F>36C")):Response.Write(CJJCCJJJ("：,k^=236=m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k:?AFE ,EJA6lQE6IEQ ,?2>6lQ?F>Q ,4=2DDlQ2>\7@C>\7:6=5Q ,A=2469@=56ClQ苬@斂@、,敫@孒@我@共@线@吃@Q ,A2EE6C?lQ/,p\+2\K_\h.ZSQ ,C6BF:C65m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FA ,2>\7@C>\8C@FA\D>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k=236=mkDA2? ,4=2DDlQC65DE2CQmYk^DA2?m姎@合@：,k^=236=m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k:?AFE ,EJA6lQE6IEQ ,?2>6lQC62=?2>6Q ,4=2DDlQ2>\7@C>\7:6=5Q ,>2I=6?8E9lQ`_Q ,C6BF:C65m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FA ,2>\7@C>\8C@FA\D>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k=236=mkDA2? ,4=2DDlQC65DE2CQmYk^DA2?m怢@刦@：,k^=236=m") & vbCrLf):Response.Write(CJJCCJJJ(" ,kD6=64E ,?2>6lQD6IQ ,4=2DDlQ2>\7@C>\7:6=5Q ,C6BF:C65m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k@AE:@? ,G2=F6lQQm,诲@逄@拤@.k^@AE:@?m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k@AE:@? ,G2=F6lQ`Qm甲@k^@AE:@?m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k@AE:@? ,G2=F6lQ_Qm奮@k^@AE:@?m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FA ,2>\7@C>\8C@FA\D>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k=236=mkDA2? ,4=2DDlQC65DE2CQmYk^DA2?m凵@甚@无@朚@（,样@弊@：,****\||\ss，,刁@随@笡@丵@凊@史@）,：,k^=236=m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k:?AFE ,EJA6lQE6IEQ ,4=2DDlQ2>\7@C>\7:6=5Q ,?2>6lQ3:CE952JQ ,G2=F6lQ")):Response.Write CJJJCJJC(Date,0):Response.Write(CJJCCJJJ("Q ,A2EE6C?lQ/-5LcN\-5L`[aN\-5L`[aNSQ ,C6BF:C65m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k9Cm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FA ,2>\7@C>\8C@FA\D>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k=236=m")):Response.Write CJCCCCJ:Response.Write(CJJCCJJJ("扆@朵@史@矼@：,k^=236=m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k:?AFE ,EJA6lQE6=Q ,?2>6lQ>@3:=6Q ,4=2DDlQ2>\7@C>\7:6=5Q ,A2EE6C?lQ")):Response.Write CCJCJJC:Response.Write(CJJCCJJJ("Q ,")):Response.Write CJCCCCC:Response.Write(CJJCCJJJ("m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FA ,2>\7@C>\8C@FA\D>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k=236=m戻@圣@埉@巽@：,k^=236=m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,52E2\E@88=6lQ5:DEA:4<6CQm") & vbCrLf):Response.Write(CJJCCJJJ(" ,kD6=64E ,?2>6lQAC@G:?46Q ,4=2DDlQ2>\7@C>\7:6=5Qmk^D6=64Em") & vbCrLf):Response.Write(CJJCCJJJ(" ,kD6=64E ,?2>6lQ4:EJQ ,4=2DDlQ2>\7@C>\7:6=5Qmk^D6=64Em") & vbCrLf):Response.Write(CJJCCJJJ(" ,kD6=64E ,?2>6lQ5:DEC:4EQ ,4=2DDlQ2>\7@C>\7:6=5Qmk^D6=64Em") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k9Cm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FA ,2>\7@C>\8C@FA\D>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k=236=mkDA2? ,4=2DDlQC65DE2CQmYk^DA2?m癶@彐@寁@矼@：,k^=236=m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k:?AFE ,EJA6lQA2DDH@C5Q ,:5lQADH`Q ,4=2DDlQ2>\7@C>\7:6=5Q ,2FE@4@>A=6E6lQ@77Q ,C6BF:C65m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\7@C>\8C@FA ,2>\7@C>\8C@FA\D>Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k=236=mkDA2? ,4=2DDlQC65DE2CQmYk^DA2?m硩@讟@寁@矼@：,k^=236=m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k:?AFE ,EJA6lQA2DDH@C5Q ,?2>6lQA2DDH@C5Q ,:5lQADHaQ ,4=2DDlQ2>\7@C>\7:6=5Q ,2FE@4@>A=6E6lQ@77Q ,C6BF:C65m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k9Cm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k5:G ,4=2DDlQ2>\47Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,:5lQ3E?0@\3E? ,2>\3E?\AC:>2CJ ,2>\3E?\D> ,2>\7=Qm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,:5lQ3E?0324\3E? ,2>\3E?\5672F=E ,2>\3E?\D> ,2>\7CQm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^7@C>m") & vbCrLf):Response.Write(CJJCCJJJ(" ,k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ("k^5:Gm") & vbCrLf):Response.Write(CJJCCJJJ("k:?AFE ,EJA6lQ9:556?Q ,:5lQD49@@=Q ,G2=F6lQ")):Response.Write CCJJJJ:Response.Write(CJJCCJJJ("Qm") & vbCrLf):Response.Write(CJJCCJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCCJJJ("kD4C:AE ,DC4lQ^$4C:AED^2>2K6F:^;D^2>2K6F:]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCCJJJ("kD4C:AE ,DC4lQ^$4C:AED^5:DEA:4<6C]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJJCCJJJ("kD4C:AE ,DC4lV^$4C:AED^;BF6CJ]EC66D6=64E];DVmk^D4C:AEm") & vbCrLf):Response.Write(CJJCCJJJ("kD4C:AEm") & vbCrLf):Response.Write(CJJCCJJJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJJCCJJJ(" ,G2C ,D49@@=lSWVRD49@@=VX]G2=WX") & vbCrLf):Response.Write(CJJCCJJJ(" ,SWVR3E?03246lQ56AEQ.VX]EC66D6=64EWL") & vbCrLf):Response.Write(CJJCCJJJ(" ,FC=iV^56A2CE>6?E^2==49:=5C6?n:5lVZD49@@=[") & vbCrLf):Response.Write(CJJCCJJJ(" ,42496i72=D6") & vbCrLf):Response.Write(CJJCCJJJ(" ,NX") & vbCrLf):Response.Write(CJJCCJJJ(" ,^^ ,衣@卐@揋@亟@") & vbCrLf):Response.Write(CJJCCJJJ(" ,SWV7@C>VX]@?WVDF3>:EV[7F?4E:@?WX ,L") & vbCrLf):Response.Write(CJJCCJJJ(" ,:7WSWVRD49@@=VX]G2=WXlllSWV:?AFE,?2>6lQ56AEQ.VX]G2=WXXL") & vbCrLf):Response.Write(CJJCCJJJ(" ,2=6CEWV诲@逄@拤@患@戻@圣@癿@卐@佈@。,VX") & vbCrLf):Response.Write(CJJCCJJJ(" ,C6EFC? ,72=D6") & vbCrLf):Response.Write(CJJCCJJJ(" ,N") & vbCrLf):Response.Write(CJJCCJJJ(" ,6=D6 ,:7WSWV:?AFE,?2>6lQ3:CE952JQ.VX]G2=WX]DF3DEC:?8W_[cXlllW?6H ,s2E6WXX]86EuF==*62CWX]E@$EC:?8WXXL") & vbCrLf):Response.Write(CJJCCJJJ(" ,2=6CEWV诲@塦@冔@眚@宙@癿@凵@甚@无@朚@。,VX") & vbCrLf):Response.Write(CJJCCJJJ(" ,SWV:?AFE,?2>6lQ3:CE952JQ.VX]7@4FDWX") & vbCrLf):Response.Write(CJJCCJJJ(" ,C6EFC? ,72=D6") & vbCrLf):Response.Write(CJJCCJJJ(" ,N") & vbCrLf):Response.Write(CJJCCJJJ(" ,6=D6 ,:7WSWVRADH`VX]G2=WXPllSWVRADHaVX]G2=WXXL") & vbCrLf):Response.Write(CJJCCJJJ(" ,2=6CEWV硩@讟@寁@矼@三@癶@彐@寁@矼@丈@一,臯@。,VX") & vbCrLf):Response.Write(CJJCCJJJ(" ,SWVRADH`VX]7@4FDWX") & vbCrLf):Response.Write(CJJCCJJJ(" ,C6EFC? ,72=D6") & vbCrLf):Response.Write(CJJCCJJJ(" ,N") & vbCrLf):Response.Write(CJJCCJJJ(" ,6=D6 ,:7WSWVRADH`VX]G2=WXlllV`abcdeVXL") & vbCrLf):Response.Write(CJJCCJJJ(" ,2=6CEWV患@讹@罩@癿@寁@矼@迂@争@筻@卐@，,诲@釈@斫@讹@罩@。,VX") & vbCrLf):Response.Write(CJJCCJJJ(" ,SWVRADH`VX]7@4FDWX") & vbCrLf):Response.Write(CJJCCJJJ(" ,C6EFC? ,72=D6") & vbCrLf):Response.Write(CJJCCJJJ(" ,N") & vbCrLf):Response.Write(CJJCCJJJ(" ,NX") & vbCrLf):Response.Write(CJJCCJJJ("NX") & vbCrLf):Response.Write(CJJCCJJJ("k^D4C:AEm") & vbCrLf):Response.Write(CJJCCJJJ("k^3@5Jm") & vbCrLf):Response.Write(CJJCCJJJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJJJCJJ=nothing:set CJJJJCJC=nothing:set CJJJJCCJ=nothing:set CJJJJCCC=nothing:CCJCC.Close:Set CCJCC=Nothing:CCJCJ.Close:Set CCJCJ=Nothing:CCJJJ.Close:Set CCJJJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CJJCCJJJ(ByVal CJCCJJC) Dim CCJCJJJ, CCJJCC, CJJJJCJ CJCCJJC = Replace(CJCCJJC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CCJJCC = 1 To Len(CJCCJJC) If CCJJCC <> CJJJJCJ Then CCJCJJJ = AscW(Mid(CJCCJJC, CCJJCC, 1)) If CCJCJJJ >= 33 And CCJCJJJ <= 79 Then CJJCCJJJ = CJJCCJJJ & Chr(CCJCJJJ + 47) ElseIf CCJCJJJ >= 80 And CCJCJJJ <= 126 Then CJJCCJJJ = CJJCCJJJ & Chr(CCJCJJJ - 47) Else CJJJJCJ = CCJJCC + 1 If Mid(CJCCJJC, CJJJJCJ, 1) = Chr(64) Then CJJCCJJJ = CJJCCJJJ & ChrW(CCJCJJJ + 5) Else CJJCCJJJ = CJJCCJJJ & Mid(CJCCJJC, CCJJCC, 1) End If End If Next End Function %>