anoniem Geplaatst: 1 november 2003 Delen Geplaatst: 1 november 2003 Ik il wav-files afspelen met mijn vb-proggie. Ik maak dus gebruik van het MultiMedia Control. Hij speelt de geluiden el af, maar ik hoor echter geen geluid. Weet iemand waar door dit komt? [code:1:b270166e3a] ' Set properties needed by MCI to open. MMControl1.Notify = False MMControl1.Wait = True MMControl1.Shareable = False MMControl1.DeviceType = "WaveAudio" MMControl1.FileName = App.Path & "/modules/" & lblMName.Caption & cmbMSound.Text ' Open the MCI WaveAudio device. MMControl1.Command = "Open"[/code:1:b270166e3a] Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 Ik heb ook met die mmcontrol zitten stoeien maar kreeg hem niet werkende. Toen kwam ik egens het volgende tegen. Geen control nodig en werkt als een trein. [code:1:bd9fb90fdc]mciExecute ("play " & "c:\dir\geluidsfile.wav") [/code:1:bd9fb90fdc] Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 [quote:0908904ef2="bosjvd"]Ik heb ook met die mmcontrol zitten stoeien maar kreeg hem niet werkende. Toen kwam ik egens het volgende tegen. Geen control nodig en werkt als een trein. [code:1:0908904ef2]mciExecute ("play " & "c:\dir\geluidsfile.wav") [/code:1:0908904ef2][/quote:0908904ef2] werkt alleen niet... '[b:0908904ef2]Sub or Function not defined[/b:0908904ef2]'. Is er nog een reference die ik moet toevoegen? Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 [color=green:e166e54ba3][i:e166e54ba3]Is er nog een reference die ik moet toevoegen?[/i:e166e54ba3][/color:e166e54ba3] Yep: Public Declare Function mciExecute& Lib "winmm.dll" (ByVal lpstrCommand As String) Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 [quote:77c72a4d8e="Kamikaasje"][color=green:77c72a4d8e][i:77c72a4d8e]Is er nog een reference die ik moet toevoegen?[/i:77c72a4d8e][/color:77c72a4d8e] Yep: Public Declare Function mciExecute& Lib "winmm.dll" (ByVal lpstrCommand As String)[/quote:77c72a4d8e] Kan ik ook variabelen gebruiken in die opdracht? Bijvoorbeeld: [code:1:77c72a4d8e]mciExecute (play & strGeluidPad)[/code:1:77c72a4d8e] Ik krijg nl. de melding dat het stuurprogramma de opdracht niet herkent. Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 Sorry die had ik ff over het hoofd gezien. ik heb een iets andere. Zal wel niet uitmaken. [code:1:abc2888247]Public Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long [/code:1:abc2888247] Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 Je kan variablen gebruiken. Ik denk dat je de foutmelding krijgt omdat je play zonder "" gebruikt hebt. Moet dus zijn "play ". Let op de spatie. Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 [quote:56a2b2fcec="bosjvd"]Sorry die had ik ff over het hoofd gezien. ik heb een iets andere. Zal wel niet uitmaken. [code:1:56a2b2fcec]Public Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long [/code:1:56a2b2fcec][/quote:56a2b2fcec] Doet het nog niet. Ik krijg de melding dat het opgegeven MCI apparaat niet geopend is of niet wordt herkend. :-? <XML:EDIT>Klopt, zag het net opeens :P </XML:EDIT> Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 Heb je de declare wel in een module staan en niet in de form code. Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 [quote:2afc94af2c="bosjvd"]Heb je de declare wel in een module staan en niet in de form code.[/quote:2afc94af2c] jazeker 8) Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 Wat gek. Ik heb ff een nieuw projectje gemaakt en het werkt perfect. Module code: [code:1:f48af1425c]Public Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long [/code:1:f48af1425c]En form code met 1 button:[code:1:f48af1425c]Private Sub Command1_Click() mciExecute ("play " & "c:\ChatBeep.wav") End Sub [/code:1:f48af1425c]Druk op de knop en krijg geluid. Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 [quote:0cff58efd9="bosjvd"]Wat gek. Ik heb ff een nieuw projectje gemaakt en het werkt perfect. Module code: [code:1:0cff58efd9]Public Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long [/code:1:0cff58efd9]En form code met 1 button:[code:1:0cff58efd9]Private Sub Command1_Click() mciExecute ("play " & "c:\ChatBeep.wav") End Sub [/code:1:0cff58efd9]Druk op de knop en krijg geluid.[/quote:0cff58efd9] :-? :-? :-? Wat raar, nu werkt hij bij mij opeens wel... :oops: :-? Nou ja, in elk geval erg bedankt. Maar weet je of je hiermee ook avi-bestanden mee kunt afspelen? Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 Nee, dat weet ik niet. Kwestie van proberen denk ik. Quote Link naar reactie
anoniem Geplaatst: 1 november 2003 Auteur Delen Geplaatst: 1 november 2003 AVI kan ook. Elk [url=http://msdn.microsoft.com/library/default.asp?url=/library/en-us/multimed/htm/_win32_device_types.asp]mci compatible device[/url] kun je afspelen met mciExecute. Quote Link naar reactie
anoniem Geplaatst: 2 november 2003 Auteur Delen Geplaatst: 2 november 2003 Even nog een antwoord op je allereerste vraag; Als je het programma voor de eerste keer opstart hoor je dan wel geluid? Als hij namelijk 1x afgespeeld is moet hij eerst terug gezet worden naar het begin. Bijvoorbeeld zo: [code:1:fbef0efa93]Private Sub MMControl1_Done(NotifyCode As Integer) MMControl1.Command = "Prev" End Sub[/code:1:fbef0efa93] Eventueel kan je natuurlijk ook altijd het windows media player control toevoegen aan je vb. Maar bij mij werkt het MMControl dus gewoon. Groeten, Wouter Quote Link naar reactie
Aanbevolen berichten
Om een reactie te plaatsen, moet je eerst inloggen