Instead of Call Shell or suggestion

[Guest]

I am trying to open PDF files. Well my app works fine if Acrobat is always in the same location. So I need to be able to call the PDF but the Shell command only works for exceutables. Are suggestions? Here is my code for my current (it works fine as long as Acrobat is in the same location

Dim stAppName, stImage, stPrgPath, stExtn, stDirectory, stAvail As Strin
stAppName = "c:\cts\IMAGES\
stImage = (Me!MemberNumber
stExtn = ".pdf
stPrgPath = "c:\Progra~1\Adobe\Acroba~1.0\Acrobat\Acrobat.exe
If Me!Image The
If stImage < 210001 The
stDirectory = "200000
Call Shell(stPrgPath & stAppName & stDirectory & "\" & stImage & stExtn, 1
GoTo Exit_ViewIamge_Clic
End I
End I

 

[Dirk Goldgar]

I am trying to open PDF files. Well my app works fine if Acrobat is
always in the same location. So I need to be able to call the PDF
but the Shell command only works for exceutables. Are suggestions?
Here is my code for my current (it works fine as long as Acrobat is
in the same location)

Dim stAppName, stImage, stPrgPath, stExtn, stDirectory, stAvail As
String
stAppName = "c:\cts\IMAGES\"
stImage = (Me!MemberNumber)
stExtn = ".pdf"
stPrgPath = "c:\Progra~1\Adobe\Acroba~1.0\Acrobat\Acrobat.exe "
If Me!Image Then
If stImage < 210001 Then
stDirectory = "200000"
Call Shell(stPrgPath & stAppName & stDirectory & "\" & stImage &
stExtn, 1)
GoTo Exit_ViewIamge_Click
End If
End If

Normally Acrobat or Acrobat reader would be the registered program to
open the PDF file type. If so, you should be able to use
Application.FollowHyperlink to open the PDF file, without knowing where
the application is installed:

Application.FollowHyperlink _
stAppName & stDirectory & "\" & stImage & stExtn

 

[Van T. Dinh]

Application.FollowHyperlink "E:\Docs\ADSL Filter Installation Guide.pdf"

works fine on my PC.

--
Van T. Dinh
MVP (Access)

I am trying to open PDF files. Well my app works fine if Acrobat is always

in the same location. So I need to be able to call the PDF but the Shell
command only works for exceutables. Are suggestions? Here is my code for my
current (it works fine as long as Acrobat is in the same location)