Phatomas

السلام عليكم الكلام ده هايل جدا جدا .. فقط اريد نسخ السجل وليس نقل وحذف Private Sub Command0_Click() On Error Resume Next DoCmd.SetWarnings False DoCmd.OpenQuery "ForFamilysToAlmostabadin", acViewNormal DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdDeleteRecord DoCmd.GoToRecord acDataForm, "Form_Familys", acNewRec DoCmd.GoToRecord , , acNewRec DoCmd.SetWarnings True Me.Date_ElEstbad = "" Me.Sabb_ElEstbad = "" MsgBox "تم نقل البيانات الى جدول المستبعدين ", vbInformation, " نقل وحذف" Exit_Command0_Click: Exit Sub Err_Command0_Click: MsgBox Err.Description Resume Exit_Command0_Click End Sub اعتقد أن هذا الكود هو الخاص بالنقل .. اريد اغير في معلوماته بحيث ينسخ السجل دون حذفه ملحوظة : الكود موجود في "حدث" "عند النقر" وليس "بعد التحديث" تحياتي

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

حاضر .. هاحاول لان حجمها كبير

استاذي العزيز ... عارف اني تعبتك معي علما بأن كل مشرف له جدول خاص به وليس جدول واحد لجميع المشرفين ملحوظة : أنا وضعت الكود في "حدث" "عند التغيير" مـــ تحياتي ـــع

السلام عليكم ورحمة الله وبركاته أنا باشكر حضرتك على اهتمامك بالرد ... الموضوع ان عندي 3 مشرفين في القائمة المنسدلة .. على سبيل المثال ( احمد ، محمد ، ابراهيم ) اريد لما اختار اسم المشرف يتم نسخ البيانات في الجدول الخاص بالمشرف .. واخيرا تحياتي لشخصك الكريم

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته لدي قاعدة بيانات تحتوي على اسماء المعلمين وتم تصميم الجداول والنماذج والتقارير وعند عرض النموذج وباختيار اسم المعلم تظهر كل بياناته ويوجد مربع تحرير وسرد يحتوي على اسماء المشرفين يتم من خلاله اختيار المشرف الاستفسار : هل من الممكن عند اختيار اسم المشرف يتم نسخ بيانات السجل المعروض الي الجدول الخاص بالمشرف ؟؟ مــ تحياتي ــع