请帮我略为修改一下这段代码,使其具备分页功能

huang_2 2002-07-21 10:09:31
<!--#include file="connections/ado_pubs.asp"-->
<%
dim RecordSet
dim Repeat_NumRows

set RecordSet=Server.CreateObject("ADODB.RecordSet")
RecordSet.ActiveConnection=MyConnection
RecordSet.Source="select * from Authors"
Recordset.CursorType=1
RecordSet.Open()
Repeat_NumRows=10
%>
<html>
<Head><Title>Test</Title></Head>
<Body>
<Table Width="75%" Border="1" Align="Center">
<Tr> <Td>编号</TD> <Td>姓名</Td> </Tr>
<%
while((Repeat_NumRows<>0) And (Not RecordSet.Eof))
%>
<Tr>
<td><%=(RecordSet.Fields.Item("au_ID").Value)%></td>
<Td><%=(RecordSet.Fields.Item("au_lname").Value)%></Td>
</Tr>
<%
Repeat_NumRows=Repeat_NumRows-1
RecordSet.MoveNext()
Wend
%>
</Table>
</Body>
</Html>
<%
RecordSet.Close()
Set RecordSet=Nothing
%>
...全文
4 点赞 收藏 2
写回复
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
cmsoft 2002-07-21
你只要看分页部分就行了,数据库使用大都差不多,不要理会这个
回复
cmsoft 2002-07-21
没人帮你改,我给个网址你,你学习学习,不错的,要去啊
http://www2.ccw.com.cn/tips/9911/112904_06.asp
回复
发动态
发帖子
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
社区公告
暂无公告