Access Open Programs Seminar

Code Vault: Shell Execute

Place a hidden button over the image.

I don't want to sound snarky here, but I have to ask.. Why?  Will people be editing the images or just looking for a better or bigger view of the image?

Thanks everyone, the seminar will definitely do the trick.
Hi Bill, yeah I'd like to open the image and then be able to zoom in etc. I'd also like an option where I can edit certain items on either the photo or a drawing.

I usually invoke VBScript to do this kind of thing.  E.g.:

Sub OpenPic()
    Dim ws As Variant
    Set ws = CreateObject("WScript.Shell")
    ws.Run "file:///D:\My%20Pictures\My%20Pic.jpg"
End Sub

This will open the file "D:\My Pictures\My Pic.jpg" in whatever default program the user has set for opening this particular file type.  This works for video files, music files, or any file that has a default application.  The only caveat is that all spaces in the file path must be replaced with the hexadecimal ASCII value for space (%20), just like in Internet URLs.  But this can be easily done with the Replace() function on the string.

Hi Chris
I do this in my Access application and as Kevin said Shell Execute

John

Glad the seminar will work for you.  I was going to suggest if it was only for a close view making a form or report with the photo alone enlarged full screen.