منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[ تمّ الحل ] : أرجو المساعدة بإضافة STATUSBAR RECORD - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [ تمّ الحل ] : أرجو المساعدة بإضافة STATUSBAR RECORD (/showthread.php?tid=18310)

[ تمّ الحل ] : أرجو المساعدة بإضافة STATUSBAR RECORD - عبد العزيز البسكري - 08-12-16

السّلام عليكم و رحمة الله و بركاته
إخواني الأعزّاء بهذا الملف الرّائع و المميّز و الممتاز لأخي قبل كلمة أستاذي الغالي " أحمد منصور " و المثبّت بقسم الأمثلة و المشاريع
جزاه الله خير الجزاء و زادها بموازين حسناته و زاده من علمه و فضلة
رغبة منّي في إتمام العمل على نفس الملف و التعلّم و الاستفادة من نفس الأكواد تمنّيت بعض الإضافات و اللمسات فأرجو منكم فضلاً لا أمرًا إذا كان بالإمكان المساعدة لأنّي حقًّا و الله وحده أعلم بذلك حاولت و حاولت لكن دون فائدة ..
1 - كيف يمكن إضافة هذا العداد STATUSBAR مثلما هو بالصورة و مشار إليه بالأسهم الحمراء .. يعمل مع أزرار الأمر الأول و الأخير و التالي و السّابق

2 - هل بالإمكان عند الضغط على زر الأمر " إضافة " و المشار إليه بالسّهم الأخضر يظهر تلقائيًا العدد التالي حسب آخر سجل .. لست أدري هنا إذا كانت الفكرة صحيحة لأنّي فكّرت ماذا لو تكون الأرقام غير متسلسلة ..هذه النقطة  الثانية مجرّد تخيّل ..  لأنّ الجهل جعلني ربما أدخل عالم الهذيان
فائق إحتراماتي للجميع


RE: أرجو المساعدة بإضافة STATUSBAR RECORD - Ahmed_Mansoor - 09-12-16

وعليكم السّلام و رحمة الله و بركاته

أهلا أخي عبدالعزيز , بالنسبة للسؤال الثاني , هل تريد عند الضغط على زر إضافة يظهر أكبر رقم في حقل "الرقم" ثم يزود عليه واحد أو تريد أخذا رقم آخر سجل ثم تزود عليه واحد , يرجى التوضيح .
-------------------------------------------------------
تم تعديل المثال .

RE: أرجو المساعدة بإضافة STATUSBAR RECORD - عبد العزيز البسكري - 09-12-16

السّلام عليكم و رحمة الله و بركاته
أهلاً أخي الغالي " أحمد منصور "
بارك الله فيك على حسن المتابعة
من الأفضل إظهار أكبر رقم في الحقل + واحد
تابعت الملف الذي تكرّمت به الآن وهو فعلاً ما كنت أبحث عنه .. و قد أرشدتني لفكرة أكبر رقم في الحقل و الله لم تخطر ببالي ..فكرة أكثر من صائبة
أفضالك علينا كثيرة .. أدامك الله بنعمته فخرًا و ذخرًا لنا و لهذا المنتدى العظيم و لكافة طالبي المعرفة أمثالي من كل ربوع الأوطان العربية
حفظك الله و رعاك برعايته
زادك الله من علمه و فضله و نفع بك الاسلام و المسلمين
بقي لي إستفسار أخير لو سمحت .. لو وضعت كلمة مرور لقاعدة البيانات و لتكن مثلا : 123456
فكيف سيكون شكل هذا السّطر

كود :
DB.Provider = "Microsoft.JET.OLEDB.4.0;"
DB.Open App.Path & "\DOUSSA.mdb "
RS.Open "Select * From USERS Order By [الرقم] ASC", DB, adOpenStatic, adLockPessimistic

فائق إحتراماتي


RE: أرجو المساعدة بإضافة STATUSBAR RECORD - عبد العزيز البسكري - 09-12-16

السّلام عليكم و رحمة الله و بركاته
تمّ إيجاد المطلوب و الحمد لله من خلال البحث عن ملفات بها كلمات مرور
في هذه الليلة المباركة .. جمعة مباركة
و في هذه الأيّام المباركة التي قد تهل علينا بذكرى مولد خير الخلق و أتقاهم
أدعو الله رب السّماوات السبع ربّ العرش العظيم أن يمنَّ عليك أخي الغالي  أحمد منصور ببركة في العمر و صحّة في الجسد
و سعة في الرزق ..و جميع مَنْ تحب ..
بارك الله فيك و لك و زادها بموازين حسناتك إن شاء الله
تمّ عمل المطلوب و زيادة و الحمد لله
فائق إحتراماتي


RE: [ تمّ الحل ] : أرجو المساعدة بإضافة STATUSBAR RECORD - عمور2016 - 09-12-16

dB.Provider = "Microsoft.JET.OLEDB.4.0;Jet OLEDBBig Grinatabase Password=123456"
   dB.Open App.Path & "\DOUSSA.mdb"
   
تفضل استادنا الفاضل جمعة مباركة للجميع

RE: [ تمّ الحل ] : أرجو المساعدة بإضافة STATUSBAR RECORD - عبد العزيز البسكري - 09-12-16

السّلام عليكم و رحمة الله و بركاته

الله يجود عليك بما تحبه و ترضاه في طاعته و مرضاته يا أخ يا كريم يا عمّور 2016
ألف شكر و بارك الله فيك و لك
خالص محبّتي في الله


RE: [ تمّ الحل ] : أرجو المساعدة بإضافة STATUSBAR RECORD - Ahmed_Mansoor - 10-12-16

وعليكم السّلام و رحمة الله و بركاته

أهلا أخي عبدالعزيز , أشكرك جزيل الشكر على دعواتك التي تثلج الصدر وتشرح البال الله يتقبل جزاك الله كل خير .