On Mon, 24 Feb 2014 12:49:39 +0100, Lupus Goebel <
post...@lupusdw.de> wrote:
>Tach auch
>
>hat sich schon mal wer mit dem Thema MP3 Tags auslesen beschäftigt?
>
>Ich würde gerne mit Access 2007 von MP3 deren Tags auslesen und auch in
>die Datei wieder schreiben können.
>
>Sachdienliche Hinweise, oder mit welche Keywords ich google mal füttern
>sollte, sind willkommen.
Hallo Lupus,
Ein gutes Tool ist die Audiogenie.dll (Version 3)
Leider hat der Autor die weitere Entwicklung aufgegeben und die DLL bei
sourceforge reingestellt.
http://sourceforge.net/projects/audiogenie/
Im Forum (englisch) ist nicht viel los:
http://sourceforge.net/p/audiogenie/discussion/1273340/
Da hast Du also kaum Hilfe zu erwarten.
Man braucht allerdings noch einen Wrapper.
http://sourceforge.net/projects/compress-music/files/AudioGenie%20Wrapper%20for%20Windows%208/
(Als Klassenmodul in Access einfügen)
Dies ist allerdings nicht der Wrapper, den ich benutze.
Dafür habe ich im Moment keinen Link.
Notfalls kann ich den Wrapper, den ich benutze, per eMail rüberschicken.
Ich finde auch keinen Link mehr zu der umfangreichen Hilfe.
Auch hier das Angebot, die Hilfe per eMail zu senden.
Früher war das alles mal auf seiner Homepage
http://www.audiogenie.net/
Die hat sich jetzt aber ein anderer unter den Nagel gerissen.
Hier ein kleiner Schnipsel um einen Tag (mit meinem Wrapper) einzulesen:
Dim AudioGenie As cls_AudioGenie3
Set AudioGenie = New cls_AudioGenie3
Set db = CurrentDb
Set rs = db.OpenRecordset("tbl_MP3_Files", dbOpenDynaset)
If AudioGenie.AUDIOAnalyzeFile(strFoldername & strFilename) > 0 Then
'Gibt's die Datei?
rs.AddNew
If AudioGenie.ID3V1Artist <> vbNullString Then
rs!ID3V1_Artist = AudioGenie.ID3V1Artist
Else
' Um unterschiedliche Inhalte bei einem Primärschlüssel zu erzeugen
rs!ID3V1_Artist = "Leer " & Rnd(1)
End If
End If
rs.Update
Wo wir schon dabei sind:
Ein hilfreiches Tool ist auch tidymp3.exe
http://cuemaster.org/tidymp3.html
Damit kann man von Access aus auch korrupte MP3s reparieren.
Entfernt alle Tags, so dass nur die Musik übrigbleibt.
Das ist etwas anderes, als die Inhalte von Tags zu löschen.
Die Tags solle man vorher mit Audiogenie extrahieren und zwischenspeichern um
sie dann zu überprüfen.
Insbesondere die ID3V1-Tags enthalten oftmals undruckbare Zeichen, die durch
andere Tagger dort reingemogelt wurden. Oder der Tag wurde mit Leerzeichen
aufgefüllt.
Da kann ich ein Lied von singen.
Anschließend kann man die gereinigten Tags wieder zurückschreiben und erhält
eine saubere MP3.
Schreiben sieht beispielsweise so aus:
AudioGenie.ID3V1Artist = Me!Artist
' wird automatisch bei 30 Zeichen abgeschnitten
AudioGenie.ID3V1SaveChangesToFile (strFoldername & strFilename)
Das ganze geht natürlich genauso gut mit ID3V2-Tags.
Hat man viele Files, kann das Lesen und Schreiben der Tags schon einige
Minuten dauern, insbesondere wenn man auch noch den Hash-Wert einlesen möchte.
rs!Hash = AudioGenie.AUDIOGetMD5Value
Eine bessere Möglichkeit, die man von Access aus anpieken könnte, ist mir
leider nicht bekannt.
Gruß
Jürgen