PDA

View Full Version : سوال: ارور کد vba در سیو پی دی اف در اکسس 2007



Source1
دوشنبه 24 فروردین 1394, 16:48 عصر
سلام
من یە vba کد نوشتم برای سیو report بە صورت پی دی اف بە همراه انتخاب مسیر سیو
ولی وقتی اجرا میکنم این ارور میدە
130302

دوستان کسی هست کمک بکنە یا کد کامل داشتە باشە

اینم از کد




Private Sub Command35_Click()
On Error GoTo Err_Command35_Click
Dim stDocName As String
stDocName = "employ vb"
DoCmd.OpenReport stDocName, acPreview
DoCmd.OutputTo acOutputReport, " nameToSave ", "*.pdf", "", True
DoCmd.Close
Exit_Command35_Click:
Exit Sub
Err_Command35_Click:
MsgBox Err.Description
Resume Exit_Command35_Click
End Sub

Abbas Amiri
دوشنبه 24 فروردین 1394, 22:25 عصر
سلام
من یە vba کد نوشتم برای سیو report بە صورت پی دی اف بە همراه انتخاب مسیر سیو
ولی وقتی اجرا میکنم این ارور میدە
130302

دوستان کسی هست کمک بکنە یا کد کامل داشتە باشە

اینم از کد




Private Sub Command35_Click()
On Error GoTo Err_Command35_Click
Dim stDocName As String
stDocName = "employ vb"
DoCmd.OpenReport stDocName, acPreview
DoCmd.OutputTo acOutputReport, " nameToSave ", "*.pdf", "", True
DoCmd.Close
Exit_Command35_Click:
Exit Sub
Err_Command35_Click:
MsgBox Err.Description
Resume Exit_Command35_Click
End Sub




سلام
شما باید در جایی نام فایل ذخیره را نوشته اید ، نام ریپورت را بنویسید.

Source1
دوشنبه 24 فروردین 1394, 22:44 عصر
سلام
شما باید در جایی نام فایل ذخیره را نوشته اید ، نام ریپورت را بنویسید.


نە دوست عزیز همان ارور میدە :ناراحت:

Abbas Amiri
دوشنبه 24 فروردین 1394, 23:01 عصر
نە دوست عزیز همان ارور میدە :ناراحت:

از فرمت زیر استفاده کنید:
DoCmd.OutputTo acOutputReport,"ReportName", acFormatPDF, "D:\myFile.pdf", True

Source1
دوشنبه 24 فروردین 1394, 23:19 عصر
از فرمت زیر استفاده کنید:
DoCmd.OutputTo acOutputReport,"ReportName", acFormatPDF, "D:\myFile.pdf", True

دمت گرم حاجی کار کرد ولی من میخوام خودم مسیر سیو رو انتخاب کنم

Abbas Amiri
سه شنبه 25 فروردین 1394, 21:13 عصر
دمت گرم حاجی کار کرد ولی من میخوام خودم مسیر سیو رو انتخاب کنم

سلام
اگر قسمت نام فایل رو خالی بذارید ، کادر محاوره ای Save باز میشه.
DoCmd.OutputTo acOutputReport,"ReportName", acFormatPDF, , True

arman2000
یک شنبه 20 مهر 1399, 14:42 عصر
باسلام

چه تغییری در این کد می تونه باعث باز شدن کادر محاوره ای Publish as PDF or XPS بشه؟