كيف يتم تقسيم الصفحات هل هناك طريقه لتعليم هذا؟

طبعا الموضوع مكرر لكن للأسف المقال الرائع جدا اللي كتبه الأخ عبد الرحمن المعزاب يبدو انه قد ضاع أثناء الإختراق للموقع و هذا موضوع حساس و الحمد لله تم طرحه مرة أخرى حتى نتمكن من الإجابة عليه حتى يستفيد الجميع و طبعا لا نريد تكراره مرة أخرى ..

طبعا نفرض وجود قاعدة بيانات اسمها db.mdb بها جدول اسمه table1 به حقلين و هما id و name الذي به الأسماء ..

نقوم بتكوين صفحة تعرض أسماء الطلاب مقسمة على صفحات كالتالي :

[l]

Set objConn = CreateObject("ADODB.Connection")

objConn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" & _

Server.MapPath("db.mdb"))

SQL="select * from table1"

set rs=Server.CreateObject("ADODB.Recordset")

rs.open SQL,objconn,3

page=CLng(request("page"))

if page="" then page=1

if page

rs.pagesize=10

rs.AbsolutePage=page

for ipage=1 to rs.pagesize

response.write "

"

response.write rs("name")

rs.movenext

if rs.eof then exit for

next

%>

path="default.asp?"

printFNBE page,path

function printFNBE(page,path)

response.write "

end function

%>

[/l]

طبعا يتضح من السابق أننا لاحظنا احتمال ورود أرقام غير منطقية للصفحات مثل الصفر و الأرقام السالبة و بالتالي نجعلها تفتح الصفحة الأولى

هذه الجملة rs.pagesize=10 تخبرنا أنه سيتم عرض 10 سجلات في كل صفحة و يمكن تعديلها لأي رقم

أما rs.AbsolutePage=page فهي تأخذ رقم الصفحة الحالية و هي القيمة القادمة للمتغير page المسند للطلب request ..

أما الفقرة التالية :

**************

[l]

for ipage=1 to rs.pagesize

response.write "

"

response.write rs("name")

rs.movenext

if rs.eof then exit for

next

[/l]

ففكرتها انشاء دوارة تقوم بعرض حقل الاسم من الجدول و يتم الخروج منها عند انتهاء السجلات ..

أما

path="default.asp?"

printFNBE page,path

فالأولى اختصار للمسار path لأننا سنستخدمه في الدالة

ثم قمنا باستدعاء الدالة printFNBE باعطائها متغيرين و هما رقم الصفحة و المسار الذي يعتبر ثابتا طبعا ..

أما الدالة فأظن أنها واضحة و هي تقوم بالتأكد من قيمة الصفحة التي انت بها ثم تقوم بعرض و حجب الأسهم أو المؤشرات حسب رقم الصفحة حتى يظهر لنا شكل للأمام و الخلف و غيره ..

********************

أتمنى أن يكون الشرح وافيا و سهلا عليكم ..

طبعا ممكن التغيير في الكود في منطقة الدوارة حسب ما تريد و بالتالي ينفع الكود لكل المشاريع و الأفكار تقريبا ..

أخوكم : محمد

بسلم لنا اخي محمد

ونعم الاستاذ(f)

اشوفك على الماسنجار ;)

http://www1.yn165.com/almezab/lession/Pagi.../Pagination.htm

http://www.arabteam2000.com/vb/showthread....&threadid=11427

http://www.arabteam2000.com/vb/showthread....&threadid=11128

اااااه سامحوني إذا على التكرار ..

مثل ما تقولون أنا تعودت على الدرس

الأول و افتقدته و ما انتبهت لغيره من الدروس ..

عالعموم اعذرنا أخ عبد الرحمن .. :o

ما أقصدك أخ محمد أقصد فقط أن الزوار لا يتعبوا أنفسهم حتى بالنظر لأسفل الصفحة فأخر موضوع موجود أخر الصفحة وإسمه واضح جدا

"تقسيم النتائج على عدة صفحات "

شكرا اخ عبد الرحمن

(gift) (f) ;)

هههههههههههههههههههه

طيب ليش الأخ عبد الرحمن معصب >>>>>>>>> :mad:

إذا ما انكتب هذا الموضوع وتم الرد عليه ،، كيف تبغى المنتدى يكون فيه حركة .....

خليك يا اخي سلس ;)

:D

ومشكوووووور اخ محمد هو هذا الموضوع إلي كنت ابغاه وشغال معايه تمام التمام ..

ولا تعصب علي عبد الرحمن ... :) :D :cool:

تحياتي

:mad:

عصب علي ،، الله يخارجنا .. ايش إلي يراضيه الحين :eek: :confused: :rolleyes:

:o :o :o

ممكن وررررررردة (f) :D

:D

والله اذاكانت الاسئله تزعل نحنا نبطل نسئل

والله كيف ياجماعة الخير مارايكم؟

سؤال للاستفسار في من يرد عليه؟;)

مين قال اننا متزاعلين يا فهيم ز. :P

خليك فهيم يا فهيم :D

تحياتي

يااخي الموضوع اعتقد انه كان موجه لي ليس لك

اعني: الزائر من قصده الاستاذ عبد الرحمن اولا كان هو انا

لانك نسيت انه من سال هذا السؤال هو انا يااخي

ارجو ان تحاول فهم قصدي ولا يلتبس عليك الامر:confused:

تحياتي لك(f)

أولا ما التبس علي الأمر ... :)

ثانيا : انا كمان كنت ابغى هذا الموضوع يعني انت لحقتني فيه

ثالثا : انهي الموضوع لانه ما في شي يحمل :)

(f) :D ;)