طلب مساعده في نقل باليانات من النموذج الرئيسي الى جدول فرعي

[imad2024]

السلام عليكم  ...... طلب مساعده

عند ادخل اسم جديد في النموذج الرئيسي او تغير مكان العمل في النموذج الرئيسي ان يتم تخزين الجديد او التغير الذي تم في جدول ( اماكن العمل السابقه ) مع الاحتفاظ في التغيرات السابقه لمكان العمل في الجدول ( اماكن العمل السابقه ) 

قمت بعمل تحديث الحاق استعلام .... المشكله هي يجب ان اقوم بعمل تحديث للصفحه وبعدها ان اقوم بتشغيل الاستعلام 

 

بحاجه الى كود ان يقوم بعد ادخال جديد او عند التغير ان يقوم بالتخزين ونقل البيانات مباشره الى جدول ( اماكن العمل السابقه )

 

مرفق نموذج عن البرنامج

مع الشكر

ASD.accdb

[Foksh]

وعليكم السلام ورحمة الله وبركاته ، جرب هذا التعديل أخي الكريم .

طبعاً تم اجراء بعض التعديلات والإستغناء عن استعلام التحديث وتحويله إلى SQL في زر الحفظ

 

ASD.accdb

 

[imad2024]

شكرا لك كثيرا هذا ما اريده 😀💗💯

قمت بتعديل الكود

الحفظ اولاً وبعدين ترحيل البيانات

DoCmd.RunCommand acCmdSaveRecord
    Dim strSQL As String
    strSQL = "INSERT INTO [اماكن العمل السابقه] (ID, Jop_Place, Date_Start) " & _
             "SELECT الاسم.ID, الاسم.Jop_Place, الاسم.Date_Start " & _
             "FROM الاسم " & _
             "WHERE (((الاسم.ID)=[Forms]![الاسم]![ID]));"
    
    DoCmd.RunSQL strSQL

بارك الله في جهودك معي 

 

 

عندي مشكله ثانيه في الموقع لا اعرف كيف اتواصل مع الاعضاء

عند محاولة مراسله اي مشرف او خبير او عضو

تظهر الرساله 

مع اني لم اقم بارسال رساله لاحد نهائيا

هذه الرساله تظهر لي دائما 

وشكرا لك كثيرا

تم تعديل يناير 21 بواسطه imad2024

[Foksh]

أعتقد أن هذا يعتمد على مشاركاتك ومساهماتك في المنتدى ، فكلما زادت يزداد التقييم والتصنيف الخاص بعضويتك ، وبالتالي ميزاتك ستكون أكبر 😊

نتمنى للجميع أعلى المراتب في دينهم وعلمهم .