ID3Tag aus mp3s herauslesen
 

Hy Leute!

Ich arbeite gerade an einer Software zur MP3-Verwaltung und würde daher gerne wissen wie ich den ID3Tag auslesen kann! Besser gesagt wie der Header der mp3 Datei aufgebaut ist!

Würd mich auch interessieren!

Hab mir nämlich auch schon mal sowas überlegt zu schreiben. Aber der Gedanke ist dann wieder irgendwie untergegangen, in dem ganzen Haufen was ich so alles machen will/sollte ;).

hab da vor einiger zeit in einer zeitschrift (glaub es war di c't) was gelesen

wenn ichs find poste ichs.

wahrscheinlich ist aber wer anderes schneller :D

http://65.194.192.170/~mantikor/index.html
da gibt's eine fertige Bibliothek

best regards,

LZ

tja LZ war schneller

(ich habs noch immer nicht gefunden) :heul:

Nachdem der hewlett keine Programmierspraceh angegeben hat, auch noch ein Perl-Link: http://search.cpan.org/search?dist=tagged
:D

ich schreibe das programm in vc++.

Das läuft ca so ab:
Du gehst ans ende der Datei, zählst xxx zurück dort muß dann TAG stehen und anschließend liest du Interpret und Titel etc. aus. In Access würde das wie folgt aussehen:

If dateilänge > 128 Then ' nur längere Dateien analysieren
For i = dateilänge - 127 To dateilänge - 125
Get #Dateinummer, i, gelesen
Check = Check & gelesen
Next i

End If

If Check = "TAG" Then ' ohne TAG geht gar nichts.

For i = dateilänge - 124 To dateilänge - 95
Get #Dateinummer, i, gelesen
Titel = Titel & gelesen

Next i
For i = dateilänge - 94 To dateilänge - 65
Get #Dateinummer, i, gelesen
Interpret = Interpret & gelesen

Next i
For i = dateilänge - 64 To dateilänge - 35
Get #Dateinummer, i, gelesen
Album = Album & gelesen

Next i
For i = dateilänge - 34 To dateilänge - 31
Get #Dateinummer, i, gelesen
' Jahr = Jahr & Str$(gelesen) ' Typen unverträglich
' Jahr = gelesen ' vermutlich nur die letzte Zahl wird übernommen
Jahr = Jahr & gelesen 'keine Übernahme



Next i
Get #Dateinummer, 31, gelesen
Genre = gelesen
For i = dateilänge - 30 To dateilänge - 1
Get #Dateinummer, i, gelesen
Kommentar = Kommentar & gelesen

Next i
Debug.Print "TAG OK bei "; Dateiname

@no IASCA

Was is bei dir das Dateilänge? Bzw. wie kommst du darauf?

In Dateilänge steht die Länge des files, in der Art
Daiteilänge = Len(File)

Und der If am anfang ist dazu da, dass die Routine nur bei Dateien durchgelaufen wird, die auch lang genug für den ID-Tag sind.