Sounds

[lord_dude]

A lot of sites say to use the mci control to play sound files, but i couldt find this (im using vb6 prof) so i am trying to use the api but my code doest appear to be working. This is my code:


Public Declare Function mciSendString Lib "winmm.dll" Alias _
"mciSendStringA" (ByVal lpszCommand As String, ByVal _
lpszReturnString As String, ByVal cchReturnLength As Long, _
ByVal hwndCallback As Long) As Long

Sub Play_File(Path As String, Name As String)
Call mciSendString("Open " & Path & " alius " & Name, "", 0, 0)
Call mciSendString("Play " & Name, "", 0, 0)
End Sub

Sub Stop_File(Name As String)
Call mciSendString("Close " & Name, "", 0, 0)
End Sub


Anyone have any ideas as to the problem/if the mcicontrol goes by a different name in the components list?

Thanks

[Vlatko]

This is API, no MCI control. Here is a syntax error in your code!

Call mciSendString("Open " & Path & " alius " & Name, "", 0, 0) 
'make it
Call mciSendString("Open " & Path & " alias " & Name, "", 0, 0)

[lord_dude]

Still doest work. Am i using the wrong type of file? I have tried it with a wav and a midi.

[Vlatko]

Try this

mciSendString("OPEN " + Path + " TYPE SEQUENCER ALIAS " + Name, 0&, 0, 0)

[lord_dude]

Still doest work!!!! Nor does this code http://www.allapi.net/api/api221.php !!!


I am begining to suspect there is something wrong with my pc. i know the files i am trying to play are fine coz i can play them in winamp.

[lord_dude]

ive found the problem. Despite the fact that i am running win98, it needs to have the path passed a dos one, so c:\program files\file1.mid would need to be c:\progra~1\file.mid. I looked this api call up on several sites but all neglected to mention this major issue!

[Sastraxi]

Because usually you would have it stored locally, eg.

App.Path & "\mymid.mid"

But if this isn't the case then yes, that is a huge problem.

[lord_dude]

Originally posted by Sastraxi
Because usually you would have it stored locally, eg.

App.Path & "\mymid.mid"

But if this isn't the case then yes, that is a huge problem.

you say this but surely most of the time app.path would return something begining with c:\program files\