+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Rapor İsimlerini Değiştirmek İstiyorum (/konu-rapor-isimlerini-degistirmek-istiyorum.html)
Cvp: Rapor İsimlerini Değiştirmek İstiyorum - alimadam - 03/11/2019
'Burada raporların toplu pdf kodu mevcut
DoCmd.OpenReport "rpr_sporcular", acViewPreview, , "[Kimlik]=" & Me.Metin45, acHidden
DoCmd.OutputTo acOutputReport, "rpr_sporcular", acFormatPDF ', dosyaYoluveAdını yazarsanız doğrudan seçtiğiniz yere yazabilir
DoCmd.Close acReport, "rpr_sporcular", acSaveNo
DoCmd.OpenReport "rpr_Atama", acViewPreview, , "[Kimlik]=" & Me.Metin45, acHidden
DoCmd.OutputTo acOutputReport, "rpr_Atama", acFormatPDF ', dosyaYoluveAdını yazarsanız doğrudan seçtiğiniz yere yazabilir
DoCmd.Close acReport, "rpr_Atama", acSaveNo
DoCmd.OpenReport "rpr_mar", acViewPreview, , "[Kimlik]=" & Me.Metin45, acHidden
DoCmd.OutputTo acOutputReport, "rpr_mar", acFormatPDF ', dosyaYoluveAdını yazarsanız doğrudan seçtiğiniz yere yazabilir
DoCmd.Close acReport, "rpr_mar", acSaveNo
DoCmd.OpenReport "rpr_mKART", acViewPreview, , "[Kimlik]=" & Me.Metin45, acHidden
DoCmd.OutputTo acOutputReport, "rpr_mKART", acFormatPDF ', dosyaYoluveAdını yazarsanız doğrudan seçtiğiniz yere yazabilir
DoCmd.Close acReport, "rpr_mKART", acSaveNo
DoCmd.OpenReport "rpr_perfor", acViewPreview, , "[Kimlik]=" & Me.Metin45, acHidden
DoCmd.OutputTo acOutputReport, "rpr_perfor", acFormatPDF ', dosyaYoluveAdını yazarsanız doğrudan seçtiğiniz yere yazabilir
DoCmd.Close acReport, "rpr_perform", acSaveNo
DoCmd.OpenReport "rpr_kma", acViewPreview, , "[Kimlik]=" & Me.Metin45, acHidden
DoCmd.OutputTo acOutputReport, "rpr_kma", acFormatPDF ', dosyaYoluveAdını yazarsanız doğrudan seçtiğiniz yere yazabilir
DoCmd.Close acReport, "rpr_kma", acSaveNo
DoCmd.OpenReport "rpr_dallar", acViewPreview, , "[Kimlik]=" & Me.Metin45, acHidden
DoCmd.OutputTo acOutputReport, "rpr_dallar", acFormatPDF ', dosyaYoluveAdını yazarsanız doğrudan seçtiğiniz yere yazabilir
DoCmd.Close acReport, "rpr_dallar", acSaveNo
'Burada raporların toplu pdf kodu biter
bu kodu kullanarak raporları toplu halde pdf olarak dışa aktarım yapıyoruz,lakin PDF isimleri rapor adları ile aynı oluyor,oysa biz isim versek???
Cvp: Rapor İsimlerini Değiştirmek İstiyorum - berduş - 03/11/2019
acFormatPDF kodundan sonra virgül ekleyip konum+ad şeklinde yazılabilir
DoCmd.OpenReport "rpr_sporcular", acViewPreview, , "[Kimlik]=" & Me.Metin45, acHidden
DoCmd.OutputTo acOutputReport, "rpr_sporcular", acFormatPDF, "d:\raporlar\"
& "rpr_sporcular" & Me.Metin45 & ".pdf"Cvp: Rapor İsimlerini Değiştirmek İstiyorum - alimadam - 03/11/2019
Bahsettiğiniz şekliyle yaptım ancak değişen birşey olmuyor,
rpr_sporcular raporunu rpr_sporcular.pdf şeklinde dışa aktarıyor yani kayıt yapıyor.Biz Sporcular.pdf olmasını istiyoruz.
Cvp: Rapor İsimlerini Değiştirmek İstiyorum - alimadam - 03/11/2019
Var mı yardımcı olabilecek birisi?
Cvp: Rapor İsimlerini Değiştirmek İstiyorum - berduş - 03/11/2019
Yazdığınız kodun son halini yollar misiniz?
Cvp: Rapor İsimlerini Değiştirmek İstiyorum - alimadam - 03/11/2019
Örneğin rpr_aylar raporunu dışarıya pdf olarak kaydetme butonunun tıklandığında olay yordamına aşağıdaki şu kodu yazıyorum
DoCmd.OpenReport "rpr_aylar", acViewPreview, , "[Kimlik]=" & Me.Metin45, acHidden DoCmd.OutputTo acOutputReport, "rpr_aylar", acFormatPDF, "C:\RaporlarPDF\" & "rpr_aylar" & Me.Metin45 & ".pdf"ama sonuç itibariyke pdf ismi yine rpr_aylar oluyor.Biz bunun Aylar.Pdf olmasını istiyoruz.