相关showpage.asp程序如下, 请多指教:<%
sub showpage(rs,page)
    rs.absolutepage=page
    
    response.write "<center><table border=1>"
    response.write "<tr bgcolor=#dd2222>"    for i=0 to rs.fields.count-1
 response.write "<td>"&rs.fields(i).name&"</td>"
    next    response.write "</tr>"    for i=1 to rs.pagesize
 response.write "<tr>"
 for j=0 to rs.fields.count-1
     response.write "<td>"&rs(j)&"</td>"
 next
 response.write "</tr>"
 rs.movenext
 if rs.eof then exit for
    next 
    response.wirte "</table></center>"
end sub%>