Launch Applications from Access

[Moss100]

Hello All,

I would like to launch various applications from a form in my database.

My idea is to have a table containing program names and their file paths / shortcuts.

Is there some VBA code that will launch a program from Access?

I have tried the code below:

Application.FollowHyperlink "C:\Apps\Front_End\DIARY.accdb"

This works, but gives a security warning message each time.

Is there a better solution?

Many thanks Mark

 

[Moss100]

OK - so I have now tried this and it works! Are there any other tips or suggestions I should be aware of?

Many thanks Mark

shell "msACCESS.EXE C:\Apps\Front_End\DIARY.accdb", vbNormalFocus

 

[Moss100]

One problem I have is it will open multiple copies of the access program. Do I need to check to see if it is already open - if so how?

Thanks Mark

 

[Andrzejek]

If you want to "launch various applications" - this is what I use:

Public Sub OpenDocument(strDocPath As String)
Dim G As Long
G = Shell("RUNDLL32.EXE URL.DLL,FileProtocolHandler " & strDocPath, vbNormalFocus)
End Sub

Just pass a valid path to the file and you can open it with the application that the file is associated with. It is like double-clicking on the file in Windows Explorer


---- Andy

There is a great need for a sarcasm font.

 

[Moss100]

Thanks, that works well.

I notice that if I am opening an Access database, if the database is not currently open, then it will open it and set focus to it (so the new database is the active window).

If however the database has already been opened, then the focus does not change to the database you are trying to open (as it would from a normal desktop shortcut). Is there a way to get the focus to always go to the program that the user is trying to open?

Many thanks Mark