+- 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ığı: DOC u PDF Çevirme (/konu-doc-u-pdf-cevirme.html)
DOC u PDF Çevirme - Soul - 31/10/2008
Sayın Hocalarım bilirsiniz pdf creator diye free bir program vardır aşağıdaki kod ile dışarıdaki bir word belgesini yazdırmaya çalışıyorum fakat veri tabanı ilk açıldığında kod güzel çalışıyor ve doc u pdf e çeviriyor 2. veya 3. işlemlerde bahtınıza ne çıkarsa olayı oluyor bazen çalışıyor bazen çalışmıyor bunu neye yorabiliriz. Engin deneyimlerinizden yardımlarınızı bekliyorum. Direk olarak seçilen yazıcıya documanı açtırmadan göndermemiz mümkünmüdür.
Private Sub Komut84_Click()
Dim WordApp As Word.Application
Dim AYol As String
AYol = "C:\Evraklar\" & [TeklifNo] & ".doc"
Application.FollowHyperlink AYol, , True
On Error Resume Next
Set WordApp = GetObject(, "Word.Application")
On Error GoTo ErrHandler
WordApp.Documents.Open (AYol)
WordApp.Visible = True
WordApp.WindowState = wdWindowStateMaximize
ActivePrinter = "PDFCreator"
Word.Application.PrintOut FileName:=AYol
Set WordApp = Nothing
Exit Sub
ErrHandler:
Set WordApp = Nothing
End Sub
Cvp: DOC u PDF Çevirme - mehmetdemiral - 31/10/2008
Ben sizin kodlarınızı bir forma uyguladım. Referans olarak da Word Office12 kütüphanesini yükledim. Fakat sadece aktif yazıcı olarak PrimoPdf kullandım. Sorunsuz çalışıyor. Bence ücretsiz bir yazılım olan PrimoPdf kurun ve onun sanal yazıcısını kullanın.
Cvp: DOC u PDF Çevirme - bayFARUK - 31/10/2008
sanal yazıcı olarak PDF ye başka bir altenatif ; PDF24 sınırsız süresiz tavsiye edrim.
Cvp: DOC u PDF Çevirme - nihatkr - 02/11/2008
Örnek Dosya alternatif bir seçenek olabilir.