当前页面位置: » 丰搜网 » 文档中心 » 详细内容
dreamweavermx通用分页代码研究
dreamweavermx已经正式发布了，deamweaver4 + deamweaver ultradev 4 的组合使他成为当然的制做网页的首选工具，（好象做广告：） )
好了，进入正题，
我在以前做网页的分页时候都是用自己写的服务端脚本(我从不用ado的分页)，用了mx后发现在这里面用分页太方便了，不过代码也有点太长了，大家看下面的代码就可以知道。用过之后我发现里面recordset 的cursortype设为0分页竟然可以正常工作！这令我吃惊不少，分析了代码之后才发现mx 是用了一种挺笨的方法实现的，效率很低，所以大家还是用1吧：）
分析如下:
<%@language="vbscript" codepage="936"%>
<!--#include file="connections/ncarcnn.asp" -->
<%
dim recordset1
dim recordset1_numrows
set recordset1 = server.createobject("adodb.recordset")
recordset1.activeconnection = mm_ncarcnn_string
recordset1.source = "select * from dbo.ncarinfo"
recordset1.cursortype = 0
'这里用0也可以正常运行，但是经过分析代码可以看出，用0的效率很低，建议用1
recordset1.cursorlocation = 2
recordset1.locktype = 1
recordset1.open()
recordset1_numrows = 0
%>
<%
'''''''''''''''''''''''''''''''''''''
'以下为分页代码
dim repeat1__numrows
dim repeat1__index
repeat1__numrows = 10
repeat1__index = 0
recordset1_numrows = recordset1_numrows + repeat1__numrows
%>
<%
' *** recordset状态, 定义状态变量
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
' set the first and last displayed record
recordset1_first = 1
recordset1_last = recordset1_first + recordset1_numrows - 1
' if we have the correct record count, check the other stats 处理正确的rs
if (recordset1_total <> -1) then
if (recordset1_first > recordset1_total) then
recordset1_first = recordset1_total
end if
if (recordset1_last > recordset1_total) then
recordset1_last = recordset1_total
end if
if (recordset1_numrows > recordset1_total) then
recordset1_numrows = recordset1_total
end if
end if
%>
<%
' *** recordset stats: if we don't know the record count, manually count them处理错误的rs
if (recordset1_total = -1) then
' count the total records by iterating through the recordset
recordset1_total=0
while (not recordset1.eof)
recordset1_total = recordset1_total + 1
recordset1.movenext
wend
' reset the cursor to the beginning
if (recordset1.cursortype > 0) then
recordset1.movefirst
else
recordset1.requery
end if
' set the number of rows displayed on this page
if (recordset1_numrows < 0 or recordset1_numrows > recordset1_total) then
recordset1_numrows = recordset1_total
end if
' set the first and last displayed record
recordset1_first = 1
recordset1_last = recordset1_first + recordset1_numrows - 1
