<٪
عدة طرق لحساب الترحيل
'// irecordcount هو إجمالي عدد الصفحات التي سيتم حسابها
'// irecordcount هو عدد سجلات السجلات
'// ipagesize هو عدد السجلات لكل صفحة
'//واحد:
ifrecordCountModipagesize = 0then
ipageCount = int (irecordcount/ipagesize)
آخر
ipageCount = int (irecordcount/ipagesize) +1
Endif
'//اثنين:
ipageCount = int (irecordcount/ipagesize*-1)*-1
'//ثلاثة:
ipageCount = ABS (int (-(irecordcount/ipagesize)))))
'// أربعة:
ipageCount = Fix (iRecordCount/iPagesize) -Cint (CBOOL (IRECORDCOUNTMODIPAGESIZE)))
٪>