[求助]我在“阳光白雪”主页看到的公共翻页模块怎样显示在下面

[复制链接]

轻松由我

电梯直达

1^#

发表于 2010-1-19 04:09:29 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

我看到的公共翻页模块测试的时候翻页在上面，我试图调整到下面，可怎么也不成功，请指点。以下是显示页面代码：

<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 '获取的记录集
'公共翻页模块开始%>

<%
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>

收藏0

使用道具举报

返回列表

GMT+8, 2024-11-19 10:42 , Processed in 0.096725 second(s), 9 queries , Gzip On, Memcache On.

		自动登录	找回密码
密码			注册