求教 ASP 分页问题,

下面是asp代码
我想显示其中“编号、日期、物品、价格”的前20条记录,该加入什么样的代码呢?加在什么地方呢?
我还想实现首“首页、上一页、下一页、尾页”的功能?又该如何设置呢?

谢谢大家了
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Admin/Conn/Myself Bok.asp" -->
<!--#include file="Admin/Conn/Xiaof_A.asp" -->
<body>
<p>共有 N 条记录,现在为您显示的为第 X 条 - 第 Y 条记录。 </p>
<table width="650" border="1">
<tr align="center">
<td>编号</td>
<td>日期</td>
<td>物品</td>
<td>价格</td>
</tr>
<tr align="center">
<td><%=(RS.Fields.Item("id").Value)%></td>
<td><%=(RS.Fields.Item("a_nian").Value)%>年<%=(RS.Fields.Item("a_yue").Value)%>月<%=(RS.Fields.Item("A_ri").Value)%>日</td>
<td><%=(RS.Fields.Item("a_wup").Value)%></td>
<td><%=(RS.Fields.Item("a_jiage").Value)%> 元</td>
</tr>
<tr align="center">
<td colspan="4">首页 上一页 下一页 尾页</td>
</tr>
</table>
</body>
<!--#include file="Admin/Conn/Xiaof_B.asp" -->

给你一个参考

<!--#include file="conn.asp" -->
<style type="text/css">
<!--
.STYLE3 {font-family: "黑体"; color: #999999; font-size: 30px;}
-->
</style>
<body>
<table width="969" border="0" align="center" cellspacing="0" cellpadding="0">
<tr>
<td><!--#include file="top.asp" --></td>
</tr>
<tr>
<!---*********************88----->
<td>
<%
'这里提醒你一个问题,本来开始里这段代码是写在上面我打**号的地方,记住了如果当记录不存在的时候,你的页面就会变形,严格的根据框架来哦
severid=request.QueryString("severid")
pageid=request("s_id")'取得当前是第几页
if (Cint(pageid)<=1) then'对其对行判断
pageid=1
end if
set rs = server.createobject("adodb.recordset")
sql="select * from pp where severid ="&request.QueryString("severid")
rs.open sql,conn,1,1
if not rs.eof then '这里要记录集的判断
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="225" height="50"align="left" valign="middle" class="STYLE3"><img src="<%=trim(rs("diff1"))%>" /></td>
<td width="18" rowspan="2" valign="bottom"><img src="images/L.jpg" width="14" height="400" /></td>
<td> </td>
</tr>
<tr>
<td align="left" valign="top">
<%
' for i=1 to rs.recordcount
'response.write "<img src="&trim(rs("simages"))&">"
' if rs.eof then exit for
'rs.movenext
' k = i mod 3
'if k = 0 then
'response.write "<br> "
'end if
'next

'以上为你写的代码,书写有很多地方不正确的,你看下我以下的代码
%>
<!-------------------->
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<%
rs.pagesize=9'每页显示9条
if Cint(pageid)>rs.pagecount then
pageid=rs.pagecount
end if
rs.absolutepage=pageid
k=0
for i=1 to rs.pagesize
k=k+1
response.write "<img src="&trim(rs("simages"))&">"

if k mod 3 = 0 and k <>rs.pagesize then
response.write "<br> "
end if
if rs.eof then exit for
rs.movenext
next
%>
</td>
</tr>
<tr>
<td align="center">共<strong><%=rs.recordcount%></strong>条信息 每页显示<strong><%=rs.pagesize%></strong>条 共<strong><%=rs.pagecount%></strong>页
<% if pageid=1 then %>
<%else%>
<a href="?s_id=1&severid=<%=severid%>" >|<<</a>
<a href="?s_id=<%=pageid-1%>&severid=<%=severid%>" ><<</a>
<a href="?s_id=<%=pageid-1%>&severid=<%=severid%>" > [<%=pageid-1%>]</a>
<%end if%><% if rs.pagecount=1 then %>
<%else%>[<%=pageid%>]
<%end if%>
<% if rs.pagecount-pageid <> 0 then %>
<a href="?s_id=<%=pageid+1%>&severid=<%=severid%>" >[<%=pageid+1%>]</a>
<a href="?s_id=<%=pageid+1%>&severid=<%=severid%>" >>></a>
<a href="?s_id=<%=rs.pagecount%>&severid=<%=severid%>" >>>|</a>
<%end if%></td>
</tr>
</table>

<!----------------------------->
</td>
<td ><img src="<%=trim(rs("bimages"))%>" /></td>
</tr>
</table>
<%end if%>
</td>
</tr>
<tr>
<td><!--#include file="foot.asp" --></td>
</tr>
</table>
</body>追问

我看不懂 郁闷 有简单点的吗? 能单独做一个简单 发给我我吗? 谢谢

温馨提示:答案为网友推荐,仅供参考
第1个回答  2011-12-27
分页代码简单,网上也有很多呀,加在哪里呀,看页面美观吧。
第2个回答  2011-12-27

在你的页面增加一个表单,然后把你的代码输入进去。

最后点击图片中的区域,选择记录集。分页问题就解决了,不过先要处理好重复问题哦。

第3个回答  2011-12-27
建议你用PHP吧
PHP语言强大,做网站,做网络系统强大
相似回答