Edit D:\xinhaisoft\crisis_new\school\admin\sandtable.asp

??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CCCJJC, CCCJCJ,rs, CCCCJJ, sql:Set CCCJJC = server.CreateObject(CJCJJJJJ("ps~sq]r@??64E:@?")):CCCJJC.open Application(CJCJJJJJ("r@??64E:@?$EC:?8")):Set CCCJCJ=CCCJJC::Dim CCCCCJ,CCCCCC,CJJJJJJ,CJJJJJC,CJJJJCJ,CJJJJCC,CJJJCJJ,CJJJCJC,CJJJCCJ:Dim CJJJCCC,CJJCJJJ,CJJCJJC,CJJCJCJ,CJJCJCC,CJJCCJJ:Dim CJJCCJC,CJJCCCJ,CJJCCCC:Dim CJCJJJJ:CJCJJJJ=Trim(Request.Cookies(CJCJJJJJ("!$*|t|qt#"))):if CJCJJJJ="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CCCCCJ>0 then
sql=CJCJJJJJ("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?@=@4<X ,(wt#t ,!2DDH@C5lV") & CCCCCC & CJCJJJJJ("V ,2?5 ,:5l") & CCCCCJ
set rs=CCCJJC.execute(sql):If rs.EOF Then
Call ClearMemberCookie
Else
CJJJJJJ=rs(2) & "":CJJJJJC=rs(3):CJJJJCJ=rs(5):CJJJJCC=rs(6):CJJJCJJ=rs(9):CJJJCJC=rs(15):CJJJCCC=rs(0):CJJCCCJ=rs(1):CJJCCJC=rs(11) & "":CJJCJJJ=rs(10) & "":CJJJCCJ=rs(12):CJJCJJC=rs(14):CJJCJCJ=rs(13):CJJCJCC=rs(7) & "":CJJCCJJ=rs(4):CJJCCCC=rs(8):if isnull(CJJJCJC) then CJJJCJC=0
if isnull(CJJJCJJ) or CJJJCJJ=0 then CJJJCJJ=CJJJJJC
if isnull(CJJCCJJ) then CJJCCJJ=0
if isnull(CJJJJCJ) then CJJJJCJ=0
if instr(CJCJJJJJ("6`_254bhch32dh2336de6_df7a_7ggb6"),CCCCCC)>0 then Call RedirectMessage(CJCJJJJJ("????????,????????????????????????????????,"))
Call SetMemberCookie(CCCCCJ,CCCCCC)
End IF
end if:::Sub CheckLogined():if CCCCCJ=0 then
Call ClearMemberCookie:Call ConnClose:dim CJCJJJC:CJCJJJC=trim(request.QueryString(CJCJJJJJ("D49@@="))):if isnumeric(CJCJJJC) then
response.Redirect CJCJJJJJ("^>^G2?E^R^D49@@=^") & CJCJJJC & CJCJJJJJ("^DEF56?E^=@8:?nC65:C64El") & CCJJJCC
else
Call RedirectMessage(CJCJJJJJ("??????????????,????????????,"))
end if
end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CJCJJJJJ("!$*|t|qt#"))="":CCCCCJ=0:CJJJJCC=0:CCCCCC=Empty:CJJJJCJ=0:CJJJCJC=0:CJJJCJJ=0:CJJJJJC=0:CJJJCCC=False:CJJCCCJ=False:CJJCCCC=Empty:End Sub:Sub CheckMemberCookie():dim CJCJJCJ,CJCJJCC,CJCJCJJ,CJCJCJC,CJCJCCJ:CJCJJCJ=split(CJCJJJJ,CJCJJJJJ("]")):if ubound(CJCJJCJ)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CJCJJCJ(0)) or len(CJCJJCJ(1))<>32 or len(CJCJJCJ(2))<>32 then
Call ClearMemberCookie
else
CJCJJCC=CJCJJCJ(1):for CJCJCJJ=1 to len(CJCJJCC):CJCJCJC=mid(CJCJJCC,CJCJCJJ,1):if isnumeric(CJCJCJC) then CJCJCCJ=CJCJCCJ & CJCJCJC
if len(CJCJCCJ)=7 then exit for
next:CJCJJCC=CJCJJCJ(2):if CJCJCCJ<>mid(CJCJJCC,6,7) then
Call ClearMemberCookie
else
CJCJCJC=mid(CJCJJCC,18,10)/2:if CJCJCJC<DateDiff(CJCJJJJJ("D"), CJCJJJJJ("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CCCCCJ=Clng(CJCJJCJ(0)):CCCCCC=CJCJJCJ(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CCCJCJC,CJCJJJJC):dim CJCJCJJ,CJCJCJC,CJCJCCJ:for CJCJCJJ=1 to len(CJCJJJJC):CJCJCJC=mid(CJCJJJJC,CJCJCJJ,1):if isnumeric(CJCJCJC) then CJCJCCJ=CJCJCCJ & CJCJCJC
if len(CJCJCCJ)=7 then exit for
next:CJCJCCJ=CCCJCJC & CJCJJJJJ("]") & CJCJJJJC & CJCJJJJJ("]") & Fix(10000*(Rnd+1)) & CJCJCCJ & Fix(10000*(Rnd+1)) & DateDiff(CJCJJJJJ("D"), CJCJJJJJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJCJJJJJ("!$*|t|qt#"))=CJCJCCJ:End Sub::Function CJJJJCCC(CJCJJJCJ):Dim str,CJCCJJJ:str = Trim(CJCJJJCJ):If IsNull(str) Or str = "" Then
CJJJJCCC = ""
else
str=Replace(str, CJCJJJJJ("V"), "")
str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CJCJJJJJ("k:7C2>6"), CJCJJJJJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJCJJJJJ("kD4C:AE"), CJCJJJJJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CJCCJJJ=new RegExp:CJCCJJJ.Pattern=CJCJJJJJ("@?W,2\K.ZXl"):CJCCJJJ.IgnoreCase = True:CJCCJJJ.Global=True:str=CJCCJJJ.Replace(str,CJCJJJJJ("@?S`U6BF2=Dj")):set CJCCJJJ=nothing:CJJJJCCC=str
End If:End Function:Function IIf(CJCJJJCC, CJCJJCJJ, CJCJJCJC):if isnull(CJCJJJCC) or isempty(CJCJJJCC) then
IIf = CJCJJCJC
elseif CJCJJJCC Then
IIf = CJCJJCJJ
Else
IIf = CJCJJCJC
end if:End Function:Const CCCCCCC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CJCJJCCJ,CJCJJCCC):dim CJCJJCJ:CJCJJCJ=CJCJJCCJ & "=" & CJCJJCCC & CJCJJJJJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJCJJJJJ("$6E\r@@<:6"),CJCJJCJ):End Sub:::::::Function CJJJCJJC(CCJCCJC):if isnull(CCJCCJC) or trim(CCJCCJC)="" or not isnumeric(CCJCCJC) then
CJJJCJJC=false
else
Dim CJCCJJJ:Set CJCCJJJ = New RegExp:CJCCJJJ.Pattern = CJCJJJJJ("/-5ZS"):CJCCJJJ.IgnoreCase = True:CJJJCJJC = CJCCJJJ.test(CCJCCJC):set CJCCJJJ=nothing
end if:End Function:::::Sub ConnClose():On Error Resume Next:set CJJJCJCJ=nothing:set CJJJCJCC=nothing:set CJJJCCJJ=nothing:set CJJJCCJC=nothing:CCCJJJC.close : set CCCJJJC=nothing:CCCCJJ.Close : Set CCCCJJ=Nothing:rs.Close : Set rs=Nothing:CJJJCCCJ.Close : Set CJJJCCCJ = Nothing:CCCJJC.Close : Set CCCJJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJCJCJJJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJCJJJJJ("!$*0|6DD286"),server.URLEncode(CJCJCJJJ)):Response.Redirect CJCJJJJJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::Function CJJJCCCC(ByVal CJJCJJJJ,style):if not isdate(CJJCJJJJ) then
CJJJCCCC=CJJCJJJJ:exit function
end if:dim CJCCJJC,CJCCJCJ,CJCCJCC,CJCCCJJ:CJJCJJJJ=cdate(CJJCJJJJ):CJCCJJC=Year(CJJCJJJJ):CJCCJCJ=Month(CJJCJJJJ):CJCCJCC=Day(CJJCJJJJ):select case style:case 0:CJJJCCCC=CJCCJJC & CJCJJJJJ("\") & right(0 & CJCCJCJ,2) & CJCJJJJJ("\") & right(0 & CJCCJCC,2):case 1:CJJJCCCC=CJCCJJC & right(0 & CJCCJCJ,2) & right(0 & CJCCJCC,2):case 2:CJJJCCCC=right(CJCCJJC,2) & CJCJJJJJ("\") & right(0 & CJCCJCJ,2) & CJCJJJJJ("\") & right(0 & CJCCJCC,2):case 3:CJJJCCCC=CJCCJJC & CJCJJJJJ("\") & right(0 & CJCCJCJ,2):case 4:CJJJCCCC=right(0 & CJCCJCJ,2) & CJCJJJJJ("\") & right(0 & CJCCJCC,2):case 5:CJJJCCCC=right(0 & CJCCJCC,2):case 6:CJJJCCCC=CJCCJJC & CJCJJJJJ("??") & right(0 & CJCCJCJ,2) & CJCJJJJJ("??") & right(0 & CJCCJCC,2) & CJCJJJJJ("??"):case else
CJJJCCCC=CJJCJJJJ:end select:End Function::::::::::::::::::::::Const CJJJJJJJ ="9"
Const CJJJJJJC ="7"
Const CJJJJJCJ ="3"
Const CJJJJJCC ="4"
Const CJJJJCJJ ="8"
Const CJJJJCJC =":"
Const CJJJJCCJ ="font-family: Verdana; font-size: 10px; height: 15px; border: 1px solid #666666":Class SplitPage:Private PageCount, CJCCCCJ, CJCCCCC, CCJJJJJ, CCJJJJC, CCJJJCJ, CCJJJCC, CCJJCJJ, CCJJCJC, CCJJCCJ, CCJJCCC:Private Function CJJCJJJC():Dim CCJCJJJ:CCJCJJJ = "??" & CCJJJCJ & CJCJJJJJ("k^3mk^DA2?m?????? ,????kDA2? ,DEJ=6lV4@=@CiR7__jVmk3m") & CCJJCCJ & CJCJJJJJ("k^3mk^DA2?m?? ,??????kDA2? ,DEJ=6lV4@=@CiR7__jVmk3m") & CCJJJJC & CJCJJJJJ("k^3mk^DA2?m^kDA2? ,DEJ=6lV4@=@CiR7__jVmk3m") & PageCount & CJCJJJJJ("k^3mk^DA2?m??")
CJJCJJJC = CCJCJJJ:End Function:Private Function CJJCJJCJ():CJJCJJCJ = CJCJJJJJ(" ,k:?AFE ,:5lVA286V ,EJA6lVE6IEV ,G2=F6lV") & CCJJJJC & CJCJJJJJ("V ,DEJ=6lV") & CJJJJCCJ & CJCJJJJJ("V ,D:K6lVaV ,E:E=6lV????V ,@?>@FD6@G6ClV;2G2D4C:AEiE9:D]7@4FDWXjE9:D]D6=64EWXV ,@?z6Js@H?lQ;2G2D4C:AEi ,:7WH:?5@H]6G6?E]<6Jr@56 ,ll ,`bX ,=@42E:@?lV") & CCJJJCC & CJCJJJJJ("VZE9:D]G2=F6Qm")
End Function:Private Function CJJCJJCC():CJJCJJCC = CJCJJJJJ(" ,k:?AFE ,EJA6lV3FEE@?V ,DEJ=6lV") & CJJJJCCJ & CJCJJJJJ("V ,G2=F6lVv@V ,@?4=:4<lQ;2G2D4C:AEi:7W5@4F>6?E]86Et=6>6?EqJx5WVA286VXX ,=@42E:@?lV") & CCJJJCC & CJCJJJJJ("VZ5@4F>6?E]86Et=6>6?EqJx5WVA286VX]G2=F6Qm")
End Function:Private Function CJJCJCJJ():Dim CCJCJJJ, CJCJCJJ:CCJCJJJ = CJCJJJJJ(" ,??????kD6=64E ,:5lVA286V ,@?492?86lQ;2G2D4C:AEi=@42E:@?lV") & CCJJJCC & CJCJJJJJ("VZE9:D]@AE:@?D,E9:D]D6=64E65x?56I.]G2=F6Q ,DEJ=6lV7@?E\D:K6i`_AIj ,7@?E\72>:=Ji'6C52?2Vm")
For CJCJCJJ = 1 To PageCount:CCJCJJJ = CCJCJJJ & CJCJJJJJ("k@AE:@? ,G2=F6lV") & CJCJCJJ & CJCJJJJJ("V")
If CJCJCJJ = CCJJJJC Then CCJCJJJ = CCJCJJJ & CJCJJJJJ(" ,D6=64E65")
CCJCJJJ = CCJCJJJ & CJCJJJJJ("m") & CJCJCJJ & CJCJJJJJ("k^@AE:@?m"):Next:CCJCJJJ = CCJCJJJ & CJCJJJJJ("k^D6=64Em??"):CJJCJCJJ = CCJCJJJ:End Function:Public Sub ShowPage():Dim CJCJCJJ, CCJCJJC,CCJCJCJ,CCJCJCC:if CCJJJCJ>0 then
CCJCJJC = CJCJJJJJ("k5:G ,4=2DDlVDA=:EA286V ,DEJ=6lV@G6C7=@Hi9:556?Vmk5:G ,4=2DDlVDA=:EA2860=V ,DEJ=6lV7=@2Ei=67EVm") & CJJCJJJC & CJCJJJJJ("k^5:Gmk5:G ,4=2DDlVDA=:EA2860CV ,DEJ=6lV7=@2EiC:89EVm")
If PageCount > 1 Then
Select Case CCJJCCC:Case 1: CCJCJCC = CJJCJCCC:Case 2: CCJCJCC = CJJCCJJJ:Case 3: CCJCJCC = CJJCCJJC:Case 4: CCJCJCC = CJJCCJCJ:Case 5: CCJCJCC = CJJCCJCC:Case 6: CCJCJCC = CJJCCCJJ:Case 7: CCJCJCC = CJJCCCJC:Case 8: CCJCJCC = CJJCCCCJ:End Select
End If:CCJCJCJ = CJCJJJJJ("k^5:Gmk^5:Gm")
end if:if CCJJCCC>=6 then
Response.Write CCJCJCC
else
Response.Write CCJCJJC & CCJCJCC & CCJCJCJ
end if:End Sub:Public Function Rs():On Error Resume Next:Set CJCCCCC = Server.CreateObject(CJCJJJJJ("ps~sq]#64@C5$6E")):CJCCCCC.PageSize = CCJJCCJ:CJCCCCC.Open CCJJJJJ, CJCCCCJ, 1:If err then
Response.Write	CJCJJJJJ("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:5E9ib__AIj ,7@?E\D:K6i`aAIVm????????????????,") & err.description & CJCJJJJJ("k^5:Gmk^5:Gmk3Cm")
Err.Clear:response.end
end if:If Not CJCCCCC.EOF Then
CCJJJCJ = CJCCCCC.RecordCount:PageCount = CJCCCCC.PageCount:If CCJJJJC > PageCount Then CCJJJJC = PageCount
CJCCCCC.AbsolutePage = CCJJJJC
End If:Set Rs = CJCCCCC:End Function:Public Property Let CCCJCJ(CJCJCJJC):Set CJCCCCJ = CJCJCJJC:End Property:Public Property Let SQL(str):CCJJJJJ = str:End Property:Public Property Let Style(CCCCJCJ):If IsNumeric(CCCCJCJ) Then
CCJJCCC = CInt(CCCCJCJ):If CCJJCCC < 1 Or CCJJCCC > 8 Then CCJJCCC = 1
Else
CCJJCCC = 1
End If:End Property:Public Property Let PageSize(CCCCJCJ):If IsNumeric(CCCCJCJ) Then
CCJJCCJ = CInt(CCCCJCJ):If CCJJCCJ < 1 Then CCJJCCJ = 10
Else
CCJJCCJ = 10
End If:End Property:Public Property Get PageSize():If CCJJJJC = PageCount Then
PageSize = CCJJJCJ - CCJJCCJ * (PageCount - 1)
Elseif CCJJJCJ=0 then
pagesize=0
else
PageSize = CCJJCCJ
end if:End Property:Private Sub Class_Initialize():dim CCJCCJJ:CCJJCCJ = 10:CCJJCCC = 1:Set CJCCCCJ = CCCJJC:CCJJJJC = Trim(Request.QueryString(CJCJJJJJ("!286"))):If IsNumeric(CCJJJJC) Then
CCJJJJC = CLng(CCJJJJC):If CCJJJJC < 1 Then CCJJJJC = 1
Else
CCJJJJC = 1
End If:CCJJCJC = Trim(Request.ServerVariables(CJCJJJJJ("&#{"))):CCJJCJC = Mid(CCJJCJC, InStrRev(CCJJCJC, CJCJJJJJ("^")) + 1):CCJJCJJ = Split(Trim(Request.ServerVariables(CJCJJJJJ("""&t#*0$%#x}v"))), CJCJJJJJ("U")):CCJJJCC = Server.HtmlEncode(CJCJCJCJ):CCJCCJJ=lcase(CCJJJCC):if instr(CCJCCJJ,CJCJJJJJ("Tb4:7C2>6"))>0 or instr(CCJCCJJ,CJCJJJJJ("Tb4D4C:AE"))>0 or instr(CCJCCJJ,CJCJJJJJ("V"))>0 or instr(CCJCCJJ,CJCJJJJJ(";2G2D4C:AE"))>0 or instr(CCJCCJJ,CJCJJJJJ("6IAC6DD:@?"))>0 then Call RedirectMessage(CJCJJJJJ("????????,????????????????????????,??,??,"))
End Sub:Public Function ListNum(CCCCJCJ):ListNum = CCJJCCJ * (CCJJJJC - 1) + CCCCJCJ:End Function:Private Function CJCJCJCJ():Dim CJCJCJJ, str:For CJCJCJJ = 0 To UBound(CCJJCJJ):If InStr(LCase(CCJJCJJ(CJCJCJJ)), CJCJJJJJ("A286l")) = 0 Then str = str & CJCJJJJJ("U") & CCJJCJJ(CJCJCJJ)
Next:str = Mid(str, 2):If str = "" Then CJCJCJCJ = CCJJCJC & CJCJJJJJ("n") & CJCJJJJJ("A286l") Else CJCJCJCJ = CCJJCJC & CJCJJJJJ("n") & str & CJCJJJJJ("UA286l")
End Function:Private Function CJJCJCCC():Dim str:str = CJCJJJJJ("???? ,??"):For CJCJCJJ = 1 To PageCount:If CJCJCJJ = CCJJJJC Then str = str & CJCJJJJJ("k3m") & CJCJCJJ & CJCJJJJJ("k^3m ,") Else str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CJCJCJJ & CJCJJJJJ("Vm") & CJCJCJJ & CJCJJJJJ("k^2m ,")
Next:str = str & CJCJJJJJ("??"):CJJCJCCC = str:End Function:Private Function CJJCCJJJ():Dim str:If CCJJJJC > 1 Then
str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CJCJJJJJ("`V ,E:E=6lV????V ,DEJ=6lVE6IE\564@C2E:@?i ,?@?6Vm") & CJJJJJJJ & CJCJJJJJ("k^2m ,")
str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CCJJJJC - 1 & CJCJJJJJ("V ,E:E=6lV????,??V ,DEJ=6lVE6IE\564@C2E:@?i ,?@?6Vm") & CJJJJJCJ & CJCJJJJJ("k^2m ,")
Else
str = str & CJJJJJJJ & CJCJJJJJ(" ,") & CJJJJJCJ
End If:If CCJJJJC < PageCount Then
str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CCJJJJC + 1 & CJCJJJJJ("V ,E:E=6lV????,??V ,DEJ=6lVE6IE\564@C2E:@?i ,?@?6Vm") & CJJJJJCC & CJCJJJJJ("k^2m ,")
str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & PageCount & CJCJJJJJ("V ,E:E=6lV????V ,DEJ=6lVE6IE\564@C2E:@?i ,?@?6Vm") & CJJJJCJC & CJCJJJJJ("k^2m ,")
Else
str = str & CJJJJJCC & CJCJJJJJ(" ,") & CJJJJCJC
End If:str = str & CJJCJJCJ:str = str & CJJCJJCC:CJJCCJJJ = str:End Function:Private Function CJJCCJJC():Dim str, CJCJJCC:CJCJJCC = (CCJJJJC - 1) \ 10:If CCJJJJC = 1 Then str = str & CJJJJJJJ & CJCJJJJJ(" ,") Else str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CJCJJJJJ("`V ,E:E=6lV????Vm") & CJJJJJJJ & CJCJJJJJ("k^2m ,")
If CJCJJCC * 10 > 0 Then str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CCJJJJC - 10 & CJCJJJJJ("V ,E:E=6lV??????Vm") & CJJJJJJC & CJCJJJJJ("k^2m ,")
For CJCJCJJ = (CJCJJCC * 10 + 1) To (CJCJJCC * 10 + 10):If CJCJCJJ = CCJJJJC Then str = str & CJCJJJJJ("k3m") & CJCJCJJ & CJCJJJJJ("k^3m ,") Else str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CJCJCJJ & CJCJJJJJ("V ,E:E=6lV??????") & CJCJCJJ & CJCJJJJJ("??Vm") & CJCJCJJ & CJCJJJJJ("k^2m ,")
If CJCJCJJ = PageCount Then Exit For
Next:If CJCJCJJ < PageCount Then str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CJCJCJJ & CJCJJJJJ("V ,E:E=6lV??????Vm") & CJJJJCJJ & CJCJJJJJ("k^2m ,")
If CCJJJJC = PageCount Then str = str & CJJJJCJC Else str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & PageCount & CJCJJJJJ("V ,E:E=6lV????Vm") & CJJJJCJC & CJCJJJJJ("k^2m")
CJJCCJJC = str:End Function:Private Function CJJCCJCJ():Dim str, CCJCCJC, CCJCCCJ, CJCJCJJ:If CCJJJJC > 4 Then str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CJCJJJJJ("`Vm,`.k^2m ,]]]")
If CCJJJJC < PageCount - 3 Then CCJCCCJ = CCJJJJC + 3 Else CCJCCCJ = PageCount
For CJCJCJJ = CCJJJJC - 3 To CCJCCCJ:If CJCJCJJ >= 1 Then
If CJCJCJJ = CCJJJJC Then str = str & CJCJJJJJ(" ,k3m,") & CJCJCJJ & CJCJJJJJ(".k^3m") Else str = str & CJCJJJJJ(" ,k2 ,9C67lV") & CCJJJCC & CJCJCJJ & CJCJJJJJ("Vm,") & CJCJCJJ & CJCJJJJJ(".k^2m")
End If:Next:If CCJJJJC < PageCount - 3 Then str = str & CJCJJJJJ(" ,]]] ,k2 ,9C67lV") & CCJJJCC & PageCount & CJCJJJJJ("Vm,") & PageCount & CJCJJJJJ(".k^2m")
CJJCCJCJ = str:End Function:Private Function CJJCCJCC():Dim str:If CCJJJJC > 1 Then
str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CJCJJJJJ("`V ,E:E=6lV????Vm????k^2m ,")
str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CCJJJJC - 1 & CJCJJJJJ("V ,E:E=6lV????,??Vm????,??k^2m ,")
Else
str = str & CJCJJJJJ("kDA2? ,DEJ=6lV4@=@CiRhhhjVm???? ,????,??k^DA2?m")
End If:If CCJJJJC < PageCount Then
str = str & CJCJJJJJ(" ,k2 ,9C67lV") & CCJJJCC & CCJJJJC + 1 & CJCJJJJJ("V ,E:E=6lV????,??Vm????,??k^2m ,")
str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & PageCount & CJCJJJJJ("V ,E:E=6lV????Vm????k^2m ,")
Else
str = str & CJCJJJJJ(" ,kDA2? ,DEJ=6lV4@=@CiRhhhjVm????,?? ,????k^DA2?m")
End If:str = str & CJJCJCJJ:CJJCCJCC = str:End Function:Private Function CJJCCCJJ():Dim str:if CCJJJJC>=2 then
str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CCJJJJC - 1 & CJCJJJJJ("V ,52E2\C@=6lV3FEE@?V ,52E2\:4@?lV2CC@H\=Vm!C6Gk^2m")
str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CCJJJJC - 1 & CJCJJJJJ("V ,52E2\C@=6lV3FEE@?Vm") & CCJJJJC-1 & CJCJJJJJ("k^2m")
end if:str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CCJJJJC & CJCJJJJJ("V ,52E2\C@=6lV3FEE@?V ,4=2DDlVF:\3E?\24E:G6Vm") & CCJJJJC & CJCJJJJJ("k^2m")
if pagecount>CCJJJJC then
str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CCJJJJC + 1 & CJCJJJJJ("V ,52E2\C@=6lV3FEE@?Vm") & CCJJJJC+1 & CJCJJJJJ("k^2m")
str = str & CJCJJJJJ("k2 ,9C67lV") & CCJJJCC & CCJJJJC + 1 & CJCJJJJJ("V ,52E2\C@=6lV3FEE@?V ,52E2\:4@?lV2CC@H\CV ,52E2\:4@?A@DlVC:89EVm}6IEk^2m")
end if:CJJCCCJJ=str:End Function:Private Function CJJCCCJC():Dim str:str=CJCJJJJJ("kF= ,4=2DDlVA28:?2E:@? ,A28:?2E:@?\C:89EVm")
if CCJJJJC>=2 then
str = str & CJCJJJJJ("k=:mk2 ,9C67lV") & CCJJJCC & CCJJJJC - 1 & CJCJJJJJ("VmU=2BF@jk^2mk^=:m")
str = str & CJCJJJJJ("k=:mk2 ,9C67lV") & CCJJJCC & CCJJJJC - 1 & CJCJJJJJ("Vm") & CCJJJJC-1 & CJCJJJJJ("k^2mk^=:m")
end if:str = str & CJCJJJJJ("k=: ,4=2DDlV24E:G6Vmk2 ,9C67lV") & CCJJJCC & CCJJJJC & CJCJJJJJ("Vm") & CCJJJJC & CJCJJJJJ("k^2mk^=:m")
if pagecount>CCJJJJC then
str = str & CJCJJJJJ("k=:mk2 ,9C67lV") & CCJJJCC & CCJJJJC + 1 & CJCJJJJJ("Vm") & CCJJJJC+1 & CJCJJJJJ("k^2mk^=:m")
str = str & CJCJJJJJ("k=:mk2 ,9C67lV") & CCJJJCC & CCJJJJC + 1 & CJCJJJJJ("VmUC2BF@jk^2mk^=:m")
end if:str=str & CJCJJJJJ("k^F=m"):CJJCCCJC=str:End Function:Private Function CJJCCCCJ():Dim str:str=CJCJJJJJ("kF= ,52E2\2>\H:586ElVA28:?2E:@?V ,4=2DDlV2>\A28:?2E:@? ,2>\A28:?2E:@?\5672F=EVm")
if CCJJJJC>=2 then
str = str & CJCJJJJJ("k=:mk2 ,9C67lV") & CCJJJCC & CCJJJJC - 1 & CJCJJJJJ("VmU=2BF@jk^2mk^=:m")
str = str & CJCJJJJJ("k=:mk2 ,9C67lV") & CCJJJCC & CCJJJJC - 1 & CJCJJJJJ("Vm") & CCJJJJC-1 & CJCJJJJJ("k^2mk^=:m")
end if:str = str & CJCJJJJJ("k=: ,4=2DDlV2>\24E:G6Vmk2 ,9C67lV") & CCJJJCC & CCJJJJC & CJCJJJJJ("Vm") & CCJJJJC & CJCJJJJJ("k^2mk^=:m")
if pagecount>CCJJJJC then
str = str & CJCJJJJJ("k=:mk2 ,9C67lV") & CCJJJCC & CCJJJJC + 1 & CJCJJJJJ("Vm") & CCJJJJC+1 & CJCJJJJJ("k^2mk^=:m")
str = str & CJCJJJJJ("k=:mk2 ,9C67lV") & CCJJJCC & CCJJJJC + 1 & CJCJJJJJ("VmUC2BF@jk^2mk^=:m")
end if:str=str & CJCJJJJJ("k^F=m"):CJJCCCCJ=str:End Function:End Class::dim CJCJJJC:sql=Request.ServerVariables(CJCJJJJJ("!p%w0x}u~")):if instr(sql,CJCJJJJJ("^D49@@=^25>:?^"))>0 then
Call CheckLogined:if not CJJJCCC and not CJJCCCJ then Call RedirectMessage(CJCJJJJJ("????????,????????????????????????,"))
CJCJJJC=CJJJCJJ
elseif instr(sql,CJCJJJJJ("^>^D49@@=^DEF56?E^"))>0 or instr(sql,CJCJJJJJ("^DEF56?E^"))>0 then
Call CheckLogined:CJCJJJC=CJJJCJJ
elseif instr(sql,CJCJJJJJ("^D49@@="))>0 then
CJCJJJC=Request.QueryString(CJCJJJJJ("D49@@=")):if not CJJJCJJC(CJCJJJC) then CJCJJJC=Request.QueryString(CJCJJJJJ("F"))
if not CJJJCJJC(CJCJJJC) then CJCJJJC=Request.QueryString(CJCJJJJJ("D4"))
if not CJJJCJJC(CJCJJJC) then Call RedirectMessage(CJCJJJJJ("????????W$49@@=X??@??????????,"))
CJCJJJC=csng(CJCJJJC)
end if:if CJCJJJC=0 then Call RedirectMessage(CJCJJJJJ("????????W$49@@=X????W_X??,"))
Dim CCJCCCC:Call SetConfig:Sub SetConfig():dim CCCJJJJ,CCCJJJC:sql=CJCJJJJJ("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<?6HDEF56?E[BB ,7C@> ,D49@@= ,H:E9 ,W?@=@4<X ,H96C6 ,:5l") & CJCJJJC:set CCCJJJC=CCCJJC.execute(sql):if CCCJJJC.eof then Call RedirectMessage(CJCJJJJJ("??W") & CCCCCJ & CJCJJJJJ("X??????????W") & CJCJJJC & CJCJJJJJ("X????????,"))
ReDim CCCJJJJ(61):CCCJJJJ(0)=CCCJJJC(CJCJJJJJ(";:2@H6:")) & "":CCCJJJJ(1)=CCCJJJC(CJCJJJJJ("EJA6")):CCCJJJJ(2)=CCCJJJC(CJCJJJJJ("D>D")):CCCJJJJ(3)=CCCJJJC(CJCJJJJJ("4FDE@>8C@FA")) & "":CCCJJJJ(4)=CCCJJJC(CJCJJJJJ("D:5632C0@E96C")) & "":CCCJJJJ(5)=IIf(isnull(CCCJJJC(CJCJJJJJ("E6DEC6DF=EG:6H"))),0,CCCJJJC(CJCJJJJJ("E6DEC6DF=EG:6H"))):CCCJJJJ(6)=CCCJJJC(CJCJJJJJ("K:IF?E:>6")):CCCJJJJ(7)=CCCJJJC(CJCJJJJJ("766")):CCCJJJJ(8)=CCCJJJC(CJCJJJJJ("C6E6DE52J")):CCCJJJJ(9)=CCCJJJC(CJCJJJJJ("6IA:C652E6")):CCCJJJJ(10)=CCCJJJC(CJCJJJJJ("E:E=6")):CCCJJJJ(11)=CCCJJJC(CJCJJJJJ(":?EC@")) & "":CCCJJJJ(12)=CCCJJJC(CJCJJJJJ("A:4EFC6")) & "":CCCJJJJ(13)=CCCJJJC(CJCJJJJJ("72>:=J")):CCCJJJJ(14)=CCCJJJC(CJCJJJJJ("4@AJC:89E")) & "":CCCJJJJ(15)=IIf(isnull(CCCJJJC(CJCJJJJJ("D6>6DE6C0DE2CE052E6"))),CJCJJJJJ("`h__\`\`"),CCCJJJC(CJCJJJJJ("D6>6DE6C0DE2CE052E6"))):CCCJJJJ(16)=IIf(isnull(CCCJJJC(CJCJJJJJ("K:IF?0E:>6D09:89=:89E"))),0,CCCJJJC(CJCJJJJJ("K:IF?0E:>6D09:89=:89E"))):CCCJJJJ(17)=CCCJJJC(CJCJJJJJ("4@?E24E")) & "":CCCJJJJ(18)=CCCJJJC(CJCJJJJJ("D2?5E23=6")):CCCJJJJ(19)=CCCJJJC(CJCJJJJJ("4C:D:D")):CCCJJJJ(20)=CCCJJJC(CJCJJJJJ("JJ52E6")):CCCJJJJ(21)=CCCJJJC(CJCJJJJJ("BB")):CCCJJJJ(22)=CCCJJJC(CJCJJJJJ("JFJF60D>D0EA=")) & "":CCCJJJJ(23)=CCCJJJC(CJCJJJJJ("JFJF60E6DE0=3")) & "":CCCJJJJ(25)=CCCJJJC(CJCJJJJJ("6IA6CE")):CCCJJJJ(26)=CCCJJJC(CJCJJJJJ(">@5:?7@")):CCCJJJJ(27)=CCCJJJC(CJCJJJJJ("9@>6A286E@AA:4EFC6")) & "":CCCJJJJ(28)=CCCJJJC(CJCJJJJJ("4C:D:D=3")):CCCJJJJ(29)=IIf(CCCJJJC(CJCJJJJJ("4C:D:D@=5")),False,True):CCCJJJJ(30)=CCCJJJC(CJCJJJJJ("8C@FA8F:52?46")):CCCJJJJ(31)=CCCJJJC(CJCJJJJJ("3:@7665324<")):CCCJJJJ(32)=CCCJJJC(CJCJJJJJ("<6JDEC")):CCCJJJJ(33)=CCCJJJC(CJCJJJJJ("=@8@")) & "":CCCJJJJ(34)=CCCJJJC(CJCJJJJJ("K:46")):CCCJJJJ(35)=IIf(CCCJJJC(CJCJJJJJ(":D?6H")),True,False):CCCJJJJ(36)=121:CCCJJJJ(37)=111:CCCJJJJ(38)=160:CCCJJJJ(39)=CCCJJJC(CJCJJJJJ("8F6DE3@@<")):CCCJJJJ(40)=CCCJJJC(CJCJJJJJ("75D")):CCCJJJJ(42)=CCCJJJC(CJCJJJJJ("9@>6=@8:?")):CCCJJJJ(43)=CCCJJJC(CJCJJJJJ("K:IF?0?6657665324<")):CCCJJJJ(44)=CCCJJJC(CJCJJJJJ("K:IF?0E:>6D0=:>:E")):CCCJJJJ(45)=CCCJJJC(CJCJJJJJ("4@>A=6E60:?7@")):CCCJJJJ(46)=CCCJJJC(CJCJJJJJ("E6DE:?EC@")) & "":CCCJJJJ(47)=IIf(isnull(CCCJJJC(CJCJJJJJ("JFJF60367@C60E:>6"))),0,CCCJJJC(CJCJJJJJ("JFJF60367@C60E:>6"))):CCCJJJJ(49)=CCCJJJC(CJCJJJJJ("D>D0C646:G6C")):CCCJJJJ(50)=CCCJJJC(CJCJJJJJ("D>D0D:8?")) & "":CCCJJJJ(52)=CCCJJJC(CJCJJJJJ("JFJF602CC2?86")):CCCJJJJ(53)=IIf(isnull(CCCJJJC(CJCJJJJJ("DEF56?E0BF6DE:@?04@F?E"))),0,CCCJJJC(CJCJJJJJ("DEF56?E0BF6DE:@?04@F?E"))):CCCJJJJ(54)=CCCJJJC(CJCJJJJJ("9:560=30@FE@7286")):CCCJJJJ(55)=CCCJJJC(CJCJJJJJ("JFJF60E6DE052JD")):CCCJJJJ(56)=CCCJJJC(CJCJJJJJ("JFJF60H66<0=:>:E")):CCCJJJJ(57)=CCCJJJC(CJCJJJJJ("JFJF604964<65")):CCCJJJJ(58)=CCCJJJC(CJCJJJJJ("K:IF?0?6657665324<0?6IE")):CCCJJJJ(59)=CCCJJJC(CJCJJJJJ("4964<?6HDEF56?E")):CCCJJJJ(60)=CCCJJJC(CJCJJJJJ("K:IF?04=@D6052E6")):CCCJJJC.close : set CCCJJJC=nothing:if isNull(CCCJJJJ(8)) or CCCJJJJ(8)="" then CCCJJJJ(8)=0
if isdate(CCCJJJJ(9)) then
CCCJJJJ(9)=cdate(CCCJJJJ(9)):if CCCJJJJ(9)<Date then Call RedirectMessage(CJCJJJJJ("????????,????????????????W") & CCCJJJJ(9) & CJCJJJJJ("X??????,"))
end if:if not CJJJCJJC(CCCJJJJ(20)) then CCCJJJJ(20)=7
select case CCCJJJJ(1):case 1,2,16:CCCJJJJ(36)=159:case 4,5,6,10,11:CCCJJJJ(36)=190:CCCJJJJ(37)=178:CCCJJJJ(38)=191:case 7,13:CCCJJJJ(36)=164:CCCJJJJ(37)=178:CCCJJJJ(38)=179:end select:CCJCCCC=CCCJJJJ:End Sub:Function CJJJCCJC(CJCJCJCC):dim CCCJJJJ(7,1),CJCJCJJ,CCCJJCJ,CCCJJCC:CCCJJCJ=Array(CJCJJJJJ("$49@@="),CJCJJJJJ("$EF56?E"),CJCJJJJJ("s6AE"),CJCJJJJJ("vC256"),CJCJJJJJ("r=2DD>2E6"),CJCJJJJJ("}F>36C"),CJCJJJJJ("%62496C"),CJCJJJJJ("!2C6?E")):select case CCJCCCC(1):case 1,2 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????")):case 3,16 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????")):case 4 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("??????@"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????")):case 5 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????")):case 6 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("??????@"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("??????"),CJCJJJJJ("????")):case 7 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("??????"),CJCJJJJJ("????")):case 8 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("??????@"),CJCJJJJJ("????"),CJCJJJJJ("????????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("??????"),CJCJJJJJ("????")):case 9 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("??????"),CJCJJJJJ("????")):case 10 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("??????"),CJCJJJJJ("????")):case 11 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("??????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("??????"),CJCJJJJJ("????")):case 12 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("??????"),CJCJJJJJ("????")):case 13 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????")):case 14 : CCCJJCC=Array(CJCJJJJJ("??????"),CJCJJJJJ("??@??"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("??????"),CJCJJJJJ("????")):case 15 : CCCJJCC=Array(CJCJJJJJ("????"),CJCJJJJJ("????????"),CJCJJJJJ("????"),CJCJJJJJ("????????"),CJCJJJJJ("????"),CJCJJJJJ("????"),CJCJJJJJ("??????"),CJCJJJJJ("????")):case else : CCCJJCC=CCCJJCJ
end select:for CJCJCJJ=0 to Ubound(CCCJJJJ):CCCJJJJ(CJCJCJJ,0)=CCCJJCJ(CJCJCJJ):CCCJJJJ(CJCJCJJ,1)=CCCJJCC(CJCJCJJ):next:for CJCJCJJ=0 to Ubound(CCCJJJJ):if CCCJJJJ(CJCJCJJ,0)=CJCJCJCC then
CJJJCCJC=CCCJJJJ(CJCJCJJ,1):exit for
end if:next:End Function::if not CCJCCCC(18) then
Call ConnClose:Call response.redirect(CJCJJJJJ("A:4EFC6^??????@??????^????????????^??????????@????];A8"))
end if:dim CCCJCJJ,CCCJCJC,CJCJCJJ:CCCJCJJ=Request.QueryString(CJCJJJJJ("24E")):CCCJCJC=Request.QueryString(CJCJJJJJ(":5")):if CCCJCJJ="" then CCCJCJJ=CJCJJJJJ("G:D:E@C")
if CCCJCJJ=CJCJJJJJ("56=DE6A") and CJJJCJJC(CCCJCJC) then
set rs=CCCJJC.execute(CJCJJJJJ("D6=64E ,E@A ,` ,G:D:E@C ,7C@> ,G0D2?5E23=6 ,H96C6 ,:5l") & CCCJCJC & CJCJJJJJ(" ,2?5 ,4@?DF=E2?El") & CCCCCJ):if not rs.eof then CCCJJC.execute CJCJJJJJ("56=6E6 ,7C@> ,D2?5E23=6 ,H96C6 ,:5l") & CCCJCJC
response.Redirect CJCJJJJJ("n24ElDE6AU:5l") & rs(0)
elseif CCCJCJJ=CJCJJJJJ("56=") and CJJJCJJC(CCCJCJC) then
CCCJJC.execute CJCJJJJJ("56=6E6 ,7C@> ,D2?5E23=6 ,H96C6 ,G:D:E@Cl") & CCCJCJC:CCCJJC.execute CJCJJJJJ("56=6E6 ,7C@> ,D2?5E23=60G:D:E@C ,H96C6 ,:5l") & CCCJCJC:Call ConnClose:response.end
end if:If Request.ServerVariables(CJCJJJJJ("#t""&t$%0|t%w~s"))=CJCJJJJJ("!~$%") Then
if CCCJCJJ=CJCJJJJJ("255G:D:E@C") then
sql=CJCJJJJJ(":?D6CE ,:?E@ ,D2?5E23=60G:D:E@CW?F>36C[?2>6[D6I[286[DJ>AE@>[4@?DF=E2?E[52E6E:>6X ,@FEAFE ,:?D6CE65]:5 ,G2=F6DW") & CJCJJJJJ("V") & CJJJJCCC(Request.Form(CJCJJJJJ("?F>36C"))) & CJCJJJJJ("V") & CJCJJJJJ("[V") & CJJJJCCC(Request.Form(CJCJJJJJ("?:4<"))) & CJCJJJJJ("V") & CJCJJJJJ("[") & cint(Request.Form(CJCJJJJJ("D6I"))) & CJCJJJJJ("[") & CJJJJCCC(Request.Form(CJCJJJJJ("286"))) & CJCJJJJJ("[V") & CJJJJCCC(Request.Form(CJCJJJJJ("DJ>AE@>"))) & CJCJJJJJ("V") & CJCJJJJJ("[") & CCCCCJ & CJCJJJJJ("[86E52E6WX") & CJCJJJJJ("X")
set rs=CCCJJC.execute(sql):CCCJCJC=rs(0):Call ConnClose:response.Redirect CJCJJJJJ("n24El255DE6AU:5l") & CCCJCJC
elseif CCCJCJJ=CJCJJJJJ(">@5G:D:E@C") and CJJJCJJC(CCCJCJC) then
sql=CJCJJJJJ("FA52E6 ,D2?5E23=60G:D:E@C ,D6E") & CJCJJJJJ(" ,?F>36ClV") & CJJJJCCC(Request.Form(CJCJJJJJ("?F>36C"))) & CJCJJJJJ("V") & CJCJJJJJ("[?2>6lV") & CJJJJCCC(Request.Form(CJCJJJJJ("?:4<"))) & CJCJJJJJ("V") & CJCJJJJJ("[D6Il") & Request.Form(CJCJJJJJ("D6I")) & CJCJJJJJ("[286l") & cint(Request.Form(CJCJJJJJ("286"))) & CJCJJJJJ("[DJ>AE@>lV") & CJJJJCCC(Request.Form(CJCJJJJJ("DJ>AE@>"))) & CJCJJJJJ("V") & CJCJJJJJ(" ,H96C6 ,:5l") & CCCJCJC
CCCJJC.execute sql:Call ConnClose:response.Redirect CJCJJJJJ("n24ElDE6AU:5l") & CCCJCJC
elseif CCCJCJJ=CJCJJJJJ("255DE6A") and CJJJCJJC(CCCJCJC) then
sql=CJCJJJJJ(":?D6CE ,:?E@ ,D2?5E23=6W@3;64E[A:4EFC6[C64@C5[DE2E6[25G:46[G:D:E@CX ,G2=F6DW") & CJCJJJJJ("V") & Trim(Request.Form(CJCJJJJJ("@3;64E"))) & CJCJJJJJ("V") & CJCJJJJJ("[V") & CJJJJCCC(Request.Form(CJCJJJJJ("7:=6?2>6"))) & CJCJJJJJ("V") & CJCJJJJJ("[V") & CJJJJCCC(Request.Form(CJCJJJJJ("C64@C5"))) & CJCJJJJJ("V") & CJCJJJJJ("[V") & CJJJJCCC(Request.Form(CJCJJJJJ("DE2E6"))) & CJCJJJJJ("V") & CJCJJJJJ("[V") & CJJJJCCC(Request.Form(CJCJJJJJ("25G:46"))) & CJCJJJJJ("V") & CJCJJJJJ("[") & CCCJCJC & CJCJJJJJ("X")
CCCJJC.execute sql:Call ConnClose:response.Redirect CJCJJJJJ("n24ElDE6AU:5l") & CCCJCJC
elseif CCCJCJJ=CJCJJJJJ("DE6A") and CJJJCJJC(CCCJCJC) then
sql=CJCJJJJJ("FA52E6 ,D2?5E23=60G:D:E@C ,D6E ,5:28?@D:DlV") & CJJJJCCC(Request.Form(CJCJJJJJ("5:28?@D:D"))) & CJCJJJJJ("V ,H96C6 ,:5l") & CCCJCJC
CCCJJC.execute sql:Call ConnClose:response.Redirect CJCJJJJJ("n24ElDE6AU:5l") & CCCJCJC
end if
end if:dim CCCJCCJ,CCCJCCC,CCCCJJJ,CCCCJJC,CCCCJCJ:CCCJCCC=Request.QueryString(CJCJJJJJ("$6I")):CCCJCCJ=CJJJJCCC(Request.QueryString(CJCJJJJJ("}:4<"))):CCCCJCJ=CJJJJCCC(Request.QueryString(CJCJJJJJ("}F>"))):CCCCJJJ=CJJJJCCC(Request.QueryString(CJCJJJJJ("p86"))):CCCCJJC="1":Response.Write(vbCrLf):Response.Write(CJCJJJJJ("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJCJJJJJ("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJCJJJJJ("k9625m") & vbCrLf):Response.Write(CJCJJJJJ("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCJJJJJ("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJCJJJJJ("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJCJJJJJ("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CJCJJJJJ("kE:E=6m??????????k^E:E=6m") & vbCrLf):Response.Write(CJCJJJJJ("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQDEJ=6]4DDQm") & vbCrLf):Response.Write(CJCJJJJJ("kDEJ=6m") & vbCrLf):Response.Write(CJCJJJJJ(":>8]A:4EFC6 ,LA255:?8iaAIj ,3@C56Ci`AI ,D@=:5 ,R444j ,324<8C@F?5\4@=@CiR777jN") & vbCrLf):Response.Write(CJCJJJJJ("E6IE2C62 ,L ,H:5E9i ,`__Tj ,N") & vbCrLf):Response.Write(CJCJJJJJ("k^DEJ=6m") & vbCrLf):Response.Write(CJCJJJJJ("k^9625m") & vbCrLf):Response.Write(CJCJJJJJ("k3@5Jm") & vbCrLf)::dim CCCCJCC:If (CCCJCJJ=CJCJJJJJ("DE6A") or CCCJCJJ=CJCJJJJJ("255DE6A")) and CJJJCJJC(CCCJCJC) Then
set rs=CCCJJC.execute(CJCJJJJJ("D6=64E ,E@A ,` ,?2>6[D6I[286[DJ>AE@>[5:28?@D:D[52E6E:>6[?F>36C ,7C@> ,D2?5E23=60G:D:E@C ,H96C6 ,:5l") & CCCJCJC):CCCCJCC=rs(4):Response.Write(vbCrLf):Response.Write(CJCJJJJJ("kE23=6 ,4=2DDlQE30E:E=6Qm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m")):Response.Write rs(6):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m")):Response.Write rs(0):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m")):Response.Write IIf(rs(1),CJCJJJJJ("??"),CJCJJJJJ("??")):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m")):Response.Write rs(2):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m")):Response.Write CJJJCCCC(rs(5),0):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4@=DA2?lQ``Qm")):Response.Write rs(3):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ("k^E23=6m") & vbCrLf):Response.Write(CJCJJJJJ("k5:G ,DEJ=6lQE6IE\2=:8?iC:89Ej ,>2C8:?\E@AidAIQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQn24El>@5G:D:E@CU:5l")):Response.Write CCCJCJC:Response.Write(CJCJJJJJ("Qm????????k^2m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQn24El255DE6AU:5l")):Response.Write CCCJCJC:Response.Write(CJCJJJJJ("Qm????????k^2m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQn24ElG:D:E@CQm?? ,??k^2m") & vbCrLf):Response.Write(CJCJJJJJ("k^5:Gm") & vbCrLf)
End If::If CCCJCJJ=CJCJJJJJ("G:D:E@C") Then
Response.Write(vbCrLf):Response.Write(CJCJJJJJ("k7@C> ,24E:@?lQQ ,>6E9@5lQ86EQ ,?2>6lQ7@C>`Q ,:5lQ7@C>`Qm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE23=6 ,4=2DDlQE30E:E=6Qm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE9m??????@????k^E9m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ}F>Q ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write CCCCJCJ:Response.Write(CJCJJJJJ("Q ,D:K6lQ`dQmk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ}:4<Q ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write CCCJCCJ:Response.Write(CJCJJJJJ("Q ,D:K6lQ`_Qmk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kD6=64E ,?2>6lQ$6IQ ,:5lQ$6IQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k@AE:@? ,G2=F6lQQm,????.k^@AE:@?m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k@AE:@? ,G2=F6lQ`Q ,")):Response.Write IIf(CCCJCCC="1",CJCJJJJJ("D6=64E65"),""):Response.Write(CJCJJJJJ("m??k^@AE:@?m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k@AE:@? ,G2=F6lQ_Q ,")):Response.Write IIf(CCCJCCC="0",CJCJJJJJ("D6=64E65"),""):Response.Write(CJCJJJJJ("m??k^@AE:@?m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4=2DDlQ=236=Qm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:?AFE ,?2>6lQp86Q ,EJA6lQE6IEQ ,D:K6lQdQ ,G2=F6lQ")):Response.Write CCCCJJJ:Response.Write(CJCJJJJJ("Qmk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4=2DDlQ24EQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k:?AFE ,EJA6lQ3FEE@?Q ,G2=F6lQ?? ,??Q ,:5lQ3E?\C6A@CEQ ,E:E=6lQ??????????,????????????????,Qm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQn24El255G:D:E@CQm??????????@k^2m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQA@DEQ ,G2=F6lQ`Qm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCJJJJJ("k^7@C>m") & vbCrLf):Response.Write(CJCJJJJJ("k3Cm") & vbCrLf):Response.Write(CJCJJJJJ("kE23=6 ,4=2DDlQE30=:DEQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE9 ,E:E=6lQ??????????????????QmRk^E9m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE9mk:?AFE ,EJA6lQ4964<3@IQ ,4=2DDlQ4964<2==Qmk^E9m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,")):If CCCCJJC="1" Then
sql=CJCJJJJJ("D6=64E ,:5[?2>6[D6I[286[52E6E:>6[?F>36C ,7C@> ,D2?5E23=60G:D:E@C ,H96C6 ,4@?DF=E2?El") & CCCCCJ:if CJJJCJJC(CCCJCCC) then sql=sql & CJCJJJJJ(" ,2?5 ,D6Il") & CCCJCCC
if CCCCJCJ<>"" then sql=sql & CJCJJJJJ(" ,2?5 ,?F>36ClV") & CCCCJCJ & CJCJJJJJ("V")
if CCCJCCJ<>"" then sql=sql & CJCJJJJJ(" ,2?5 ,?2>6lV") & CCCJCCJ & CJCJJJJJ("V")
if CJJJCJJC(CCCCJJJ) then sql=sql & CJCJJJJJ(" ,2?5 ,286l") & CCCCJJJ
sql=sql & CJCJJJJJ(" ,@C56C ,3J ,52E6E:>6 ,56D4"):dim CCCCCJJ:set CCCCCJJ=new splitpage:with CCCCCJJ:.sql=sql:.pagesize=20:.style=5:end with:set rs=CCCCCJJ.rs:for CJCJCJJ=1 to CCCCCJJ.pagesize:CCCJCJC=rs(0):Response.Write(vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write CCCCCJJ.listnum(CJCJCJJ):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQ46?E6CQmk:?AFE ,?2>6lQ:5=:DEQ ,EJA6lQ4964<3@IQ ,G2=F6lQ")):Response.Write CCCJCJC:Response.Write(CJCJJJJJ("Qmk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m")):Response.Write rs(5):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write rs(1):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write IIf(rs(2),CJCJJJJJ("??"),CJCJJJJJ("??")):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write rs(3):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m")):Response.Write rs(4):Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQ46?E6CQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k2 ,9C67lQn24ElDE6AU:5l")):Response.Write CCCJCJC:Response.Write(CJCJJJJJ("Qm????k^2m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k2 ,9C67lQD2?5E23=60C6A@CE]2DAn:5=:DEl")):Response.Write CCCJCJC:Response.Write(CJCJJJJJ("Q ,E2C86ElQ03=2?<Qm????k^2m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k2 ,9C67lQn24El56=U:5l")):Response.Write CCCJCJC:Response.Write(CJCJJJJJ("Qm????k^2m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,")):rs.movenext:next:Response.Write(vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,4@=DA2?lQgQm")):call CCCCCJJ.showpage:Response.Write(CJCJJJJJ("k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,"))
end if:Response.Write(vbCrLf):Response.Write(CJCJJJJJ("k^E23=6m") & vbCrLf)
ElseIf CCCJCJJ=CJCJJJJJ("255G:D:E@C") Then
Response.Write(vbCrLf):Response.Write(CJCJJJJJ("k7@C> ,24E:@?lQQ ,>6E9@5lQA@DEQ ,?2>6lQ7@C>bQ ,:5lQ7@C>bQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJJJ(" ,k=686?5m??????????@k^=686?5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE23=6 ,H:5E9lQ`__TQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,H:5E9lQ`__Q ,2=:8?lQC:89EQm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ?F>36CQ ,EJA6lQE6IEQmk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ?:4<Q ,EJA6lQE6IEQmk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kD6=64E ,?2>6lQD6IQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k@AE:@? ,G2=F6lQ`Qm??k^@AE:@?m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k@AE:@? ,G2=F6lQ_Qm??k^@AE:@?m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^D6=64Em") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ286Q ,EJA6lQ?F>36CQ ,G2=F6lQ_Qm??,??@????????????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQ ,G2=:8?lQE@AQm????????????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQDJ>AE@>Qmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQnQm????k^2m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJJJ("k^7@C>m") & vbCrLf)
ElseIf CCCJCJJ=CJCJJJJJ(">@5G:D:E@C") and CJJJCJJC(CCCJCJC) Then
set rs=CCCJJC.execute(CJCJJJJJ("D6=64E ,E@A ,` ,?2>6[D6I[286[DJ>AE@>[?F>36C ,7C@> ,D2?5E23=60G:D:E@C ,H96C6 ,:5l") & CCCJCJC):Response.Write(vbCrLf):Response.Write(CJCJJJJJ("k7@C> ,24E:@?lQQ ,>6E9@5lQA@DEQ ,?2>6lQ7@C>dQ ,:5lQ7@C>dQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJJJ(" ,k=686?5m??????????@????????k^=686?5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE23=6 ,H:5E9lQ`__TQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,H:5E9lQ`__Q ,2=:8?lQC:89EQm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ?F>36CQ ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write rs(4):Response.Write(CJCJJJJJ("Qmk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ?:4<Q ,EJA6lQE6IEQ ,G2=F6lQ")):Response.Write rs(0):Response.Write(CJCJJJJJ("Qmk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQD6IQ ,G2=F6lQ`Q ,")):Response.Write IIf(rs(1),CJCJJJJJ("4964<65"),""):Response.Write(CJCJJJJJ("m??k^=236=m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k=236=mk:?AFE ,EJA6lQC25:@Q ,?2>6lQD6IQ ,G2=F6lQ_Q ,")):Response.Write IIf(rs(1),"",CJCJJJJJ("4964<65")):Response.Write(CJCJJJJJ("m??k^=236=m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQm??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ286Q ,EJA6lQ?F>36CQ ,G2=F6lQ")):Response.Write rs(2):Response.Write(CJCJJJJJ("Qm??,??@????????????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQ ,G2=:8?lQE@AQm????????????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQDJ>AE@>Qm")):Response.Write rs(3):Response.Write(CJCJJJJJ("k^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQn24ElDE6AU:5l")):Response.Write CCCJCJC:Response.Write(CJCJJJJJ("Qm????k^2m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJJJ("k^7@C>m") & vbCrLf)
ElseIf CCCJCJJ=CJCJJJJJ("DE6A") Then
dim CCCCCJC:set rs=CCCJJC.execute(CJCJJJJJ("D6=64E ,@3;64E[C64@C5[DE2E6[25G:46[:5[A:4EFC6 ,7C@> ,D2?5E23=6 ,H96C6 ,G:D:E@Cl") & CCCJCJC & CJCJJJJJ(" ,@C56C ,3J ,:5")):CJCJCJJ=1:while not rs.eof:CCCCCJC=rs(5):Response.Write(vbCrLf):Response.Write(CJCJJJJJ("k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJJJ(" ,k=686?5m?? ,")):Response.Write CJCJCJJ:Response.Write(CJCJJJJJ(" ,??k^=686?5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE23=6 ,H:5E9lQ`__TQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,H:5E9lQa__Q ,G2=:8?lQE@AQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k2 ,4=2DDlQH:?Q ,9C67lQ")):Response.Write rs(5):Response.Write(CJCJJJJJ("Qmk:>8 ,DC4lQ")):Response.Write rs(5):Response.Write(CJCJJJJJ("Q ,H:5E9lQa__Q ,E:E=6lQ????????Q ,4=2DDlQA:4EFC6Qmk^2m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,G2=:8?lQE@AQ ,DEJ=6lQ=:?6\96:89Eia_AIQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kDEC@?8m??,??????????,k^DEC@?8m")):Response.Write rs(0):Response.Write(CJCJJJJJ("k3Cm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kDEC@?8m??,??????????,k^DEC@?8m")):Response.Write rs(1):Response.Write(CJCJJJJJ("k3Cm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kDEC@?8m??,????,??,????,k^DEC@?8m")):Response.Write rs(2):Response.Write(CJCJJJJJ("k3Cm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kDEC@?8m??,??????????,k^DEC@?8m")):Response.Write rs(3):Response.Write(CJCJJJJJ("k3Cm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k3Cm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kDEC@?8m??,????,??,????,k^DEC@?8mk2 ,9C67lQn24El56=DE6AU:5l")):Response.Write rs(4):Response.Write(CJCJJJJJ("Q ,@?r=:4<lQ;2G2D4C:AEiC6EFC? ,4@?7:C>WV????????????????????@??????,VXQm????k^2m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCJJJJJ("k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJJJ("k3Cm") & vbCrLf)::rs.movenext:CJCJCJJ=CJCJCJJ+1:wend:Response.Write(vbCrLf):Response.Write(CJCJJJJJ("k7@C> ,24E:@?lQQ ,>6E9@5lQA@DEQ ,?2>6lQ7@C>cQ ,:5lQ7@C>cQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJJJ(" ,k=686?5m????????k^=686?5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE6IE2C62 ,?2>6lQ5:28?@D:DQm")):Response.Write CCCCJCC:Response.Write(CJCJJJJJ("k^E6IE2C62m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k3Cm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ?? ,??Qm") & vbCrLf):Response.Write(CJCJJJJJ(" ,??,????????????????????????,") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJJJ("k^7@C>m") & vbCrLf)
ElseIf CCCJCJJ=CJCJJJJJ("255DE6A") and CJJJCJJC(CCCJCJC) Then
Response.Write(vbCrLf):Response.Write(CJCJJJJJ("k7@C> ,24E:@?lQQ ,>6E9@5lQA@DEQ ,?2>6lQ7@C>eQ ,:5lQ7@C>eQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJJJ(" ,k=686?5m????????k^=686?5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE23=6 ,H:5E9lQ`__TQm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,H:5E9lQ`b_Q ,2=:8?lQC:89EQm??????????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ@3;64EQ ,EJA6lQE6IEQ ,D:K6lQ`__Qmk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQm??????????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:7C2>6 ,DC4lQ]]^]]^:?4^FA=@25]9E>nu%lbU7>l7:=6?2>6Qmk^:7C2>6mk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQmk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk:?AFE ,?2>6lQ7:=6?2>6Q ,EJA6lQE6IEQ ,:5lQ7:=6?2>6Q ,D:K6lQd_Q ,C625@?=J ,G2=F6lQ,????????????.Qmk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQ ,G2=:8?lQE@AQm??????????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQC64@C5Q ,4=2DDlQ65:E@CQmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQ ,G2=:8?lQE@AQm??????@??????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQDE2E6Qmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5 ,2=:8?lQC:89EQ ,G2=:8?lQE@AQm??????????????????,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mkE6IE2C62 ,?2>6lQ25G:46Qmk^E6IE2C62mk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,kE5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k:?AFE ,EJA6lQDF3>:EQ ,G2=F6lQ????????,??Qm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k2 ,4=2DDlQ3FEE@?Q ,9C67lQn24ElDE6AU:5l")):Response.Write CCCJCJC:Response.Write(CJCJJJJJ("Qm????k^2m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E5m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^ECm") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^E23=6m") & vbCrLf):Response.Write(CJCJJJJJ(" ,k^7:6=5D6Em") & vbCrLf):Response.Write(CJCJJJJJ("k^7@C>m") & vbCrLf)
Else
Response.Write(vbCrLf):Response.Write(CJCJJJJJ(",??????????,??????????.") & vbCrLf)
End If:Response.Write(vbCrLf):Response.Write(CJCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^3@@EDEC2A\>2I=6?8E9]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^2FE@D:K6]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^H2?865:E@C^H2?8t5:E@C]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^8=@32=];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^H2?865:E@C^H2?865:E@C]96=A6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ];E23=6];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJJJ("kD4C:AE ,DC4lQ^$4C:AED^=2J6C^=2J6C]96=A6C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJJJJJ("kD4C:AEm") & vbCrLf):Response.Write(CJCJJJJJ("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJCJJJJJ(" ,SWVE23=6]E30=:DEVX];%23=6WX") & vbCrLf):Response.Write(CJCJJJJJ(" ,2FE@D:K6WSWVE6IE2C62VXX") & vbCrLf):Response.Write(CJCJJJJJ(" ,^^ ,??????@????") & vbCrLf):Response.Write(CJCJJJJJ(" ,SWVE23=6]E30=:DEVX]7:?5WVE5m2i4@?E2:?DWQ????QXVX]@?WV4=:4<V[7F?4E:@?W6XL") & vbCrLf):Response.Write(CJCJJJJJ(" ,6]AC6G6?Es672F=EWX") & vbCrLf):Response.Write(CJCJJJJJ(" ,G2C ,S2lSWE9:DX") & vbCrLf):Response.Write(CJCJJJJJ(" ,=2J6C]4@?7:C>WV????????????????????????,????????????????????????,V[L:4@?ib[E:E=6iV??????VN[7F?4E:@?WXL") & vbCrLf):Response.Write(CJCJJJJJ(" ,=2J6C]4=@D6p==WX") & vbCrLf):Response.Write(CJCJJJJJ(" ,S]86EWS2]2EECWV9C67VX[7F?4E:@?WC6DF=EXL") & vbCrLf):Response.Write(CJCJJJJJ(" ,:7WC6DF=ElllVVXLS2]4=@D6DEWVECVX]7256~FEW7F?4E:@? ,WX ,L ,SWE9:DX]C6>@G6WX ,NXN") & vbCrLf):Response.Write(CJCJJJJJ(" ,6=D6L=2J6C]>D8WC6DF=EXN") & vbCrLf):Response.Write(CJCJJJJJ(" ,NX") & vbCrLf):Response.Write(CJCJJJJJ(" ,NX") & vbCrLf):Response.Write(CJCJJJJJ(" ,NX") & vbCrLf):Response.Write(CJCJJJJJ(" ,^^ ,????????") & vbCrLf):Response.Write(CJCJJJJJ(" ,SWVR3E?\C6A@CEVX]@?WV4=:4<V[7F?4E:@?WXL") & vbCrLf):Response.Write(CJCJJJJJ(" ,G2C ,:5=:DE ,l ,SWVE23=6]E30=:DEVX]52E2WV4964<65VX") & vbCrLf):Response.Write(CJCJJJJJ(" ,:7 ,W:5=:DEX ,L ,H:?5@H]@A6?WVD2?5E23=60C6A@CE]2DAn:5=:DElVZ:5=:DEX ,N") & vbCrLf):Response.Write(CJCJJJJJ(" ,6=D6 ,L ,=2J6C]>D8WV??????????????????,VX ,N") & vbCrLf):Response.Write(CJCJJJJJ(" ,NX") & vbCrLf):Response.Write(CJCJJJJJ("NX") & vbCrLf):Response.Write(CJCJJJJJ("k^D4C:AEm") & vbCrLf):Response.Write(CJCJJJJJ("k^3@5Jm") & vbCrLf):Response.Write(CJCJJJJJ("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJJCJCJ=nothing:set CJJJCJCC=nothing:set CJJJCCJJ=nothing:set CJJJCCJC=nothing:CCCCJJ.Close:Set CCCCJJ=Nothing:rs.Close:Set rs=Nothing:CCCJJC.Close:Set CCCJJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CJCJJJJJ(ByVal CJJCCCCC)
Dim CCCCCCJ, CJCJCJJ, CCJCCJC
CJJCCCCC = Replace(CJJCCCCC, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CJCJCJJ = 1 To Len(CJJCCCCC)
If CJCJCJJ <> CCJCCJC Then
CCCCCCJ = AscW(Mid(CJJCCCCC, CJCJCJJ, 1))
If CCCCCCJ >= 33 And CCCCCCJ <= 79 Then
CJCJJJJJ = CJCJJJJJ & Chr(CCCCCCJ + 47)
ElseIf CCCCCCJ >= 80 And CCCCCCJ <= 126 Then
CJCJJJJJ = CJCJJJJJ & Chr(CCCCCCJ - 47)
Else
CCJCCJC = CJCJCJJ + 1
If Mid(CJJCCCCC, CCJCCJC, 1) = Chr(64) Then CJCJJJJJ = CJCJJJJJ & ChrW(CCCCCCJ + 5) Else CJCJJJJJ = CJCJJJJJ & Mid(CJJCCCCC, CJCJCJJ, 1)
End If
End If
Next
End Function
%>

Ms-Dos/Windows Unix Write backup

jsp File Browser version 1.2 by www.vonloesch.de