نقل البيانات من فورم الى فورم آخر بضغطة زر

السلام عليكم ورحمة الله وبركاته

تفضل اخوي وان شاء الله يكون المطلوب

copyData11.rar

وعليكم السلام ورحمة الله وبركاته

يعطيك العافيه اخوي مشارف

لكن هناك مشكلتان

المشكله الأولى انه ينسخ جميع السجلات وليس السجل المحدد

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

اعتذر عن عدم ايضاحي للنقطه بشكل كامل :blush:

تفضل اخوي ان شاء الله يكون هذا هو المطلوب

copyData11.rar

يعطيك العافيه اخوي مشارف على تواصلك

اتمنى اني ما ثقلت عليك

لكن للأسف لا يزال البرنامج لا ينسخ حاولت اكثر من مره لكن ما نفع

جرب الان

copyData11.rar

عذراً على التأخر في الرد

لكن البرنامج لا يزال لا يعمل

هل تظهر لديك رساله او شي من ذلك

لا ليس هناك رساله

لكن ارجو ان تلاحظ وجود هذا الكود

Private Sub Form_BeforeInsert(Cancel As Integer)
Me!NO1 = Nz(DCount("[ÕÇÍÈ_ÇáäÔÇØ]", "[التعهد1]"), 0) + 1
    Me!ÑÞã_ÇáÊÓáÓá = Format(DatePart("d", Date), "00") & Format(DatePart("m", Date), "00") & _
    Format(DatePart("yyyy", Date), "00") & Format([NO1], "0000")
End Sub

وهو خاص بإنتاج البرايمري كي لكل سجل

بالطبع هو بهذه الحاله لن يعمل لأن اسم الجدول تغير الى tbl1

وبالتالي بودي ان تعدله عندك(تغير التعهد1 في الكود الى tbl1) حتى يقوم بإنتاج البرايمري كي بشكل صحيح

جرب الان تم التعديل في اسم الجدول بالاسم tbl1

دايما حاول تسمية جميع كائنات وحقول قاعدة البيانات بالانجليزية حتى لا تحصل مشكله اثناء كتابة الكود

وتستطيع وضع تسميات توضيحية بالعربي للحقول

ووضع وصف للكائنات عن طريق الخصائص

لاحظ انه تم نقل السجل الاول والثاني الى الجدول الثاني عن طريق زر النقل

جرب نقل السجل الثالث الذي باسم جاسم وشوف النتيجة

copyData11.rar

الآن ظبط :lol:

يعطيك ربي الف عافيه يا مشارف على تواصلك وتعاطيك مع الموضوع فعلاً ما قصرت

ما اقدر اجازيك إلا بأن اقول جزاك الله خير و ادعو لك

اسأل الله لك السعادة في الدنيا و الآخرة

طبعاً يا شباب (الي يتصفحون الموضوع ) يجب حفظ السجل أولاً و من ثم ضغط الزر حتى يعمل البرنامج بشكل صحيح

وجزيك كل خير اخوي M.S.B

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