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

فتح نموذج التفاصيل على بيانات السجل الحالي

بدأه Cha3iR في 23 سبتمبر 2012 · 7 رد · 1,840 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

اخواني لدي نموذج إذخال المعلومات الأساسية وعندي كذلك نموذج للمعلومات الاضافية أو يمكن تلخيصها في التفاصيل. يتم الذخول على نموذج التفاصيل عن طريق زر في نموذج المعلومات الأساسية، والاشكال المطروح في هذا السيناريو هو كيفية الربط بين هذين النموذجين حتى يتأتى التكامل المطلوب بحيث يفتح نموذج التفاصيل على نفس بيانات السجل الظاهر في نموذج المعلومات الأساسية وليس على آخر سجل أو أول سجل.

لم أرفق أي مثال حتى يتم العمل عليه، لكن كل ما أبتغيه هو مجرد أفكار أو أكواد تحل المشكل أو حتى أمثلة مشابهة سبق وأن تم طرحها بالمنتدى ، لأنني حاولت البحث ولم أوفق في ذلك فأتمنى من الله أن يحفظ لكم الصحة و يرزقكم من حيث لا تحتسبون لتفاعكلم مع هذا الطرح وشكرا

#2

لفتح نموذج التفاصيل استخدم هذا الكود اذا كان الحقل المرتبط بين النموذجين هو حقل نصي مثل الإسم او ما شابه ذلك

Private Sub CmdOpen_Click()
Dim stLinkCriteria As String
stLinkCriteria = "[txtString]=" & "'" & Me![txtString] & "'"
DoCmd.OpenForm "frmDetail", , , stLinkCriteria
End Sub

قم بتغيير txtString الى نفس الحقل لديك اذا كان نصي بين النموذجين

قم بتغيير frmDetail الى اسم نموذج التفاصيل لديك

لفتح نموذج التفاصيل استخدم الكود اذا كان الحقل المرتبط بين النموذجين هو حقل رقمي مثل ID او ما شابه ذلك

Private Sub CmdOpen_Click()
Dim stLinkCriteria As String
stLinkCriteria = "[txtNumeric]=" & Me![txtNumeric] 
DoCmd.OpenForm "frmDetail", , , stLinkCriteria
End Sub

قم بتغيير txtNumeric الى نفس الحقل لديك اذا كان رقمي بين النموذجين

قم بتغيير frmDetail الى اسم نموذج التفاصيل لديك

بالتوفيق

#3

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

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

BLpp5-0W1g_483197477.jpg

أتمنى أن تجدي لي حلا كما عهدت أم عهود وأتأسف لعدم إرفاق أي مثال للعمل عليه

للمعلومة النموذجين مبنيين على نفس الجدول

#4
Cha3iR كتب:

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

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

BLpp5-0W1g_483197477.jpg

أتمنى أن تجدي لي حلا كما عهدت أم عهود وأتأسف لعدم إرفاق أي مثال للعمل عليه

للمعلومة النموذجين مبنيين على نفس الجدول

اخي الفاضل

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

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

واكتب اسم الحقل في النموذج الأول واسم الحقل في النموذج الثاني المطابق للحقل في النموذج الأول وهل الحقول نصيه ام رقميه

بالتوفيق

#5

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

#6

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

#7
Cha3iR كتب:

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

اخي الفاضل

لا اعلم لماذا كل هذا التكتم والسرية وعدم الإفصاح عن اي معلومه !!!

لقد طلبت منك وضع اسماء النماذج واسماء الحقول وخصائصها لكي اقوم بمساعدتك بقدر استطاعتي

ولكن يبدو ان برنامجك خاص بإنتاج القنابل النوويه ولا تريد الإفصاح عن اي معلومه موجوده به .

لذا بارك الله بك هنيئا لك ببرنامجك ولا اريد ان اعرف عنه شيء فهو لا يهمني بشيء ايضا

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

ختاما حاول تفتح نموذج التفاصيل وفي حدث عند الفتح ضع هذا الكود

Private Sub Form_Open()
Me.Field=Forms!frmInfo!Field
End Sub

بالتوفيق

#8

أختى الفاضلة

والله الذي نفسي بيده ما جاء بخاطري ولا على بالي مثل هذا الفكر ولا مثل هذه الطريقة من التفكير، كل ما في الأمر أنني ظننت أن ما أبتغيه جلي في بضع أسطر ولضيق الوقت قلت أن أشرح ما أريد ما دام واضح، لكن سبحان الله كان ظني في غير محله

لا أبتغي السرية ولا التكثم أبدا علما أن هناك قد يأتي من يستفيد من أسئلتي مثلما استفدت من العديد من الاسئلة التي سبق تداولها في المنتدى

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

آسف إذاما اعطيت انطباع غير الذي أنا أقصده، وأجدد آسفي على الصورة التي تكونت لديكم

تم العمل على ارفاق الملف

Database1.rar

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

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

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

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

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