Private Sub Form_Load()
Dim dTaskID As Double, path As String, file As String
path = "C:\Program files\cambam\cambam.exe"
fileToLoad = Filename 
dTaskID = Shell(path + " " + fileToLoad, vbNormalFocus)

End
End Sub