Access 2003 Raporu Pdf Olarak Kaydetme

1 2
15/03/2023, 12:05

hnakis

selam arkadaşlar. formumda buluna butonla liste kutusunda seçtiğim kaydın raporunu çıkarıyorum.

kullandığım kod;

Komut41_Click()

DoCmd.OpenReport "Rapor11", acViewPreview, , "NumuneNo='" & Me.Liste2.Column(6) & "'"

Başka bir buton yardımıyla bu açılan raporu pdf olarak kayıt etmek istiyorum(Kayıt yolu belli bir klasöre, numune no adı yazılarak). nasıl bir kod yazılmalı acaba.
access 2003 kullanıyorum. forumdaki örnekler üst versiyon Access ile yapılmış ve eklenmiş makro kullanılmış.

teşekkürler, saygılar.
16/03/2023, 11:51

alikagan

DoCmd.OutputTo acOutputReport, "RAPORADI", "PDFFormat(*.pdf)", "D:\BELGE.pdf", False
16/03/2023, 12:04

hnakis

(16/03/2023, 11:51)alikagan yazdı: DoCmd.OutputTo acOutputReport, "RAPORADI", "PDFFormat(*.pdf)", "D:\BELGE.pdf", False

Sayın alikagan;
Yazdığınız kodu bir butonun click olayına yazdım.
Geçerli nesnenin çıktısını almak istediğiniz biçim kullanılabilir değil hatası veriyor.

kod;

Komut43_Click()

DoCmd.OutputTo acOutputReport, "Rapor11", "PDFFormat(*.pdf)", "C:\Users\ACER\Desktop\BELGE.pdf", False
16/03/2023, 12:14

alikagan

(16/03/2023, 12:04)hnakis yazdı:
(16/03/2023, 11:51)alikagan yazdı: DoCmd.OutputTo acOutputReport, "RAPORADI", "PDFFormat(*.pdf)", "D:\BELGE.pdf", False

Sayın alikagan;
Yazdığınız kodu bir butonun click olayına yazdım.
Geçerli nesnenin çıktısını almak istediğiniz biçim kullanılabilir değil hatası veriyor.

kod;

Komut43_Click()

DoCmd.OutputTo acOutputReport, "Rapor11", "PDFFormat(*.pdf)", "C:\Users\ACER\Desktop\BELGE.pdf", False

DoCmd.OutputTo acOutputReport, "Rapor11", acFormatPDF, , "C:\Users\ACER\Desktop\BELGE.pdf", False
16/03/2023, 12:25

hnakis

Variable not defined hatası veriyor

acFormatPDF
16/03/2023, 12:39

alikagan

fazladan virgül koymuşum,  acFormatPDF, , "C:\User......
ayrıca ben bu kodları kullanıyorum, 
2003'de pdf oluşturmak biraz sıkıntılı, 2003 olan programı 2010 da çalıştırsan olmuyormu?
düzenlemeleri 2003 de yap, ama 2010 versiyonunu kullan.

birde aşağıdakini deneyebilirmisiz?

DoCmd.OutputTo acOutputReport, "Rapor11", acFormatPDF, "C:\Users\ACER\Desktop\BELGE.pdf", False
1 2