Second audio file gets truncated

[=?Utf-8?B?Qm9iQWNoZ2lsbA==?=]

I am using Windows Media Player to play my half second audio files one after
the other using the code below...

My problem comes when I play a second audio file immediately after the first
one stops sometimes on slower computers the audio on the second file gets
truncated on the beginning of playing the second file. What can I do to
minimize this truncation of audio? Right now I am having to add 1 second of
blank audio to the beginning of the second audio file but I would rather not
have the delay.

Here the code I am using ...

+++++++++++++++++++++++

' Play first voice file

AxWindowsMediaPlayer1.URL = voice1.mp3
' Play echo voice file once first one completes

If e.newState = Me.AxWindowsMediaPlayer1.playState.wmppsStopped then

BeginInvoke(New MethodInvoker(AddressOf playItAgain))

end if
Private Sub playItAgain()
AxWindowsMediaPlayer1.URL = voiceEcho.mp3
End Sub

+++++++++++++++++++++++

Thanks!

Bob

[=?Utf-8?B?U3VydHVyWg==?=]

Are you able to use

My.Computer.Audio.Play(filename1, AudioPlayMode.WaitToComplete)
My.Computer.Audio.Play(filename2, AudioPlayMode.WaitToComplete)

instead?

--
David Streeter
Synchrotech Software
Sydney Australia
"BobAchgill" wrote:

I am using Windows Media Player to play my half second audio files one after
the other using the code below...

My problem comes when I play a second audio file immediately after the first
one stops sometimes on slower computers the audio on the second file gets
truncated on the beginning of playing the second file. What can I do to
minimize this truncation of audio? Right now I am having to add 1 second of
blank audio to the beginning of the second audio file but I would rather not
have the delay.

Here the code I am using ...

+++++++++++++++++++++++

' Play first voice file

AxWindowsMediaPlayer1.URL = voice1.mp3
' Play echo voice file once first one completes

If e.newState = Me.AxWindowsMediaPlayer1.playState.wmppsStopped then

BeginInvoke(New MethodInvoker(AddressOf playItAgain))

end if
Private Sub playItAgain()
AxWindowsMediaPlayer1.URL = voiceEcho.mp3
End Sub

+++++++++++++++++++++++

Thanks!

Bob