Using 'FollowHyperlink

[scottian]

I have a form in a database, on the form is a list box. I click a button and the list box fills with all the file names in a folder. The next step is to select a file from the list and open it. im using the 'FollowHyperlink' method for this. This works:-

Application.FollowHyperlink "C:\Pictures\" & "Slide5.JPG"))

But im trying to tag the selection from the list box in place of "Slide5.JPG". Now this is the funny bit it will work with all other file types except for jpg. Does anyone know why.





------------------------------------------------------------------------------
Ambition..........If you dont use it, you wont lose it

 

[PHV]

it will work with all other file types except for jpg
Which code exhibits this behaviour ?

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[mscallisto]

I believe you may have a syntax problem with parenthesis

Application.FollowHyperlink "C:\Pictures\" & "Slide5.JPG"))

sam

 

[mscallisto]

or is there code I'm not seeing?

 

[scottian]

I apologise. I was just trying to keep my post tidy, but i made a mess of it. Here is the code :-

Dim varList
Dim varItem

varList = Me.ListFiles.ListIndex

varItem = Me.ListFiles.ItemData(varList)

Application.FollowHyperlink (Dir$(z() & "\Pictures\" & varItem))

That will work if im trying to open a word or excel file its only i try a .jpg file that i get this error :-

Run time error '432':
File name or class name not found during Automation operation







------------------------------------------------------------------------------
Ambition..........If you dont use it, you wont lose it

 

[PHV]

What happens if you doubleclick a .jpg file in explorer ?

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[scottian]

When i try to navigate to a jpg file in explorer and choose to open it i get the error :-

access to the resource 'yada yada yada' has been disallowed





------------------------------------------------------------------------------
Ambition..........If you dont use it, you wont lose it