الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مطلوب كود لنقل قيمة من نموذج فرعي لنموذج فرعي آخر

مغلقمُجاب
بدأه abdulla121 في 15 يناير 2014 · 10 رد · 2,177 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

 

الاخوة المشرفين و رواد المنتدى المحترم

 

ارجو المساعد

 

مطلوب كود نقل قيمه من نموذج فرعي لنموذج فرعي آخر

 

عند النقر على اسم المنتج ينتقل كود المنتج للنموذج الآخر 

 

مرفق مثال للتطبيق عليه

 

جزاكم الله كل خير

#2

الاخ عبدالله 

السلام عليكم

اين هو المثال المرفق؟

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

اعتذر انه ليس لدي الوقت الان واعد ان اضع مثالا في الغد ان شاء الله

#3

وعليكم السلام  :)


 


هذا الرابط به كيفية مناداة حقل بين النماذج ، ارجو ان يفيدك في مقصدك  :)


http://access.mvps.org/access/forms/frm0031.htm


 


 


جعفر


#4

عزيزي صفوت ياسين 

 

تم رفع المثال

 

مثال.zip

#5

سبحان الله و بحمده سبحان الله العظيم


 


للرفع

#6

الاخ عبدالله المحترم

يوجد لدي موضوع بعنوان قاعدة بيانات لمتجر

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

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

هذا هو الحل لمشكلتك

#7

اخي العزيز  صفوت يايسن

 

شكرا للمشاركة

 

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

 

نرجو من الاخوه المساعدة

#8

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

الاخ احمد

حاول التأكد من العلاقات بين الجداول ومن الماكرو الذي يفتح النموذج الفرعي 

تم تعديل هذه المشاركة بواسطة صفوت ياسين في 17 يناير 2014 في 08:11

#9 أفضل إجابة

تفضل اخي :)

 

وهذا الكود الذي يعمل على النقر المزدوج:

Private Sub ProductName_DblClick(Cancel As Integer)


    Me.Parent.SetFocus
    Me.Parent.BA_InvoiceSaleDetails.SetFocus

        DoCmd.GoToRecord , , acNewRec
        Me.Parent.BA_InvoiceSaleDetails.Form.PartID = Me.PartID
        Me.Parent.BA_InvoiceSaleDetails.Form.ProductName = Me.PartID
    
End Sub

جعفر

132.مثال.accdb.zip

#10

تفضل اخي التعديل كما طلبت

الاخ جعفر/عذرا للمداخلة  حيث شاهدت مشاركتك بعد رفع الملف.

مثال.rar

تم تعديل هذه المشاركة بواسطة ابوشفيق في 17 يناير 2014 في 12:00

#11

شكرا عزيزي جعفر

 

شكرا عزيزي ابو شفيق 

 

على المشاركة و حل المشكله

 

وهذا هو المطلوب

 

جزاكم الله خيرا 

 

و شكرا عزيزي صفوت ياسين للمشاركة

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…