Récuperer la longueur d'un .wav

Bonjour

j'aimerais récuperer la longueur d'un fichier wav, dans une variable. est-ce bien compliqué?

merci de votre aide

J'aimerais souhaiter à tous une bonne année et en profiter pour vous remercier pour le merveilleux travail de soutiens que vous nous apportez.

Salut,

merci, bonne année à toi aussi!
J'ai eu besoin il y a quelques temps de me servir d'une API Windows afin de
lire un fichier MP3 sans être obligé d'avoir recours a DirectX. Utilises simplement
la fonction MciSendString :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
Public Class FormInitial
 
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, _
    ByVal lpstrReturnString As String, ByVal uReturnLength As Integer, ByVal hwndCallback As Integer) As Integer
 
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
 Dim WavFileName = Chr(34) & "C:\monwav.wav") & Chr(34)
        mciSendString("open " & WavFileName & " alias monwav", Nothing, 0, 0)
 
        Dim RetString As New String(" "c, 50)
        mciSendString("Set monwav time format milliseconds", Nothing, 0, 0)
        mciSendString("Status monwav length", RetString, RetString.Length, 0)
        MsgBox(RetString.ToString)
 mciSendString("close monwav", Nothing, 0, 0)
 
End Sub
 
End Class

Pour lire le fichier il te suffit d'utiliser la commande :

Code:

1
2
 
mciSendString("play monwav", Nothing, 0, 0)

bien entendu avant d'avoir "fermé" la commande.

Voila voila, bon courage à toi! :ccool:

Cz

Merci beaucoup je patine avec ça