السلام عليكم اساتذتي الكرام
كما في الصورة والنموذج المرفق اريد ان تطبع استمارة الكشف الموجودة في النموذج الفرعي وقد قمت باضافة هذا الكود
Private Sub ÇÓÊãÇÑÉ_ÇáßÔÝ_Click()
Dim stLinkCriteria As String
stLinkCriteria = "[ÑÞã ÇáãæáÏÉ]=" & "'" & Me![ÑÞã ÇáãæáÏÉ] & "'"
DoCmd.OpenReport "ÇÓÊãÇÑÉ ÇáßÔÝ", acViewPreview, , stLinkCriteria
End Sub
Private Sub ØÈÇÚÉ_ÇÓÊãÇÑÉ_ÇáßÔÝ_Click()
Dim stLinkCriteria As String
stLinkCriteria = "[ÑÞã ÇáãæáÏÉ]=" & "'" & Me![ÑÞã ÇáãæáÏÉ] & "'"
DoCmd.OpenReport "ÇÓÊãÇÑÉ ÇáßÔÝ", acViewNormal, , stLinkCriteria
End Sub
ولكن تظهر لي مشكلة في الفقرة الحمراء واعتراض البرنامج على "رقم المولدة"!!!
مع ملاحظة اني اريد ان يقوم البرنامج بطابعة تقرير استمارة كشف واحد حسب صاحب المولدة المعني في النموذج الرئيسي
مع فائق احترامي
