标题:关于分页的程序
取消只看楼主
哈马拟
Rank: 1
等 级:新手上路
帖 子:270
专家分:0
注 册:2004-7-15
 问题点数:0 回复次数:1 
关于分页的程序

请各位大虾指点迷津:

我下面这段分页程序(即完整的report_pc2.asp程序)运行后,没有出错信息,但是那些红色语句并没有执行!因为显示了3行数据库里的三条记录数据后,再显示了一个长空行???(本来在此应该显示123之类的数字,并且能在点击此数字后转到相应的页面)

<% connstr="dbq="+server.mappath("tl.mdb")+";defaultdir=; driver={microsoft access driver (*.mdb)};" set conn=server.createobject("adodb.connection") conn.open connstr set rs1=server.createobject("adodb.recordset") set rs2=server.createobject("adodb.recordset")

%> <% sql_str="select ph_large,ph_fj,product_content,gdz,operator from produce_da order by ph_large desc" rs1.open sql_str,conn %> <html>

<head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta name="GENERATOR" content="Microsoft FrontPage 4.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> <title>生产批报</title> <meta name="Microsoft Theme" content="citrus 011, default"> </head>

<body> <form name="form1" method="get" action="report_pc2.asp"> <h1><center>生产批报</center>

</h1> <p align="center"> </p> <table border="1" width="100%"> <tr> <td width="58%">流水线大生产批次(点+即可查看该大生产批次包含的四个工序小生产批次)</td> <td width="15%">包含发酵完整大罐罐批</td> <td width="11%">本大生产批次工作内容</td> <td width="9%">工段负责人</td> <td width="7%">登录员</td> </tr> <%

rs1.pagesize=3

page=Clng(request.querystring("page")) if page="" or page<1 then page=1 if page>rs1.pagecount then page=rs1.pagecount if rs1.pagecount>0 then rs1.AbsolutePage=page for i=1 to rs1.pagesize response.write "<tr>" for j=0 to rs1.fields.count-1 response.write "<td>"&rs1.fields(j).value&"</td>" next response.write "</tr>" rs1.movenext if rs1.eof then exit for next response.write "<tr><td colspan=5 align=right>" for i=1 to rs1.pagecount %> <a href=report_pc2.asp?page="<%=i%>"><%=i%></a> <%next%>

</td></tr> </table> <% rs1.close set rs1=nothing conn.close set conn=nothing %> </form> </body>

搜索更多相关主题的帖子: 数据库 set server 
2004-09-09 20:48
哈马拟
Rank: 1
等 级:新手上路
帖 子:270
专家分:0
注 册:2004-7-15
得分:0 

大家快来帮帮我啊!!!!!!

我都要郁闷死了

顶楼那几条红色的语句怎么就运行不了呢????


2004-09-10 16:58



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-5164-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.045515 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved