Du bist nicht angemeldet.

tcs-1986

Registrierter Benutzer

  • »tcs-1986« ist männlich
  • »tcs-1986« ist der Autor dieses Themas

Beiträge: 71

Dabei seit: 6. Dezember 2008

Wohnort: Freiburg

  • Private Nachricht senden

1

Freitag, 19. Juni 2009, 23:03

Prüfe die Datei, ob sie WAV-Datei ist

Hallo,

hier die Code zum Erkennen einer WAV-Datei:

Visual Basic Quellcode

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
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ß!
Mfg tcs-1986

Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »mikeb69« (20. Juni 2009, 13:07)


Epic

Floating Turtle

Beiträge: 219

Dabei seit: 31. Mai 2010

Frühere Benutzernamen: knurbl

Hilfreich-Bewertungen: 35

  • Private Nachricht senden

2

Sonntag, 1. Mai 2011, 09:39

Ich haette einfach If FileName.EndsWith(".wav") gemacht, aber deins ist ja viel genauer, weil du ja direkt die Dateiliest und ueberpruefst ;).

Social Bookmarks