الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

هل تعلم إنك تستطيع أعادة الرقم المحذوف إذا كان الحقل ترقيم تلقائي

بدأه مفرج في 2 سبتمبر 2010 · 14 رد · 1,115 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

السَّلامُ عَلَيْكُمُ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

إخواني سالني أحد اصدقائي المخضرمين وأعتبره من خبراء الأكسس هذا السؤال

مشكلة الحقل المعرف بالترقيم التلقائي لايمكن إعادة الرقم إذا تم مسحه .

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

طبعا قلت ربما فيه أحد بالمنتدى لايعرف هذه الطريقة فأرفقت القاعدة هنا.

واسأل من استفاد منها لا يحرمنا من دعائة

---------------------------------------------------

A_Team.rar

تم تعديل هذه المشاركة بواسطة مفرج في 2 سبتمبر 2010 في 19:48

1

من سار على الدرب وصل

#2

الله يجزيك الخير دائما سباق ولك كل التحية

#3

معلومة رائعة..

لو تكرمت فقط بشرح بسيط للكود للاخوة خاصة كود تحديث البيانات..+F9

وتعني Shift+F9 وتستخدم في حال عدم قيام النموذج باحضار قيم البيانات بعد التحديث Refresh

عن تجربة Refresh احيانا لا تكون كافية..وتضطر لاعادة تحميل وفتح النموذج

عمل رائع

تحياتي

وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ

مواضيعي ومشاركاتي

#4

ما شاء الله اخ مفرح

فكرة جيدة

و لكن بعد اذنك

لان المستخدم فى الغالب لا يعرف الرقم المفقود فقد قمت باضافة تعديل بسيط حتى يتم اضافة الرقم المفقود تلقائيا

و اذا لم يكن هناك ارقام مفقودة سيتم اضافة رقم جديد

A_Team.rar

تم تعديل هذه المشاركة بواسطة mrnooo2000 في 3 سبتمبر 2010 في 01:06

1

مدونتى:-

احترف الأكسس مع أبو يوسف

متغيب حاليا لانشغالى الشديد

#5

ـ جزاك الله كل خير أخى مفرج .. فعلا الارقام المفقودة فى الترقيم التلقائى أصبحت فى عداد (كانت مشكلة) .. فكرة رائعة وعمل جميل بارك الله فيك.

ـ بارك الله فيك أبو يوسف على التعديل.

اللهم لك الحمد كما ينبغى لجلال وجهك وعظيم سلطانك .. لا إله إلا أنت سبحانك أنى كنت من الظالمين

#6
fawaz2004 كتب:

الله يجزيك الخير دائما سباق ولك كل التحية

وإيك بارك الله فيك

همام ابوعرقوب كتب:

معلومة رائعة..

لو تكرمت فقط بشرح بسيط للكود للاخوة خاصة كود تحديث البيانات..+F9

وتعني Shift+F9 وتستخدم في حال عدم قيام النموذج باحضار قيم البيانات بعد التحديث Refresh

عن تجربة Refresh احيانا لا تكون كافية..وتضطر لاعادة تحميل وفتح النموذج

عمل رائع

تحياتي

جزاك الله خيرا وبارك فيك ونفع بعلمك

mrnooo2000 كتب:

ما شاء الله اخ مفرح

فكرة جيدة

و لكن بعد اذنك

لان المستخدم فى الغالب لا يعرف الرقم المفقود فقد قمت باضافة تعديل بسيط حتى يتم اضافة الرقم المفقود تلقائيا

و اذا لم يكن هناك ارقام مفقودة سيتم اضافة رقم جديد

أخي نورت موضوعي ولي الفخر أن تضيف عليه

omar19-3 كتب:

ـ جزاك الله كل خير أخى مفرج .. فعلا الارقام المفقودة فى الترقيم التلقائى أصبحت فى عداد (كانت مشكلة) .. فكرة رائعة وعمل جميل بارك الله فيك.

ـ بارك الله فيك أبو يوسف على التعديل.

وإيك بارك الله فيك

تم تعديل هذه المشاركة بواسطة مفرج في 3 سبتمبر 2010 في 22:36

من سار على الدرب وصل

#7

اخي مفرج والاخوة الاعزاء ابو يوسف وهمام

