حفظ التقرير بصيغة PDF

[nogom]

السلام عليكم اخواني

عندي نموذج جرد المخزن وحاطط فيه زر لطباعة التقرير

اريد ان يقوم يحفظ التقرير بصيغة ملف (PDF) في مجلد معين موجود بالجهاز اسمو كميات المخزن

ماهو الكود يلي يقوم بحفظ التقرير بصيغة (PDF) في مجلد كميات المخزن

طبعا البرنامج حاطه في مجلد خاص فيه 

ياريت تفيدوني تعبت وانا احاول

[ابو ياسين المشولي]

DoCmd.OutputTo acOutputReport, "اسم التقرير", acFormatPDF, CurrentProject.path & "\كميات المخزن" & "\"  & ".PDF", False

 

[nogom]

33 دقائق مضت, ابو ياسين المشولي said:

DoCmd.OutputTo acOutputReport, "اسم التقرير", acFormatPDF, CurrentProject.path & "\كميات المخزن" & "\"  & ".PDF", False

 

حطيت الكود ولكن بتظهر لي رسالة

[essam rabea]

أخى الفاضل nogom

يجب أن يكون هناك مجلد بإسم "الكميات بالمخزن" فى مسار قاعدة بياناتك لكى يخزن الملف به

Dim reportName As String
    Dim fileName As String
        
    reportName = "إسم التقرير"
    fileName = Application.CurrentProject.Path & "\" & "الكميات بالمخزن" & "\" & reportName & ".pdf"

    DoCmd.OpenReport reportName, acViewPreview, , , acHidden
    DoCmd.OutputTo acOutputReport, reportName, acFormatPDF, fileName
    DoCmd.Close acReport, reportName, acSaveNo

 

[nogom]

7 دقائق مضت, essam rabea said:

أخى الفاضل nogom

يجب أن يكون هناك مجلد بإسم "الكميات بالمخزن" فى مسار قاعدة بياناتك لكى يخزن الملف به

Dim reportName As String
    Dim fileName As String
        
    reportName = "إسم التقرير"
    fileName = Application.CurrentProject.Path & "\" & "الكميات بالمخزن" & "\" & reportName & ".pdf"

    DoCmd.OpenReport reportName, acViewPreview, , , acHidden
    DoCmd.OutputTo acOutputReport, reportName, acFormatPDF, fileName
    DoCmd.Close acReport, reportName, acSaveNo

 

يعطيك العافية ياغالي

ما قصرت