علي هندسة قام بنشر ديسمبر 21, 2018 قام بنشر ديسمبر 21, 2018 السلام عليكم ممكن المساعدة في كود يعرض ارقام السجلات المفقودة في جدول بين سجلين الاول والاخير وشكر
علي هندسة قام بنشر ديسمبر 21, 2018 الكاتب قام بنشر ديسمبر 21, 2018 في 21/12/2018 at 19:59, ابو البشر said: ضع مثالك ليتم التعديل عليه ..... Expand تفضل استاذ ابو البشر مشكورا abx.accdb
فارس بني هلال قام بنشر ديسمبر 21, 2018 قام بنشر ديسمبر 21, 2018 صديقي العزيز السلام عليكم : لنضرب مثال نفرض عندنا جدول يحتوي على 10 سجلات وقد قمنا بحذف السجل رقم 7 تريد من الكود ان يحسب الاعداد من 1 الى 10 ويخبرنا ان السجل رقم 7 مفقود هل هذا ما تقصد
kanory قام بنشر ديسمبر 22, 2018 قام بنشر ديسمبر 22, 2018 (معدل) بعد اذن اصدقائي : ابو البشر وفارس .... تفضل هذا ..... abx.accdbFetching info... تم تعديل ديسمبر 22, 2018 بواسطه kanory 2
علي هندسة قام بنشر ديسمبر 22, 2018 الكاتب قام بنشر ديسمبر 22, 2018 في 21/12/2018 at 22:17, فارس بني هلال said: صديقي العزيز السلام عليكم : لنضرب مثال نفرض عندنا جدول يحتوي على 10 سجلات وقد قمنا بحذف السجل رقم 7 تريد من الكود ان يحسب الاعداد من 1 الى 10 ويخبرنا ان السجل رقم 7 مفقود هل هذا ما تقصد Expand السلام عليكم استاذ فارس بني هلال نعم استاذنا المطلوب ايجاد السجلات المحذوفه في 22/12/2018 at 05:25, kanory said: بعد اذن اصدقائي : ابو البشر وفارس .... تفضل هذا ..... Expand السلام عليكم استاذ kanory المرفق لايعمل لدي وشكرا
kanory قام بنشر ديسمبر 22, 2018 قام بنشر ديسمبر 22, 2018 (معدل) الملف يعمل لدي انظر ........ ماهو اصدار الاوفيس ... وهل هناك رسائل خطأ تظر عند تشغيل الملف تم تعديل ديسمبر 22, 2018 بواسطه kanory 1 2
علي هندسة قام بنشر ديسمبر 22, 2018 الكاتب قام بنشر ديسمبر 22, 2018 في 22/12/2018 at 09:38, kanory said: الملف يعمل لدي انظر ........ ماهو اصدار الاوفيس ... وهل هناك رسائل خطأ تظر عند تشغيل الملف Expand السلام عليكم استاذ kanory المحترم اصدار الاوفيس لدي هو 2007 وتظهر رسالة الخطأ لدي هي كما بالصورة
kanory قام بنشر ديسمبر 22, 2018 قام بنشر ديسمبر 22, 2018 في 22/12/2018 at 11:32, علي هندسة said: السلام عليكم استاذ kanory المحترم اصدار الاوفيس لدي هو 2007 وتظهر رسالة الخطأ لدي هي كما بالصورة Expand انت لم تسجل البيانات بالطريقة الصحيحة ( سجل رقم السجل الأول ورقم السجل الأخير ) في مربع النص اتبع الخطوات الموجودة في الصورة 2
فارس بني هلال قام بنشر ديسمبر 22, 2018 قام بنشر ديسمبر 22, 2018 تفضل صديقي التسلسلات المفقودة بدون اكواد abx.accdbFetching info... 1
علي هندسة قام بنشر ديسمبر 22, 2018 الكاتب قام بنشر ديسمبر 22, 2018 في 22/12/2018 at 12:10, kanory said: انت لم تسجل البيانات بالطريقة الصحيحة ( سجل رقم السجل الأول ورقم السجل الأخير ) في مربع النص اتبع الخطوات الموجودة في الصورة Expand السلام عليكم استاذ kanory مشكورا على اهتمامك لقد تم تجربت الطريقة وبنفس الخطوات وانها تعمل على التسلسلات القليلة مثلا بين 1 الى 100 اما اذا جربنا الارقام المرفقة بالمثال ولكثرة عدد السجلات فتظهر رسالة خطا كما بالصور
علي هندسة قام بنشر ديسمبر 22, 2018 الكاتب قام بنشر ديسمبر 22, 2018 في 22/12/2018 at 13:17, فارس بني هلال said: تفضل صديقي التسلسلات المفقودة بدون اكواد abx.accdbFetching info... Expand السلام عليكم استاذنا فارس بني هلال المحترم ما احتاجه هو عن طريق كود فيكون جزء من برنامج وان لايكون معه حقل AutoNumber فقد استخدمه مع سجل له نفس الخاصية AutoNumber وله سجلات محذوفه فيمكن ايجاده . وكما بالصورة المرفقة علما ان لدي برنامج ويقوم بايجاد الارقام المحذوفة وسارفقه لكن مشكلته ايظا يعمل على التسلسلات القليلة فهل يمكن التعديل عليه ليقبل سجلات اكثر وشكرا example.rar
kanory قام بنشر ديسمبر 22, 2018 قام بنشر ديسمبر 22, 2018 هذه الرسالة مضمونها انك استخدمت ارقام غير موجوده أصلا في قاعدة بياناتك وخاصة رقم السجل الأول ..... 1
علي هندسة قام بنشر ديسمبر 22, 2018 الكاتب قام بنشر ديسمبر 22, 2018 في 22/12/2018 at 15:15, kanory said: هذه الرسالة مضمونها انك استخدمت ارقام غير موجوده أصلا في قاعدة بياناتك وخاصة رقم السجل الأول ..... Expand استاذنا المحترم kanory السجلات موجودة ضمن التسلسلات وكما بالصور المرفقة
ابو عارف قام بنشر ديسمبر 22, 2018 قام بنشر ديسمبر 22, 2018 في 22/12/2018 at 14:57, علي هندسة said: ما احتاجه هو عن طريق كود Expand حسب تجربتي عمود واحد بستوعب على حدود خمسة ملايين سجل تقريبا نظرا لعدد تسلسلات مفقودة بالملايين عدلت على المثال تسلسلات مفقودة مسلسلة من الى و المنفردة نفس رقم المفقود اضغط على زر "احسب" فقط abx.accdbFetching info... 1
علي هندسة قام بنشر ديسمبر 22, 2018 الكاتب قام بنشر ديسمبر 22, 2018 في 22/12/2018 at 15:36, ابو عارف said: ما احتاجه هو عن طريق كود Expand استاذ ابو عارف المحترم جربت المثال السابق على اوفيس 2007 فانه لايعمل وعلى اوفيس 2010 تظهر هذه الرساله كما بالصورة المرفقة وهل يمكن تحويلة الى اوفيس 2007
علي هندسة قام بنشر ديسمبر 22, 2018 الكاتب قام بنشر ديسمبر 22, 2018 في 22/12/2018 at 15:36, ابو عارف said: حسب تجربتي عمود واحد بستوعب على حدود خمسة ملايين سجل تقريبا نظرا لعدد تسلسلات مفقودة بالملايين عدلت على المثال تسلسلات مفقودة مسلسلة من الى و المنفردة نفس رقم المفقود اضغط على زر "احسب" فقط abx.accdb Expand شكرا استاذنا الفاضل ابو عارف المحترم لقد نصبت اوفس 2010 ونسخت الكود ثم مسحت اوفس 2010 ونصبت اوفس 2007 وتم تجربة الكود ونجح المثال شكر وبارك الله فيك
ابو عارف قام بنشر ديسمبر 22, 2018 قام بنشر ديسمبر 22, 2018 في 22/12/2018 at 16:20, علي هندسة said: ونصبت اوفس 2007 وتم تجربة الكود ونجح المثال Expand الحمد لله على نجاح تجربة و بارك الله فيك ايضا. للاستفسار ، هل عرفت اين كانت مشكلة !! على ما اعتقد سبب المشكله لا علاقة لها باصدارات اوفيس لان الملف اساسا بتنسيق 2007 المشكلة ربما كانت في تسميات ازرار الجديدة ، و سبب الحل هو مع اعادة تنصيب اوفيس 2007 ربما اخترت لغة نظام المحلي System local عربيه و حلت المشكلة ، حبذا لو جربت المثال السابق مرة اخرى على اوفيس 2007 دون نسخ اكواد. و لك مني اجمل تحيات. 1
علي هندسة قام بنشر ديسمبر 22, 2018 الكاتب قام بنشر ديسمبر 22, 2018 في 22/12/2018 at 16:54, ابو عارف said: الحمد لله على نجاح تجربة و بارك الله فيك ايضا. للاستفسار ، هل عرفت اين كانت مشكلة !! على ما اعتقد سبب المشكله لا علاقة لها باصدارات اوفيس لان الملف اساسا بتنسيق 2007 المشكلة ربما كانت في تسميات ازرار الجديدة ، و سبب الحل هو مع اعادة تنصيب اوفيس 2007 ربما اخترت لغة نظام المحلي System local عربيه و حلت المشكلة ، حبذا لو جربت المثال السابق مرة اخرى على اوفيس 2007 دون نسخ اكواد. و لك مني اجمل تحيات. Expand استاذي الفاضل ابو عارف لك مني الشكر والامتنان البرنامج لايفتح على اوفيس 2007 وكما بالصورتين المرفقتين وعند تنصيب برنامج 2010 اشتغل البرنامج لكن كانت تظهر لي رسالة المذكورة سابقا وبعد الدخول الى الاكود واعادة الحفظ بدأ البرنامج بالعمل ولا اعرف لماذا فقمت بنقل الاكواد على اوفس 2007 بعد الغاء تنصيب 2010 اشتغل البرنامج وشكرا لك على مساعدتك 1
علي هندسة قام بنشر ديسمبر 22, 2018 الكاتب قام بنشر ديسمبر 22, 2018 في 22/12/2018 at 16:54, ابو عارف said: الحمد لله على نجاح تجربة و بارك الله فيك ايضا. للاستفسار ، هل عرفت اين كانت مشكلة !! على ما اعتقد سبب المشكله لا علاقة لها باصدارات اوفيس لان الملف اساسا بتنسيق 2007 المشكلة ربما كانت في تسميات ازرار الجديدة ، و سبب الحل هو مع اعادة تنصيب اوفيس 2007 ربما اخترت لغة نظام المحلي System local عربيه و حلت المشكلة ، حبذا لو جربت المثال السابق مرة اخرى على اوفيس 2007 دون نسخ اكواد. و لك مني اجمل تحيات. Expand استاذي الفاضل هل ممكن عمل زر لنقل السجلات المفقودة الى اكسل
ابو عارف قام بنشر ديسمبر 23, 2018 قام بنشر ديسمبر 23, 2018 في 22/12/2018 at 17:14, علي هندسة said: استاذي الفاضل هل ممكن عمل زر لنقل السجلات المفقودة الى اكسل Expand نعم ممكن ان شاء الله اليك المثال ، بعد ضغط على زر الثالث ستجد ملف اكسل او csv اذا حبيت بتنسق آخر ، غير csv الى xls او txt او doc في سطر التالي Outfile = CurrentProject.Path & "\LostRecords.csv" abx.accdbFetching info... 1
علي هندسة قام بنشر ديسمبر 23, 2018 الكاتب قام بنشر ديسمبر 23, 2018 في 23/12/2018 at 13:26, ابو عارف said: نعم ممكن ان شاء الله اليك المثال ، بعد ضغط على زر الثالث ستجد ملف اكسل او csv اذا حبيت بتنسق آخر ، غير csv الى xls او txt او doc في سطر التالي Outfile = CurrentProject.Path & "\LostRecords.csv" abx.accdb Expand شكرا استاذنا ابو عارف المحترم وهو المطلوب كود رائع من استاذ رائع لكني اطمع في المزيد وكيف لا وهذه الاكواد الجميلة (هل يمكن ان اختار مكان حفظ الملف اعلاه وشكرا)
ابو عارف قام بنشر ديسمبر 23, 2018 قام بنشر ديسمبر 23, 2018 شكر لله حاضر ، على قدر مستطاع ان شاء الله تقصد مكان حفظ الملف مكان غير مسار قاعدة ؟
علي هندسة قام بنشر ديسمبر 23, 2018 الكاتب قام بنشر ديسمبر 23, 2018 في 23/12/2018 at 15:32, ابو عارف said: شكر لله حاضر ، على قدر مستطاع ان شاء الله تقصد مكان حفظ الملف مكان غير مسار قاعدة ؟ Expand نعم استاذ ابو عارف يتم فتح نافذه لاختيار مكان الحفظ اشبه بالصورة المرفقة وشكرا
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.