alcasir قام بنشر مارس 19, 2017 مشاركة قام بنشر مارس 19, 2017 السلام عليكم ورحمة الله وبركاته,, سؤالي باختصار توجد قاعدة بيانات باسم project موجود على هذا المسار D:\backup\project.accdb يوجد بهذا المشروع جدول باسم projectFiles ويحتوي على الحقول التاليه ID Namme Datte ارغب في استخدم الداله dcount لمعرفة عدد السجلات الموجوده بهذا الجدول. طبعا الكود سيتم تشغيله من قاعدة بيانات اخرى كيف يمكن كتابة الكود بالشكل الصحيح ولكم جزيل الشكر طبعا السؤال واضح اتوقع وما يحتاج الى مرفق رابط هذا التعليق شارك More sharing options...
ابوخليل قام بنشر مارس 19, 2017 مشاركة قام بنشر مارس 19, 2017 تفضل Dim rs As Recordset Dim db As Database Set db = OpenDatabase("D:\backup\project.accdb") Set rs = db.OpenRecordset("projectFiles", dbOpenDynaset) rs.MoveFirst rs.MoveLast Rcont = rs.RecordCount Set rs = Nothing Set db = Nothing باعتبار Rcont هو متغير رقمي / أو اسم حقل في النموذج 1 رابط هذا التعليق شارك More sharing options...
alcasir قام بنشر مارس 19, 2017 الكاتب مشاركة قام بنشر مارس 19, 2017 بارك الله فيك استاذي الكريم / نعم هو عين المطلوب ولكني استبدلت العباره Dim db As Database بالعباره Dim db As DAO.Database لان ظهرت لي خطا compile error والكود يعمل بنجاح اكرر شكري رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر مارس 19, 2017 مشاركة قام بنشر مارس 19, 2017 اخي كاسر اولا وقبل المشاركة مع اخي الفاضل ابو خليل العنوان يطلب بحث عن قيمه .. والمحتوى يطلب عد سجلات !! فايهما المطلوب ؟ رابط هذا التعليق شارك More sharing options...
alcasir قام بنشر مارس 19, 2017 الكاتب مشاركة قام بنشر مارس 19, 2017 (معدل) اشكرك على المرور اخي رمهان كنت اقصد معرفة عدد السجلات في ذلك الجدول. ممكن تعديل عنوان الموضوع! تم تعديل مارس 19, 2017 بواسطه alcasir رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر مارس 19, 2017 مشاركة قام بنشر مارس 19, 2017 (معدل) جرب MsgBox (CurrentDb.OpenRecordset("select count(*) from projectFiles in 'D:\backup\project.accdb'")(0)) بالتوفيق تم تعديل مارس 19, 2017 بواسطه رمهان رابط هذا التعليق شارك More sharing options...
alcasir قام بنشر مارس 19, 2017 الكاتب مشاركة قام بنشر مارس 19, 2017 كود رائع ومختصر جدا هل يفرق هذا الكود بالكود الذي تفضل به الاستاذ ابو خليل ؟ رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر مارس 19, 2017 مشاركة قام بنشر مارس 19, 2017 1 دقيقه مضت, alcasir said: كود رائع ومختصر جدا هل يفرق هذا الكود بالكود الذي تفضل به الاستاذ ابو خليل ؟ الله اعلم ... الاجابه لدى الاكسس هذا من وجهة نظري او يجي الاستاذ جعفر ويسوي اختبار بالاف السجلات عالعموم شوف اللي يناسبك والطرق كثيره وهذا من حظك بالتوفيق 1 رابط هذا التعليق شارك More sharing options...
alcasir قام بنشر مارس 19, 2017 الكاتب مشاركة قام بنشر مارس 19, 2017 اطمع بعمل اخرى لو سمحت ارغب بكود ايضا يحذف لي جميع السجلات الموجوده بالجدول projectFiles مع خالص شكري رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر مارس 19, 2017 مشاركة قام بنشر مارس 19, 2017 7 دقائق مضت, alcasir said: ارغب بكود ايضا يحذف لي جميع السجلات الموجوده بالجدول projectFiles بالتوفيق رابط هذا التعليق شارك More sharing options...
alcasir قام بنشر مارس 19, 2017 الكاتب مشاركة قام بنشر مارس 19, 2017 ممتاز بارك الله فيكم جميعا رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان