cs_gilgamesh44
Messages postés12Date d'inscriptionlundi 22 novembre 2004StatutMembreDernière intervention31 mars 2009 10 févr. 2009 à 14:39
Salut,
Alors, juste un petit tuyau pour venir extraire les TAGs ID3V1.
Créer toi une structure de ce type dans un module:
Public myTagID3V1 as ID3V1
Private Type ID3V1
TagID As String * 3
Title As String * 30
Artiste As String * 30
Album As String * 30
Year As String * 4
Comment As String * 30
Genre As Byte
End Type
Ensuite, tu viens lire ton fichier comme tu le fais, a partir de la fin avec ta variable structurée. Elle va automatiquement se remplir comme il le faut.
Get FF, FileLen(fichier) - 127, myTagID3V1
Ensuite, si le fichier MP3 à un Tag ID3V1, tu fais un test sur :
if myTagID3V1.TagID = "TAG" then
...
end if
l0st3d
Messages postés205Date d'inscriptionjeudi 19 décembre 2002StatutMembreDernière intervention13 novembre 2009 20 sept. 2007 à 17:45
10 févr. 2009 à 14:39
Alors, juste un petit tuyau pour venir extraire les TAGs ID3V1.
Créer toi une structure de ce type dans un module:
Public myTagID3V1 as ID3V1
Private Type ID3V1
TagID As String * 3
Title As String * 30
Artiste As String * 30
Album As String * 30
Year As String * 4
Comment As String * 30
Genre As Byte
End Type
Ensuite, tu viens lire ton fichier comme tu le fais, a partir de la fin avec ta variable structurée. Elle va automatiquement se remplir comme il le faut.
Get FF, FileLen(fichier) - 127, myTagID3V1
Ensuite, si le fichier MP3 à un Tag ID3V1, tu fais un test sur :
if myTagID3V1.TagID = "TAG" then
...
end if
20 sept. 2007 à 17:45
le fichier n'est pas fermé apres lecture.