<%
set conn=server.createObject("ADODB.Connection")
set rs_an=server.createObject("ADODB.RecordSet")
set rs_ne=server.createObject("ADODB.RecordSet")
conn.open "DBQ="& server.mappath(".") & "\data\news.mdb;DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
response.write "<table>"
rs_usename=request("id")
sql="select fullname from usertab where workgroup=" & int(rs_usename)
rs_an.Open sql,conn,1,1
while not rs_an.EOF
sql2="select `id`,`title` from `news` where `fullname`='" & rs_an("fullname") & "'"
rs_ne.Open sql2,conn,1,1
while not rs_ne.EOF
response.write "<tr><td><a href=af.asp?id=" & rs_ne("id") & ">" & rs_ne("title") & "</a></td><td>" & rs_an("fullname") & "</td></tr>"
rs_ne.movenext
wend
rs_ne.Close
rs_an.movenext
wend
rs_an.Close
Response.Write "</table>"
%>

这个是调用每个用户所发表的全部文章标题，需要分页显示
请问该怎么写啊，希望高手能够帮我改改啊，谢谢拉！
我的QQ614204
显示的页面网址为：http://www.5568555.com/jjd/ae.asp?id=12