Private Sub Command1_Click()
Dim path As String
Dim runExe As Double
path = "C:\Program files\Windows Media Player\wmplayer.exe"
runExe = Shell(path & " c:\mymusic\file.mp3", vbMaximizedFocus)
End Sub
Looking for relevant Development Whitepapers? Visit the SearchWinDevelopment.com Research Library.