Hi,

I have succesfully used ShellExecute to start a program in Windows XP:

Private Declare Function ShellExecute Lib "shell32.dll" _
Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
and a following VBA code:

Sub test()

Dim Filename As String
Dim Result As Long
Filename = "O:\Scheduler.cmd"

Result = ShellExecute(0, vbNullString, Filename, vbNullString, vbNullString, vbNormalFocus)

If Result < 32 Then
    MsgBox "Error"
End If

End Sub

Unfortunately sub doesn't work anymore in 64 bit Windows 7. How should I modify the function declaration/code to get it working..??

Thanks for any help.

Br,
Jack