• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Access ten pdf dosyası açmak

Katılım
5 Mart 2006
Mesajlar
15
Excel Vers. ve Dili
office excel 2003 TÜRKÇE
Access formu üzerindeki düğmeye tıkladığımda hücerede bulunan adlı pdf dosyasını açmak isteyorum.
yardımlarınız için teşekkür ederim.
 
Sayın contar,

Aşağıdıki kod işiniz görür sanırım.

Kod:
Sub pdfAç()
Dim sfilename As String
Dim strPath As String
strPath = CurrentProject.Path
strFileName = strPath & "\ak32.pdf"
Call Shell("C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe " & " " & strFileName)
End Sub

Ancak Shell parantezinin içine kendi pdf okuyucunuzun yolunu ve tam dosya adı yazmanız gerekir. Bende Acrobat 7.0 Reader var

İyi çalışmalar:hey:
 
Sub pdfAç()
Dim sfilename As String
Dim strPath As String
strPath = CurrentProject.Path
strFileName = strPath & "\ak32.pdf"
Call Shell("C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe " & " " & strFileName)
End Sub

C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe yazılmaadan yani dosyaya tıklayınca nasıl açılıyorsa o şekilde açılamazmı. Çünkü acrobat ın exe dosyası her bilgisayarda farklı yerde olabilmektedir.
 
Geri
Üst