Skip to main content

AccessTr.neT


Birden Fazla Raporu Yazdırma

Bilal Demirci
Bilal Demirci
0
260

Birden Fazla Raporu Yazdırma

Çözüldü #1
merhaba sitemizde bulduğum tam istediğim gibi bir program var ekte
ancak 1 den fazla raporu nasıl pdf yapablirim onu çözemedim , 2 rapor var ama düğmeye basınca bir tanesini pdf oalrak yazdırabiliyorum.
yardımcı olursanız çok sevinirm ?

kod

Visual Basic Code
Private Sub Komut0_Click()
On Error Resume Next

Dim CurrentDirectory, ExportPath As String

CurrentDirectory = Left(CurrentDb.Name, InStrRev(CurrentDb.Name, "\"))
ExportPath = CurrentDirectory & "teklifler\" & Date & "\"

    If mdl_FolderExists(ExportPath) Then
        'Klasör zaten var!
    Else
        MkDir ExportPath
    End If


Dim blRet As Boolean
blRet = ConvertReportToPDF("Rapor1", vbNullString, ExportPath & "Rapor1.pdf", False, False, 150, "", "", 0, 0, 0)
blRet = ConvertReportToPDF("Rapor2", vbNullString, ExportPath & "Rapor1.pdf", False, False, 150, "", "", 0, 0, 0)

End Sub


tabiki 2 rapor isminide aynı kaydet dersen office sapıtacaktır.
bilerek silmiyorum yönetim isterse konuyu kaldırablir tabiki
basit bir hata arkadaşalrın gözünden kaçarsa onlarında aklında olsun diye silmedim konuyu

rapor 2 olarak kaydet dememişim formülde de görüneceği üzere


problem çözülmüştür.
.rar Denemecttm98.rar (Dosya Boyutu: 1,05 MB | İndirme Sayısı: 3)
Son Düzenleme: 28/03/2020, 12:37, Düzenleyen: Bilal Demirci.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da