جزاكمالله خيرا لما تقدموه منفعة لنا

ولكلن حصل معي شيء بسيط لعله يحصل معي فقط وهو

عند البحث عن الرقم المفقود وادخاله وبالطريقة المذكورة ..الوضع جيد جدا .... ولكن عند اضافة سجل جديد فان حقل القيمة الافتراضية يأخذ قيمة من الرقم المفقود الذي تم وضعه +ا ويحصل خطأ اذا كان الرقم موجود

مع الشكر الجزيل

فادي

#8

بارك الله فيك على هذه الملاحظة القيمة

تم إضافة حقل لسجل الجديد لمعالجتها

A_Team.rar

تم تعديل هذه المشاركة بواسطة مفرج في 4 سبتمبر 2010 في 19:49

من سار على الدرب وصل

#9

اخي الكريم مفرج اشكرك على الرد السريع وتعاونك

ولكن اخي الفكرة جيدة ولكنه يذعب الى بداية السجلات وحاولت ان اغير ذلك والذهاب الى السجل الاخير لم تفلح

خبرتي قليلة في البرمجة واتوقع ان الحل يكمن في حال كون (انه لا يوجد سجلات محذوفة ان يلغي فكرة البحث عن المفقود ووضع سجل جديد وان يتابع في عمله المعتاد )

مع الشكر اخي مفرج

فادي

#10

اخي العزيز..بعد اذن اخي مفرج وابو يوسف..

كنت احيانا استخدم الكود التالي..

   DoCmd.GoToRecord acDataForm, "F1", acLast

هناك جمل اخرى لعمل هذا الاجراء لكن لكل واحد منها استخدامها الخاص ولا اريد هنا التشويش على هذا المثال بالذات

تحياتي وشكرا للجميع على المشاركة والافادة

وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ

مواضيعي ومشاركاتي

#11

والله جزاك الله خيراً على هذه المعلومة التى طالما حيرتنى وحيرت الكثير وكذلك اتوجه بالشكر على الاستاذ العلامة المتواضع الاخ / همام ابو عرقوب على اضافته الجيلة واحترامه لرأى الاخرين :wub:

#12

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

#13

لقد تم اضافة هذا الكود فى المشاركة رقم 4

يمكنك استخدام هذا الكود فى المكان الذى تريد

مدونتى:-

احترف الأكسس مع أبو يوسف

متغيب حاليا لانشغالى الشديد

#14
f_ajjour كتب:

اخي مفرج والاخوة الاعزاء ابو يوسف وهمام

جزاكمالله خيرا لما تقدموه منفعة لنا

ولكلن حصل معي شيء بسيط لعله يحصل معي فقط وهو

عند البحث عن الرقم المفقود وادخاله وبالطريقة المذكورة ..الوضع جيد جدا .... ولكن عند اضافة سجل جديد فان حقل القيمة الافتراضية يأخذ قيمة من الرقم المفقود الذي تم وضعه +ا ويحصل خطأ اذا كان الرقم موجود

مع الشكر الجزيل

فادي

لو جربت الكود الذى ارفقته فى المشاركة رقم 4 اعتقد انه لا يحدث به ذلك يمكنك ان تستخدمه فىحدث اضافة سجل جديد

اذا كانت هناك رقم محذوف سيتم اضافة سجل جديد

و اذا كانت كل الارقام موجودة سيتم اضافة رقم جديد

مدونتى:-

احترف الأكسس مع أبو يوسف

متغيب حاليا لانشغالى الشديد

#15
همام ابوعرقوب كتب:

اخي العزيز..بعد اذن اخي مفرج وابو يوسف..

كنت احيانا استخدم الكود التالي..

   DoCmd.GoToRecord acDataForm, "F1", acLast

هناك جمل اخرى لعمل هذا الاجراء لكن لكل واحد منها استخدامها الخاص ولا اريد هنا التشويش على هذا المثال بالذات

تحياتي وشكرا للجميع على المشاركة والافادة

فكرة جيدة اخ همام و يمكننا تعديله بشكل بسيط حتى لا يحتاج الى اى تعديل عند استخدام الكود

   DoCmd.GoToRecord acDataForm, me.name, acLast

مدونتى:-

احترف الأكسس مع أبو يوسف

متغيب حاليا لانشغالى الشديد

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…