السلام عليكم ورحمة الله
كيف حال الاخوة الافاضل
كل عام وانتم بخير
في مثال الاخ أبو عقيل الخاص بمعرفة الارقام المفقودة فهذا المثال يبدأ من وجود رقم 1
فهل اجد تعديل علي المثال بحيث يأخذ أول رقم موجود فعلا مثلا 1400 وآخر رقم 1450 ويستخرج منهما الارفام المفقودة بدلا من ان يبدأ من الترقيم 1
ارجو الافادة وشكراً لكم
ميدو666 كتب:السلام عليكم ورحمة الله
كيف حال الاخوة الافاضل
كل عام وانتم بخير
في مثال الاخ أبو عقيل الخاص بمعرفة الارقام المفقودة فهذا المثال يبدأ من وجود رقم 1
فهل اجد تعديل علي المثال بحيث يأخذ أول رقم موجود فعلا مثلا 1400 وآخر رقم 1450 ويستخرج منهما الارفام المفقودة بدلا من ان يبدأ من الترقيم 1
ارجو الافادة وشكراً لكم
تفضل اخي هذي هو المطلوب او لا
تم تعديل هذه المشاركة بواسطة Musallam alazmi في 15 نوفمبر 2010 في 12:46
بارك الله فيك اخ مسلم
لكن ماذا لو كان الترقيم يبدأ برقم غير 1400
بالتأكيد ستختلف النتائج و لن تعكس الحقيقة
لذلك هذا عديل بسيط ليبدأ الحساب من اصغر رقم بالجدول
Abo_Yossof كتب:بارك الله فيك اخ مسلم
لكن ماذا لو كان الترقيم يبدأ برقم غير 1400
بالتأكيد ستختلف النتائج و لن تعكس الحقيقة
لذلك هذا عديل بسيط ليبدأ الحساب من اصغر رقم بالجدول
أخي ابو يوسف
صحيحيه هذي افصل و اسهل حيثو تبداي من اصغر رقم و بالتصاعد
السلام عليكم
وكل عام وانتم بخير
الف شكر علي المجهود الرائع هذا
وبارك الله فيكم
تحياتي لكم جميعاً
صراحة فكرة حلوة..
وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ
الاخوه الافاضل
السلام عليكم ورحة الله
لي سؤال بخصوص هذا المثال
حيث انه تم اضافة سجلات بدون ارقام في جدول السريال فنه عند فتح نموذج الارقام المفقودة يظهر رسالة خطأ (لا يقبل قيم خالية) فهل من حل
اي هل استطيع ان يظهر الارقام المفقودة بغض النظر عن وجود قيمة خالية (قيمة خالية بدون صفر )
وشكراً
مرفق المثال
ميدو666 كتب:الاخوه الافاضل
السلام عليكم ورحة الله
لي سؤال بخصوص هذا المثال
حيث انه تم اضافة سجلات بدون ارقام في جدول السريال فنه عند فتح نموذج الارقام المفقودة يظهر رسالة خطأ (لا يقبل قيم خالية) فهل من حل
اي هل استطيع ان يظهر الارقام المفقودة بغض النظر عن وجود قيمة خالية (قيمة خالية بدون صفر )
وشكراً
مرفق المثال
وعليكم السلام ورحمة الله وبركاته ..
أشكر جميع الأحوة المشاركين وجزاكم الله كل خير على هذه الأفكار الممتازة ..
ولو تسمحوا لي بالإفادة للأخ السائل ..
أخي الكريم تم تعديل هذا السطر فقط واستخدمنا الدالة nz
lastnum = Nz(!Transection_No) + 1
مرفق المثال بعد التعديل ..
تحياتي ..
تم تعديل هذه المشاركة بواسطة محمد أبو عدنان في 21 نوفمبر 2010 في 20:37
الاخ الفاضل محمد ابو عدنان
شكراً علي ردك الجميل
ولكنه بدأ برقم تسلسل 1
ولم يأخذ الرقم الأول المسجل بالفعل بد بدأ من رقم 1 هذا اولا
ثانيا
اريد ان اضع Zn قبل الجملة التالية
lastnum = DMin("Transection_No", "serial")
وشكراً لك اخي الكريم
ميدو666 كتب:الاخ الفاضل محمد ابو عدنان
شكراً علي ردك الجميل
ولكنه بدأ برقم تسلسل 1
ولم يأخذ الرقم الأول المسجل بالفعل بد بدأ من رقم 1 هذا اولا
ثانيا
اريد ان اضع Zn قبل الجملة التالية
lastnum = DMin("Transection_No", "serial")
وشكراً لك اخي الكريم
هو يبدأ من أصغر رقم وعند التغيير من فراغ الى 0 بواسطة الدالة nz بدأ من الصفر والصفر رقم هذا من جهة ومن جهة أخرى ليس منطقيا أن يكون هذا الحقل فراغ لأنه حقل مهم ويجب أن يكون عليه كونترول لادخال قيمته اليس كذلك يا أخي ؟
على كل الأحوال لا ندري ما هدفك فقد تم عمل ما تريد فقط غير نفس السطر الى
If Nz(mytbl!Transection_No) <> 0 Then lastnum = !Transection_No + 1
أو الى
If Not IsNull(mytbl!Transection_No) <> 0 Then lastnum = !Transection_No + 1
مرفق المثال بعد التعديل
تحياتي
تم تعديل هذه المشاركة بواسطة محمد أبو عدنان في 21 نوفمبر 2010 في 22:25
الأخ العزيز الاخ الفاضل محمد ابو عدنان
شكرا لك علي مجهودك
المشكلة عندي في هذا المثال المرفق
جزاك الله خير
تم تعديل هذه المشاركة بواسطة ميدو666 في 21 نوفمبر 2010 في 23:36
ميدو666 كتب:الأخ العزيز الاخ الفاضل محمد ابو عدنان
شكرا لك علي مجهودك
المشكلة عندي في هذا المثال المرفق
جزاك الله خير
أخي الكريم لما تستعمل الاسماء العربية :wacko: :wacko:
جرى تعديل مواصفات حقل رقم سند القبض من نص الى رقم لأنه على الوضع الحالي لن يعمل المثال.
تم تكبير هذا المتغير لان الرقم الصحيح يتوقف التخزين به عند رقم معين وبذلك لن تكتمل الارقام كلها
Dim lastnum As Double
مرفق المثال بعد التعديل
تحياتي
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…