让 Dreamweaver 的分页代码每页序号连续标记

Dreamweaver 后端开发中，经常需要将文章列表或产品列表设置序号，在转到下一页后，序号能自动随着分页的数量增加，如下面的视频所示：

在使用 Dreamweaver 自动生成分页代码后，会产生一个名为的变量，我们巧妙的运用这个变量，就能实现“每页序号连续标记”的效果。Dreamweaver 自动生成分页代码代码如下：

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="../Connections/conn.asp" -->
<%
Dim Recordset1
Dim Recordset1_cmd
Dim Recordset1_numRows

Set Recordset1_cmd = Server.CreateObject ("ADODB.Command")
Recordset1_cmd.ActiveConnection = MM_conn_STRING
Recordset1_cmd.CommandText = "SELECT * FROM dbo.jiaocheng ORDER BY t ASC" 
Recordset1_cmd.Prepared = true

Set Recordset1 = Recordset1_cmd.Execute
Recordset1_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = 10
Repeat1__index = 0
Recordset1_numRows = Recordset1_numRows + Repeat1__numRows
%>
<%
'  *** Recordset Stats, Move To Record, and Go To Record: declare stats variables

Dim Recordset1_total
Dim Recordset1_first
Dim Recordset1_last

' set the record count
Recordset1_total = Recordset1.RecordCount

' set the number of rows displayed on this page
If (Recordset1_numRows < 0) Then
  Recordset1_numRows = Recordset1_total
Elseif (Recordset1_numRows = 0) Then
  Recordset1_numRows = 1
End If

我们要用到的变量就是它，Recordset1_first。找到重复区域代码块，代码如下：

<table class="table table-hover container">
  <tr>
    <td>序号</td>
    <td>标题</td>
    <td>类别</td>
  </tr>
  <% 
	 i = Recordset1_first
	 While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) %>
    <tr>
      <td><%=i%></td>
      <td><%=(Recordset1.Fields.Item("title").Value)%></td>
      <td><%=(Recordset1.Fields.Item("lb").Value)%></td>
    </tr>
    <% i = i+1
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  Recordset1.MoveNext()
Wend
%>

其中，i = Recordset1_first 让 i 等于当前页面的 Recordset1_first ，Recordset1_first 会根据页面不同而不同，比如在第1页，Recordset1_first 的值是1，在第2页，Recordset1_first 的值就是11（重复区域显示的记录数为10条记录）。

i = i+1 这句代码，是让每重复循环一次，变量 i 的值加1。这样，就实现了让 Dreamweaver 的分页代码每页序号连续标记的效果。你学会了吗？欢迎点赞、关注作者阅读更多 Dreamweaver 设计网站的文章。