<%
set rs=server.createobject("adodb.Recordset")
sql="select * from book where deletestate=0 order by id desc"
rs.open sql,conn,1,1
'if not isnumeric(request("page")) Then
' page=1
'else
' Page=int(abs(request("page")))
'end if
rs.pagesize=20
if request("page")<>"" then
epage=cint(request("page"))
if epage<1 then epage=1
if epage>rs.pagecount then epage=rs.pagecount
else
epage=1
end if
rs.absolutepage=epage
%>
<%
i=1
' do until rs.eof
for i=0 to rs.pagesize-1
if rs.bof or rs.eof then exit for
id=rs("id")
name=rs("name")
email=rs("email")
homepage=rs("homepage")
qq=rs("qq")
content=rs("content")
addtime=rs("addtime")
reply=rs("reply")
head=rs("head")
T_Emot=rs("T_Emot")
%>
<%if session("flag")="1" then%>
','_top','') class="input1">
','_top','') class="input1">
','_top','') class="input1">
<%
set rs1=server.createobject("adodb.recordset")
sql="select * from userid where userid='"&rs("userid")&"'"
rs1.open sql,conn,1,1
response.write rs("userid")
if rs1.recordcount>0 then
%>
此ID已经被封" style="color:red">解除封闭
<%
else
%>
" style="color:red">封ID
<%
end if
end if
%>
<%
mypagesize=mypagesize-1
i=i+1
' rs.movenext
' loop
rs.movenext()
next
%>