我看到的公共翻页模块测试的时候翻页在上面,我试图调整到下面,可怎么也不成功,请指点。以下是显示页面代码:
<!--#include file="inc/conn.asp" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<%
Dim Sql
Sql = "Select * from camera"
Set rs = Server.CreateObject("ADODB.RECORDSET")
rs.Open Sql,Conn,1,3 '获取的记录集
'公共翻页模块开始%>
<!--#include file="TurnPage.asp"-->
<%
Dim RowCount
RowCount = 10 '每页显示的记录条数
Call TurnPage(rs,RowCount)
'公共翻页模块结束%>
<table width=100%>
<tr>
<td>新闻编号</td>
<td>新闻标题</td>
<td>发布日期</td>
<tr>
<%
If Not rs.eof then
Do while Not rs.eof and RowCount>0
%>
<tr>
<td><%=rs("camera_cc")%></td>
<td><%=rs("camera_model")%></td>
<td><%=rs("camera_name")%></td>
<tr>
<%
RowCount = RowCount - 1
rs.MoveNext
Loop
End If
%>
<%
rs.close
set rs=nothing
conn.close
set conn = nothing
%>
</body>
[此贴子已经被作者于2006-1-13 22:43:01编辑过]