我现在要做一个页面的链接，这个页面是个新闻内容的页面，就是id号具体到一个数值的页面，在这个页面要做两个按钮，一个是上一条新闻，一下是下一条新闻，点击按钮相应出现上一条和下一条的新闻内容，也就是链接到ID的上一条和下一条，不知道该怎么在上一页和下一页这两个按钮上加程序，请教各位高手
该页代码如下：
<!--#include file="conn.asp"-->
<%id=Trim(Request.QueryString("id"))%>
<%
sql="select * from dszxx where id="&Request.QueryString("id")
set rs=Server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
.unnamed1 {
font-size: 9pt;
line-height: 20px;
}
-->
</style>
</head>
<body background="../indtextb.jpg" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<p> </p>
<p align="center" class="unnamed1"><strong><font color="#990000">详细留言信息</font></strong></p>
<table width="530" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#006699" class="unnamed1">
<tr>
<td width="165" height="25" bgcolor="#0099CC"><div align="center"><font color="#FFFFFF"><strong>姓 名：</strong></font></div></td>
<td width="365" bgcolor="#FFFFFF"> <%=rs("name") %></td>
</tr>
<tr>
<td height="25" bgcolor="#0099CC"><div align="center"><font color="#FFFFFF"><strong>电子邮件：</strong></font></div></td>
<td height="25" bgcolor="#FFFFFF"> <%=rs("mail") %></td>
</tr>
<tr>
<td height="25" bgcolor="#0099CC"><div align="center"><font color="#FFFFFF"><strong>所在部门：</strong></font></div></td>
<td height="25" bgcolor="#FFFFFF"> <%=rs("szbm") %></td>
</tr>
<tr>
<td height="25" bgcolor="#0099CC"><div align="center"><font color="#FFFFFF"><strong>职 位：</strong></font></div></td>
<td height="25" bgcolor="#FFFFFF"> <%=rs("zw") %></td>
</tr>
<tr>
<td height="25" bgcolor="#0099CC"><div align="center"><font color="#FFFFFF"><strong>联系电话：</strong></font></div></td>
<td height="25" bgcolor="#FFFFFF"> <%=rs("tel") %></td>
</tr>
<tr>
<td height="25" bgcolor="#0099CC"><div align="center"><font color="#FFFFFF"><strong>手 机：</strong></font></div></td>
<td height="25" bgcolor="#FFFFFF"> <%=rs("sj") %></td>
</tr>
<tr>
<td height="25" bgcolor="#0099CC">
<div align="center"><font color="#FFFFFF"><strong>留言信息：</strong></font></div></td>
<td height="25" bgcolor="#FFFFFF"><br>
<table width="319" border="0" align="center" cellpadding="0" cellspacing="0" class="unnamed1">
<tr>
<td>
<% content=rs("nr")
content = replace(content,"<br>","")
content = replace(content,chr(10),"<BR>")
content = replace(content,chr(13),"")
content = replace(content,chr(10)&chr(10),"<p></p>")%>
<span class="line"><%=content %></span></td>
</tr>
</table>
<br>
</td>
</tr>
</table>
<br>
<table width="530" border="0" align="center" cellpadding="0" cellspacing="0" class="unnamed1">
<tr>
<td>
<div align="right">上一封 下一封</div></td>
</tr>
</table>
<p align="center"> </p>
<p align="center"><a href="lb.asp" class="unnamed1">返回来信列表</a></p>
</body>
</html>
如果方便的话，请高手帮忙在此页面代码中加，谢谢！
