XX库存管理系统(4)

来源：网络收集时间：2026-05-03

导读： 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 If (Recordset1_tot

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 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 If (Recordset1_first > Recordset1_total) Then Recordset1_first = Recordset1_total End If

If (Recordset1_last > Recordset1_total) Then Recordset1_last = Recordset1_total End If End If %>

仓库管理