m_fouad0003 قام بنشر فبراير 16, 2019 مشاركة قام بنشر فبراير 16, 2019 بسم الله الرحمن الرحيم الاخوه الكرام اعضاء منتدنا الغالى لقد قمت بعمل هذا الكود لارسال التقرير بالاميل وهو يعمل بشكل جيد ولاكن المشكل تظهر عندما اقوم بالغاء عمليه الارسال تظهر رسالة خطا فارجور من السادة اعضاء منتدنا الكرام مساعدتى فى تعيل الكود بحيث اذا الغيت الارسال لا تظهر رسالة الخطا هذا هو الكود DoCmd.SendObject acSendReport, "Report1", acFormatPDF, [ff], "" وشكرا جزيل 1 رابط هذا التعليق شارك More sharing options...
ابوآمنة قام بنشر فبراير 16, 2019 مشاركة قام بنشر فبراير 16, 2019 شاهد هذا الموضوع أو استخدم هذا الكود On Error Resume Next رابط هذا التعليق شارك More sharing options...
m_fouad0003 قام بنشر فبراير 16, 2019 الكاتب مشاركة قام بنشر فبراير 16, 2019 اخى الكريم اشكرك على ردك ولكن اين الكود الذى يمكن ان استخدمه رابط هذا التعليق شارك More sharing options...
ابوآمنة قام بنشر فبراير 17, 2019 مشاركة قام بنشر فبراير 17, 2019 (معدل) قبل كودك ضع هذا السطر "On Error Resume Next" فيصبح الكود بالكامل هكذا On Error Resume Next DoCmd.SendObject acSendReport, "Report1", acFormatPDF, [ff], "" أو طريقة اصطياد رقم الخطأ كما في المشاركة السابقة لأستاذنا الجليل جعفر private sub cmd_click() on error goto err_cmd_click DoCmd.SendObject acSendReport, "Report1", acFormatPDF, [ff], "" exit_cmd_click: exit sub err_cmd_click: if err.number=3314 then msgbox "هنا تضع صيغة رسالتك" resume exit_cmd_click else msgbox err.number & vbcrlf & err.description endif end sub لا تنس أن تضع رقم الخطأ الذي ظهر لك بدلاً من الرقم 3314 if err.number=3314 then وتضع رسالة "تم إلغاء عملية الإرسال" msgbox "هنا تضع صيغة رسالتك" تم تعديل فبراير 17, 2019 بواسطه saleh204 رابط هذا التعليق شارك More sharing options...
m_fouad0003 قام بنشر فبراير 17, 2019 الكاتب مشاركة قام بنشر فبراير 17, 2019 اخى الكريم saleh204 اشكرك على ردك و على الكود الرائع بارك الله فيك رابط هذا التعليق شارك More sharing options...
ابوآمنة قام بنشر فبراير 17, 2019 مشاركة قام بنشر فبراير 17, 2019 أنت الأروع أخي m_fouad0003 وكلك ذوق رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.