<%
strsql="select * from liuyan where yx='"& 1 &"' order by strtime desc"
set objrs=GetSQLRecordsetz(strsql,"ly.mdb","liuyan")
objrs.pagesize=5
if objrs.pagecount=0 then
response.write "
" & "暂无留言！" & "
"
else
%>
<%
if request("pageno")="" then
response.write "当前为第1页"
else
response.write "当前为第" & request("pageno") & "页"
end if
%>
首页
<%for j=1 to objrs.pagecount%>
[<%=j%>]
<%next%>
尾页
<%
pageno=request("pageno")
if pageno="" then
pageno=1
else
objrs.absolutepage=pageno
end if
for i=1 to objrs.pagesize
touxiang="..\img\" & objrs("touxiang") & ".gif"
biaoqing="..\img\" & objrs("biaoqing")
%>
<%
objrs.movenext
if objrs.eof then
exit for
end if
next
%>
<%
if pageno="" then
response.write "当前为第1页"
else
response.write "当前为第" & pageno & "页"
end if
%>
首页
<%for j=1 to objrs.pagecount%>
[<%=j%>]
<%next%>
尾页
