Rapor İsimlerini Değiştirmek İstiyorum

1 2 3
03/11/2019, 08:41

alimadam


'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???
03/11/2019, 08:52

berduş

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"
Gibi
03/11/2019, 10:57

alimadam

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.
03/11/2019, 16:55

alimadam

Var mı yardımcı olabilecek birisi?
03/11/2019, 17:00

berduş

Yazdığınız kodun son halini yollar misiniz?
03/11/2019, 17:06

alimadam

Ö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.
1 2 3