حقل من نفس السجل

[AboSaad17]

السلام  عليكم ورحمة الله وبركاته 
سؤالي مرفق ( في الصورة )
والشكر الجزيل مقدما لمن يساعدني في تنفيذ هذه الفكرة ( وإذا كان هناك عمل مشابه يختصر الوقت ف ياليت ) 

[Shivan Rekany]

خلي العمود الصحابي كمصدر لكومبوبوكس ( يتبع ل ) و اعمل كروب لكي لا يكون هناك اسماء متكررة عند الاضهار
او ارفق القاعدة لعمل المطلوب

[AboSaad17]

إليك استاذي الفاضل قاعدة البيانات ومشكور على تجاوبك

صحابه.rar

[Shivan Rekany]

3 دقائق مضت, AboSaad17 said:

إليك استاذي الفاضل قاعدة البيانات ومشكور على تجاوبك

صحابه.rar

اتفضل

صحابه.rar

[AboSaad17]

شكرا جزيلا لك 

[AboSaad17]

السلام عليكم 
سؤالي في نفس الموضوع عن السجلات المستمده من الحقل الاساسي هو
(( لاحظت بعد إدخال البيانات ( عن طريق النموذج ) أن الاسم لا يظهر ضمن القائمة ( يتبع لـ ) حتى يتم اغلاق النموذج ثم فتحه مرة أخرى 
فهل هذا الأمر طبيعي أم هناك حل 
ماقمت به انا لمحاولة الحل هو
1- انشاء زر امر حفظ السجل
2- انشاء زر امر سجل جديد 
ولكن لم اجد نتيجة 

صحابه2.rar

[Shivan Rekany]

56 دقائق مضت, AboSaad17 said:

لاحظت بعد إدخال البيانات ( عن طريق النموذج ) أن الاسم لا يظهر ضمن القائمة ( يتبع لـ ) حتى يتم اغلاق النموذج ثم فتحه مرة أخرى 
فهل هذا الأمر طبيعي أم هناك حل 
ماقمت به انا لمحاولة الحل هو

اتفضل
استخدمت هذا الكود
وهو اولا يتم الحفظ السجل وبعد بيعمل تحديث للكومبوبوكس
 

Private Sub الصحابي_AfterUpdate()
    DoCmd.RunCommand acCmdSaveRecord
    Me.يتبع_ل___الأب__.Requery
End Sub

* من الاحسن ان تکتب الاسماء الحقول باللغة الانكليزية 

صحابه2.rar

[AboSaad17]

تحية استاذي الفاضل وشكرا جزيلا على تجاوبك 

عندما قمت بادراج حقل جديد تاريخ الميلاد ظهرت رسالة خطأ ( مرفق ملف )

صحابه3.rar

[Shivan Rekany]

17 دقائق مضت, AboSaad17 said:

تحية استاذي الفاضل وشكرا جزيلا على تجاوبك 

عندما قمت بادراج حقل جديد تاريخ الميلاد ظهرت رسالة خطأ ( مرفق ملف )

صحابه3.rar

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

صحابه3.rar

[AboSaad17]

لله درك ( شكرا جزيلا لك ) وأكرمك الله وزادك من فضله 

[AboSaad17]

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

Private Sub Form_AfterUpdate()
Me.AllowEdits = False

End Sub

 

[jjafferr]

ما تفرق ، قبل او بعد السطر

Me.AllowEdits = False

 

جعفر

[AboSaad17]

السلام عليكم
لم اتوصل لحل يوجد ( صورة مرفقة ) للسؤال و لكم جزيل الشكر على سعة الصدر وطول البال
 

 

[jjafferr]

انا لم اكن اعرف بقية الكود

الآن وقد رأيته ، اقلب مكان الكودين ، يعني خلي الكود Me.AllowEdits = False تحت الكود اللي في المربع الاحمر.

 

جعفر

[AboSaad17]

الاخ جعفر شكرا جزيلا لك .......  ولكن ان شاء الله اجد الحل مع الاستاذ 

Shivan Rekany

• شفان ريكاني

فهو متابع معي الموضوع من البداية 

 

 

[Shivan Rekany]

اخي @AboSaad17 السلام عليكم ورحمة الله وبركاته
هل تعرف ما هو عمل ذلك السطر من الكود ؟
ذاك السطر هو لايقاف الكتابة بعد تحديث الاول للنموذج ... لذا ممكن تخبرنا ماذا تريد بالضبط ... 
حسب فهمي حضرتك ما محتاج  لهذا الكود فقد قم بحذف ذاك السطر وايضا سطر اللی یبدأ بـ DOCMD 
انا عطيتك ذاك الكود بعد تحديث لحقل صحابة لكن بعد اضافة حقل التاريخ انا عطيتك السطر الاخير من الكود فقد في حدث بعد تحديث النموذج
 

[AboSaad17]

الف شكر أخي الفاضل (  تم التوصل للحل )  والله تتسابق الكلمات الطيبة في الثناء لله ثم لك زادك الله من فضله