02-03-20, 05:28 PM
(02-03-20, 12:42 AM)Ahmed_Mansoor كتب : وعليكم السلام ورحمة الله وبركاته
أهلا بك أخي الكريم , بالنسبة لتقرير الأكتف ريبورت تستطيع من خلال مكتبة تابعة للأكتف ريبورت تمكك من حفظ التقرير كملف PDF أما بالنسبة للداتا ريبورت وأيضا للأكتف ريبورت أو أي أنواع تقارير أخرى يوجد برامج مجانية تقوم بتعريف طابعة في جهازك حيث عندما تطبع التقرير فيها لا تطبع بالطريقة العادية وإنما عندما تختارها عند الطباعة تقوم بتحويل صفحات التقرير إلى ملف PDF , بالتوفيق .
تحياتي لك استاذ احمد
وشكراً على الرد
قمت باضافة اكتيف ريبورت
واسخدمت المكتبة مع الكود التالي
كود :
Dim myPDF As ARExportPDF
'to save as pdf
Set myPDF = New ARExportPDF
myPDF.FileName = App.Path & "\Invoice.PDF" 'or where you want to save your file
ActiveReport1.Export myPDF
'to show
ActiveReport1.Showالمشكلة ظهرت في السطر ActiveReport1.Export myPDF
مع رسالة الخطأ التالية بالرابط