You can use VBScipting to invoking the Windows Media Player.
Here is sample code:
Dim oWMP, AudioPath, lDuration
AudioPath = ''C:temptest.mp3''
Set oWMP = CreateObject(''WMPlayer.OCX.7'')
oWMP.settings.autoStart = false
oWMP.settings.volume = 20 ' 0 - 100
oWMP.settings.balance = 0 ' -100 to 100
oWMP.settings.enableErrorDialogs = True
oWMP.enableContextMenu = true
oWMP.mediaCollection.add(AudioPath)
oWMP.URL=AudioPath
' Following to display player and have it on independ thread
'oWMP.openPlayer(AudioPath)
owmp.enabled=true
'Following is used to play audio comment it out if you do not want audio played
oWMP.controls.play
lDuration =oWmp.currentMedia.duration
msgbox lDuration
If lDuration <> 0 Then
msgbox ''Duration > 0''
Else
msgbox ''Duration Equals 0''
End If
oWMP.controls.stop
'following will close player if not using OpenPlayer method.
oWMP.close
SET oWMP=nothing