Click here to Skip to main content
11,479,486 members (53,276 online)
Click here to Skip to main content

Read MP3 header information and read/write the ID3v1 tag

, 1 Mar 2005 204.4K 3.1K 82
Rate this:
Please Sign up or sign in to vote.
A small solution for reading MPEG audio headers and the ID3v1 tag

Introduction

There are many other articles at The Code Project describing the audio header and tag information, but none in VB.NET. So it's time to update my very old article (Reading and writing MP3 ID3v1 tags ) with nicer code and extend it to read the MPEG header information.

I don't want to go into detail about the structure of MPEG audio headers, because Konrad Windszus already has a very good article (MPEG Audio Frame Header) about that. If you're interested in the structure of the audio header or the ID3 tag format i recommend to visit the following sites:

Using the code

I wrote two classes to handle the header and tag information, called MP3Info and ID3v1Tag. The following code will show the structure to use the classes:

Dim objMP3Info As New _
 Monotic.Multimedia.MP3.MP3Info
With ListView1
    ''' Set the filename property
    objMP3Info.Filename = "c:\test.mp3"

    ''' Add the header information to a listview
    .Add("Filesize").SubItems.Add(objMP3Info.Filesize & " Byte")
    .Add("SamplingRateFrequency").SubItems.Add _
     (objMP3Info.SamplingRateFrequency & " Hz")
    .Add("Padding").SubItems.Add(objMP3Info.Padding & " Bytes")
    .Add("Private").SubItems.Add(objMP3Info.PrivateBit)
    .Add("Copyright").SubItems.Add(objMP3Info.Copyright)
    .Add("OriginalBit").SubItems.Add(objMP3Info.OriginalBit)
    .Add("Bitrate").SubItems.Add(objMP3Info.Bitrate & " bps")
    .Add("FrameSamples").SubItems.Add(objMP3Info.FrameSamples)
    .Add("FrameSize").SubItems.Add(objMP3Info.FrameSize & " Byte")
    .Add("Length").SubItems.Add(objMP3Info.Length & " s (" 
     & Int(objMP3Info.Length / 60) & ":" & _
      objMP3Info.Length Mod 60 & " m)")
    .Add("HeaderPosition").SubItems.Add(objMP3Info.HeaderPosition)
    .Add("VBRScale").SubItems.Add(objMP3Info.VBRScale)

    Select Case objMP3Info.MPEGVersion
        Case MP3.MPEGVersionEnum.MPEG1
            .Add("MPEGType").SubItems.Add("MPEG 1")
        Case MP3.MPEGVersionEnum.MPEG2
            .Add("MPEGType").SubItems.Add("MPEG 2")
        Case MP3.MPEGVersionEnum.MPEG25
            .Add("MPEGType").SubItems.Add("MPEG 2.5")
    End Select

    Select Case objMP3Info.Layer
        Case MP3.LayerEnum.LayerI
            .Add("Layer").SubItems.Add("Layer I")
        Case MP3.LayerEnum.LayerII
            .Add("Layer").SubItems.Add("Layer II")
        Case MP3.LayerEnum.LayerIII
            .Add("Layer").SubItems.Add("Layer III")
    End Select

    Select Case objMP3Info.Protection
        Case MP3.ProtectionEnum.None
            .Add("Protection").SubItems.Add("None")
        Case MP3.ProtectionEnum.CRC
            .Add("Protection").SubItems.Add("By CRC")
    End Select

    Select Case objMP3Info.ChannelMode
        Case MP3.ChannelModeEnum.DualChannel
            .Add("ChannelMode").SubItems.Add("Dual Channel")
        Case MP3.ChannelModeEnum.JointStereo
            .Add("ChannelMode").SubItems.Add("Joint Stereo")
        Case MP3.ChannelModeEnum.SingleChannel
            .Add("ChannelMode").SubItems.Add("Single Channel")
        Case MP3.ChannelModeEnum.Stereo
            .Add("ChannelMode").SubItems.Add("Stereo")
    End Select

    Select Case objMP3Info.Emphasis
        Case MP3.EmphasisEnum.CCIT
            .Add("Emphasis").SubItems.Add("CCIT")
        Case MP3.EmphasisEnum.MS5015
            .Add("Emphasis").SubItems.Add("50/15 ms")
        Case MP3.EmphasisEnum.None
            .Add("Emphasis").SubItems.Add("None")
    End Select

    Select Case objMP3Info.Encoding
        Case MP3.EncodingEnum.CBR
            .Add("Encoding").SubItems.Add("CBR")
        Case MP3.EncodingEnum.VBR
            .Add("Encoding").SubItems.Add("VBR")
    End Select

    ''' Add the ID3v1 tag information to a listview
    If (objMP3Info.ID3v1Tag.TagAvailable) Then
        .Add("ID3 Title").SubItems.Add _
         (objMP3Info.ID3v1Tag.Title)
        [...]
    End If

    ''' Update the tag
    objMP3Info.ID3v1Tag.Title = "Another title"
    objMP3Info.ID3v1Tag.Update()

End With

Please have a look at the sample and the class code to see all the features.

Points of Interest

Unlike other articles, this class will handle CBR and VBR encoded files, so the playtime is calculated correctly.

The class is well-commented with XML comments made by AxTools CodeSmart 2005 and NDoc . I included the generated HTML help file in the download.

I'm working on reading and writing the much more complex ID3v2.x tags at the moment (80% done, just compressed frames are a little bit tricky). If you are interested in this, i will update this article in the future.

History

27.02.2004 Release of version 1

License

This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.

A list of licenses authors might use can be found here

Share

About the Author

Thommy Mewes
Software Developer (Senior) CIBER AG
Germany Germany
Feel free to contact me via Email or MSN Messenger (thommy@live.com).
Follow on   Twitter

Comments and Discussions

 
QuestionAlbum art Pin
raghubirdevnet16-Oct-12 1:02
memberraghubirdevnet16-Oct-12 1:02 
GeneralCRC Protection? Pin
Member 357297015-May-11 15:19
memberMember 357297015-May-11 15:19 
GeneralIDv2 Pin
Sousuke_31-Aug-10 11:35
memberSousuke_31-Aug-10 11:35 
QuestionWie kann ich Änderungen speichern? MP3 Pin
michaelroswitha13-Jan-10 9:25
membermichaelroswitha13-Jan-10 9:25 
QuestionHow to read the actual genre string when it is "other" Pin
a1penguin18-Jun-09 18:05
membera1penguin18-Jun-09 18:05 
GeneralVBR File Pin
nitesh gaba19-Mar-09 22:30
membernitesh gaba19-Mar-09 22:30 
QuestionWhat i write to the tag doesn't show up when viewing the property details in the file system. Pin
MattRoy1018-Mar-09 15:11
memberMattRoy1018-Mar-09 15:11 
AnswerRe: What i write to the tag doesn't show up when viewing the property details in the file system. Pin
mazin221-Dec-10 14:11
membermazin221-Dec-10 14:11 
Generalhip hop songs and dance Pin
Jigga Hov12-Dec-08 6:58
memberJigga Hov12-Dec-08 6:58 
GeneralGNU OpenSource Tag Library for .NET Pin
someonestupid196910-Dec-08 5:55
membersomeonestupid196910-Dec-08 5:55 
GeneralSet mp3-Tag with objMP3Info Pin
squirrel9128-Jul-07 0:45
membersquirrel9128-Jul-07 0:45 
QuestionIs it? Pin
Rola /anglian/12-Jun-07 1:03
memberRola /anglian/12-Jun-07 1:03 
GeneralRemote MP3 Pin
ohadioe230-Apr-07 6:33
memberohadioe230-Apr-07 6:33 
GeneralOverFlow searching Genres Pin
ricsamma15-Nov-06 18:25
memberricsamma15-Nov-06 18:25 
AnswerRe: OverFlow searching Genres Pin
Thommy Mewes15-Nov-06 21:39
memberThommy Mewes15-Nov-06 21:39 
GeneralAdding Info to a listbox Pin
John Dovey7-Sep-06 3:36
memberJohn Dovey7-Sep-06 3:36 
QuestionHow to use this dll in Exel Macro? Pin
strangerland26-May-06 19:16
memberstrangerland26-May-06 19:16 
AnswerRe: How to use this dll in Exel Macro? [modified] Pin
bill-tor4-Jan-07 18:50
memberbill-tor4-Jan-07 18:50 
GeneralBitrate problem Pin
Alberto Venditti15-Feb-06 10:12
memberAlberto Venditti15-Feb-06 10:12 
GeneralRe: Bitrate problem Pin
AndyLang15-Jul-07 16:17
memberAndyLang15-Jul-07 16:17 
GeneralRe: Bitrate problem Pin
LegoMindstorms5-Apr-08 11:44
memberLegoMindstorms5-Apr-08 11:44 
GeneralRe: Bitrate problem Pin
vardos10-Sep-11 0:51
membervardos10-Sep-11 0:51 
QuestionUpdate Missing Pin
Iftikhar Ali17-Jan-06 0:54
memberIftikhar Ali17-Jan-06 0:54 
AnswerRe: Update Missing Pin
Thommy Mewes17-Jan-06 9:44
memberThommy Mewes17-Jan-06 9:44 
GeneralRe: Update Missing Pin
Iftikhar Ali17-Jan-06 21:33
memberIftikhar Ali17-Jan-06 21:33 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.

| Advertise | Privacy | Terms of Use | Mobile
Web03 | 2.8.150520.1 | Last Updated 1 Mar 2005
Article Copyright 2005 by Thommy Mewes
Everything else Copyright © CodeProject, 1999-2015
Layout: fixed | fluid