Bshar قام بنشر يناير 16 مشاركة قام بنشر يناير 16 مساء الخير اصدقائي وزملائي ,, عندي مشكله عندما اضفت نموذج ms4 الى كود الحفظ في نموذج recept_a_q لايقوم بفتح سجل جديد والاستمرار وعند الغاء النموذج الذي اضفته يعمل القيد بشكل طبيعي ارجو المساعده منكم مرفق test.accdb رابط هذا التعليق شارك More sharing options...
Bshar قام بنشر يناير 16 الكاتب مشاركة قام بنشر يناير 16 ... رابط هذا التعليق شارك More sharing options...
أفضل إجابة Foksh قام بنشر يناير 16 أفضل إجابة مشاركة قام بنشر يناير 16 أخي الكريم @Bshar .. في الحالتين سيتم فتح سجل جديد عند Yes أو No ، لذا انقل مكان السطر المسؤول عن فتح سجل جديد لما قبل فتح MS4 On Error Resume Next If [Forms]![recept_a_q]![w1]![n3] <> 0 Then DoCmd.OpenForm "ms3" Me.Undo Else DoCmd.GoToRecord , , acNewRec DoCmd.OpenForm "ms4" Me.mtzn = 1 Me.save = 1 Msg = " ؟ هل تريد طباعة القيد" Style = vbYesNo Title = "رسالة تنبيه" result = MsgBox(Msg, Style, Title) If result = vbYes Then DoCmd.OpenReport "recept_qaid", acViewPreview Else Me.mtzn = 1 Me.save = 1 DoCmd.GoToRecord , , acNewRec End If End If End Sub 1 رابط هذا التعليق شارك More sharing options...
Bshar قام بنشر يناير 16 الكاتب مشاركة قام بنشر يناير 16 (معدل) نعم صحيح في الحالتين سيأخذ سجل جديد ,, اشكرك جزيل الشكر صديقي على نباهتك بارك الله بك تم تعديل يناير 16 بواسطه Bshar 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان