[Vb 2008] Come registrare da microfono

[ilgrandere]

ciao a tutti,
sono un po in crisi..non riesco a trovare niente che mi permetta di registrare dal microfono in vb2008.
in pratica ho bisogno di creare un tasto che mi registri tutto cio che proviene dal microfono..ma non riesco a trovare nessuna funzione che lo faccia..
qlk1 mi puo essere di aiuto?

grazie mille in anticipo

[LeleFT]

Come espressamente indicato nel Regolamento interno, le discussioni devono avere un titolo significativo.

Lo aggiusto io.

Ciao.

[Jeremy75]

Prova a vedere se ti è utile
http://www.vincedx.altervista.org/Le...?id=142&from=0

[ilgrandere]

non c'e niente non usando direct?
o qlksa che registri direttamente in mp3..
mi sembra in vb6 che con il comando MMControl facevi in due secondi..qua na sfilza per registrare..

[ilgrandere]

mi sembra che qualcuno lo facesse con qualche dll e possibile?

[Janx]

ci si può interfacciare all'API winmm.dll.

[ilgrandere]

e come si fa?

[Janx]

Sai interfacciarti ad una qualsiasi API?
In caso di risposta affermativa devi utilizzare la funzione mciSendString dell'api winmm.dll

Per registrare:

mciSendString("open new Type waveaudio Alias registrazione", "", 0, 0) 

mciSendString("record registrazione", "", 0, 0

Per salvare:

mciSendString("save registrazione c:\registrazione.wav", "", 0, 0)

mciSendString("close registrazione", "", 0, 0)

Per ascoltare:

My.Computer.Audio.Play("C:\registrazione.wav")

[ilgrandere]

piu o meno..nella mia programmazione non ne ho mai utilizzate..o se c'erano era gia sistemate..sto cercando su internet qualcosa..

[Janx]

Importa il namespace System.Runtime.InteropServices

e aggiungi il riferimento alla funzione mciSendString di winmm

    <DllImport("winmm.dll", SetLastError:=False, ExactSpelling:=True)> _
    Public Shared Function mciSendString(ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Integer, ByVal hwndCallback As Integer)
    End Function