If (MM_rsCount <> -1) Then If (MM_offset >= MM_rsCount Or MM_offset = -1) Then ' past end or move last If ((MM_rsCount Mod MM_size) > 0) Then ' last page not a full repeat region MM_offset = MM_rsCount - (MM_rsCount Mod MM_size) Else MM_offset = MM_rsCount - MM_size End If End If End If
i = 0 While ((Not MM_rs.EOF) And (i < MM_offset Or MM_offset = -1)) MM_rs.MoveNext i = i + 1 Wend If (MM_rs.EOF) Then MM_offset = i ' set MM_offset to the last possible record
End If %> <%
If (MM_rsCount = -1) Then
i = MM_offset While (Not MM_rs.EOF And (MM_size < 0 Or i < MM_offset + MM_size)) MM_rs.MoveNext i = i + 1 Wend
If (MM_rs.EOF) Then MM_rsCount = i If (MM_size < 0 Or MM_size > MM_rsCount) Then MM_size = MM_rsCount End If
If (MM_rs.EOF And Not MM_paramIsDefined) Then If (MM_offset > MM_rsCount - MM_size Or MM_offset = -1) Then If ((MM_rsCount Mod MM_size) > 0) Then MM_offset = MM_rsCount - (MM_rsCount Mod MM_size) Else MM_offset = MM_rsCount - MM_size End If End If End If
If (MM_rs.CursorType > 0) Then MM_rs.MoveFirst Else MM_rs.Requery End If
i = 0 While (Not MM_rs.EOF And i < MM_offset) MM_rs.MoveNext i = i + 1 Wend End If %> <%
记录集名字_first = MM_offset + 1 记录集名字_last = MM_offset + MM_size If (MM_rsCount <> -1) Then If (记录集名字_first > MM_rsCount) Then 记录集名字_first = MM_rsCount If (记录集名字_last > MM_rsCount) Then 记录集名字_last = MM_rsCount End If
MM_atTotal = (MM_rsCount <> -1 And MM_offset + MM_size >= MM_rsCount) %>
|