لا توجد طريقة عادية لحلق TD داخل الحلقة TR ، وبالتالي لا يتم حساب عدد مجموعات السجلات في الصفحة الأخيرة.
ومع ذلك ، عندما تكون مجموعة السجلات غير كافية ، يمكن أيضًا ملء صفوف وأعمدة فارغة تلقائيًا. إذا كان هناك أي نقص ، فيرجى الإشارة إليه ، شكرًا لك.
كيفية الاستخدام بسيط للغاية:
نسخة الكود كما يلي:
<٪
showdata ("اسم الاستعلام")
CallPagehead (عدد الصفوف والأعمدة)
'-----------------------------------------------------------------------------
"يمكنك كتابة الاستجابة التالية. write () في الوظيفة لرؤية هواياتك الشخصية.
استجابة. write (formatcrtable (عرض الجدول ، ارتفاع الجدول))
استجابة. write (pagefoot ())
callclosedata ()
٪>
الوظيفة كما يلي:
نسخة الكود كما يلي:
<٪
'-----------------------------------------------------------------------------
'حقوق الطبع والنشر 2005byjorkin.AllrightSreserved
'-----------------------------------------------------------------------------
publicrs
Publicpageno ، Cols ، Rows ، Maxpageno ، MaxRedCount ، MaxPagesize
'-----------------------------------------------------------------------------
PublicFunctionShowData (SQLStrings)
setRs = server.createObject ("adodb.recordset")
Rs.OpenSqlStrings ، Oconn ، 1،3
الوظيفية
publicfunctionClosedata ()
Rs.close
setRs = لا شيء
الوظيفية
تهيئة ترقيم الصفحات
'maxrows = الحد الأقصى لعدد الصفوف
'maxcols = الحد الأقصى لعدد الأعمدة
'-----------------------------------------------------------------------------
publicfunctionpagehead (maxrows ، maxcols)
'-----------------------------------------------------------------------------
الصفوف = maxrows
cols = maxcols
maxpagesize = 1
MaxRedCount = 0
maxpageno = 0
Pageno = 0
'-----------------------------------------------------------------------------
MaxRedCount = Rs.RecordCount
IfmaxRedCount> 0then
maxpagesize = الصفوف*cols
maxpageno = cint ((MaxRedCount+MaxPagesize-1)/maxpagesize)
rs.pagesize = maxpagesize
Pageno = طلب ("Pageno")
ifisempty (pageno) ornotisnumeric (pageno) orcint (pageno) <1orcint (pageno)> rs.pagecountthen
Pageno = 1
Endif
rs.absolutepage = pageno
Endif
onerrorresumenext
الوظيفية
'نهاية وظيفة الصفحة
لا توجد معلمات
'-----------------------------------------------------------------------------
publicfunctionpagefoot ()