日期:2014-05-16 浏览次数:21019 次
<% if rs.eof and rs.bof then
totalPut=0
response.write "<tr bgcolor='#E7E7E7'><td colspan=12><p align='center'><br>没有任何信息!<br></p></td></tr>"
else
rs.pagesize=MaxPerPage
totalPut=rs.recordcount
if page<1 then page=1
rs.AbsolutePage = page
写表头.....
for m=1 to rs.PageSize
写表的内容
rs.MoveNext
if rs.EOF then
exit for
end if
next
写表尾(合计等).....
end if
%>
if rs.EOF then
if rs.PageSize-m>0
for i=1 to rs.PageSize-m
response.write "<tr bgcolor='#E7E7E7'><td colspan=12><p align='center'><br>"& i &"<br></p></td></tr>"
next
end if
exit for
end if