新微赢技术网

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

作者: 轻松由我 时间: 2010-1-19 04:09
标题: [求助]我在“阳光白雪”主页看到的公共翻页模块怎样显示在下面
我看到的公共翻页模块测试的时候翻页在上面，我试图调整到下面，可怎么也不成功，请指点。以下是显示页面代码：

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

欢迎光临新微赢技术网 (http://bbs.weiying.cn/)