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

أهلاً بك أخى gagaga

قمت بعمل مثال لكل كالتالى

الحقول الصفراء حقول غير منضمة حيث يمكنك كتابة ما تريده ولن يتم حفظ إلا بعد الضغط على Save وتأكيد الحفظ

الحقول البيضاء منضمة لحقول الجدول وهى غير ممكنة للإدخال ويستحسن تكون غير مرئية فى نموذجك

فى أمر Save تم وضع الكود التالى

Private Sub Save_Enter()
If MsgBox(" هل تريد حفظ البيانات التى قمت بإدخالها؟ ", vbYesNo) = vbNo Then
	DoCmd.CancelEvent
Else
	Me.f1 = Me.txt1
	Me.f2 = Me.txt2
	Me.f3 = Me.txt3
End If

End Sub

وعند أمر New تم وضع الكود التالى

Private Sub CmdNew_Click()
	DoCmd.GoToRecord , , acNewRec
	Me.txt1 = ""
	Me.txt2 = ""
	Me.txt3 = ""

End Sub

وإليك المثال داخل المرفق

وشكراً

HDontSave.rar

انا عاجز عاجز عاجز عاجز عاجز عن الشكر والتقدير يا أخ hongylover

وتصد ق بالله قبل لا استقبل اي رد من اي حد شفت وشك على الموقع وحاولت ارسلك رساله خاصة بالسؤال ولكن رفض الموقع قبول ذلك ومش عارف ايه السبب ...؟؟؟

وسبحان الله وفعلا كما يقال ( القلوب عند بعضها ) انت الوحيد اللي استقبلة منه حل لمشكلتي

كما ان هناك باقي عندي مشكلة بسيطة

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

اي ان هناك عندي جدولين

الجدول الاول لنأخذ منه قيمة معينة عن طريق مربع سرد وتحرير (combo box)

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

ارجو ان يكون السؤال واضح

والف والف والف والف والف والف والف والف والف والف مليووووووووووووووووووووووون شكر

اخوك ابو - خالد

لا شكر على واجب أخى gagaga

فنحن يد بيد ننهل من معارف العلم ودائماً نتعلم كل يوم شىء جديد

ملحوظتين أخى أبو خالد:

1- بما أنك عضو جديد فى المنتدى يجب قراءة قوانين المنتدى حتى لا تجد موضوعك قد تم غلقه من قبل المشرفين "لاتقم أبداً بتخصيص عضو للرد على سؤالك" فكلنا نعمل سوياً على رقى هذا المنتدى الكريم. وصدقنى من يعرف الحل لن يتردد بالمساعدة ومن لم يعرف ينتظر مثلك بتلهف الإجابة.

2- الموضوع لا يحتاج هذا الشكر كله فهو بسيط .. يكفى أن تكون القلوب عند بعضها "كما قلت"

وبالنسبة للسؤال الآخر !! أين السؤال؟؟

رجاءً قم بإرفاق القاعدة والتوضيح أكثر

وشكراً

اخي العزيز لقد اجريت بعض المحاولات لما اريده

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

ثم اضغط على حفظ وستظهر رسالة وسوف تعرف ماذا اريد

كل ما اريده ان يتم حفظ جميع البيانات في جدول المسمى test_table

وشكرا جزيلا لاهتمامك اخوك ابو خالد

Select_names.rar

بارك الله بكم جميعا على المشاركه

كما اشكر الأخ هاني على هذا الموضوع ومحاولة ايجاد الحل المناسب له

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

تفضل اخي الكريم ابو خالد هذا المثال بناء على طلبك بالحرف الواحد حيث لا يتم حفظ اي شيء في الجدول إلا بعد الضغط على زر الأمر " حفظ "

za_NoAutoSave.rar

شكراً اخت زهرة وشكراللجميع ً على الرد والاهتمام وفعلا فريق عربي

هل ممكن ان اضيف لهذه الشاشة الجميلة ازرار اوامر للتنقل بين السجلات مثل السجل السابق والتالي واول سجل واخر سجل

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

واعلم انني اثقلت عليكم ولكن اسأل الله في هذا اليوم الكريم ان يغفر لنا جميعا وان يجعل ذلك في ميزان حسناتكم ......... امين

وين الاخوان اشفيكم نسيتوني طول هذه المدة

عسى ما شر

اتمنى ان تكونوا بخير اولا ثم تكملوا اجابت سؤالي ثاني