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???