<٪
'========================================================================================
نسخة XdownPageasp
الإصدار 1.00
'codebyzykj2000
البريد الإلكتروني: [email protected]
'BBS: http: //bbs.513soft.net
"يمكن استخدام هذا البرنامج وتعديله مجانًا. آمل أن يتمكن برنامجي من جلب الراحة لعملك
'لكن يرجى الاحتفاظ بما سبق من فضلك رفض
'
ميزات البرنامج
يلف هذا البرنامج بشكل أساسي جزء ترحيل البيانات ، ويتم تخصيص جزء عرض البيانات بالكامل من قبل المستخدم.
دعم معلمات URL متعددة
'
تعليمات للاستخدام
وصف معلمة البرنامج
يحدد Papgesize عدد السجلات لكل صفحة من صفحة الترحيل
'GetRS تُرجع مجموعة سجلات مصبوبة يتم قراءة هذه الخاصية فقط
يحصل GetConn على اتصال قاعدة البيانات
يحصل GetSql على بيان الاستعلام
'وصف طريقة البرنامج
يعرض عرض العرض شريط التنقل في الصفحة ، الطريقة العامة الوحيدة
'
'========================================================================================
constbtn_first = "<fontface =" "webdings"> 9 </font> "" تحديد نمط عرض زر الصفحة الأولى
constbtn_prev = "<fontface =" "webdings" "> 3 </font>" "تحديد نمط عرض الزر في الصفحة السابقة
constbtn_next = "<fontface =" "webdings"> 4 </font> "" تحديد نمط عرض زر الصفحة التالية
constbtn_last = "<fontface =" "webdings">: </font> "" تحديد نمط عرض زر الصفحة الأخيرة
يحدد constxd_align = "المركز" محاذاة معلومات الترحيل
يحدد constxd_width = "100 ٪" حجم مربع معلومات الترحيل
passxdownpage
privatexd_pagecount ، xd_conn ، xd_rs ، xd_sql ، xd_pagesize ، str_errors ، int_curpage ، str_url ، int_totalpage ، int_totalrecord ، xd_surl
'=====================================================================================
'Pagesize Property
قم بتعيين حجم الصفحة لكل صفحة
'=====================================================================================
publicpropertyletpagesize (int_pagesize)
ifisnumeric (int_pagesize) ثم
xd_pagesize = clng (int_pagesize)
آخر
str_error = str_error و "pagesize المعلمة غير صحيحة"
دش ()
Endif
endproperty
PublicPropertygetPagesize
IFXD_PAGESIZE = "" أو (لا (isNumeric (xd_pagesize))) ثم
pagesize = 10
آخر
pagesize = xd_pagesize
Endif
endproperty
'=====================================================================================
"خاصية GETRS
العودة إلى مجموعة السجلات المليئة
'=====================================================================================
publicpropertygetgetrs ()
setxd_rs = server.createBject ("adodb.recordset")