Hallo,
hier die Code zum Erkennen einer WAV-Datei:
viel Spaß!
hier die Code zum Erkennen einer WAV-Datei:
VB.NET-Quellcode
- Imports System.IO
- Function IsWAVFile(ByVal FilePath As String) As Boolean
- Dim fs As FileStream = New FileStream(FilePath, FileMode.Open)
- Dim br As BinaryReader = New BinaryReader(fs)
- Dim riff As Char() = br.ReadChars(4)
- Dim len As UInt32 = br.ReadUInt32 'Länge (aber hier nicht sinnvoll)
- Dim type As Char() = br.ReadChars(4) 'Typ auslesen
- br.Close()
- fs.Close()
- If type = "WAVE" And riff = "RIFF" Then
- Return True
- End If
- End Function
viel Spaß!
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „mikeb69“ ()