MP3 Tag Info (.cls)

usetheforce2
01-08-2002, 01:51 PM
Hey all,

This is an mp3 class that can perform some basic functions when working with mp3 files:

1. Get the tag information (Title, Artist, Album, Year, Comment, Genre)
2. Save tag information to an MP3 file
3. Delete tag information
4. Provide a complete genre list (well as many as I could find)

In order to use the example project, you must change two values:

1. You will have to change the path to a folder that contains mp3 files on you computer in order to populate the textbox with valid mp3 files. This is located in the fsoObject sub routine.

' Get path to folder that contains mp3 files, and initialize folder (fldr) object

Set fldr = fso.GetFolder("E:\My Shared Folder")

2. In order to use the “Get Tag”, “Save Tag”, and “Delete Tag” command buttons, you will need to change the path to a valid Mp3 file on your computer. These are located in each of the following subroutines (these sub routines should all point to the same MP3 file):

* DeleteTag() *

'set path to file
TagInfo.FileName = App.path & "\test1.mp3"

* FileInfo() *

'set path to file
TagInfo.FileName = App.path & "\test1.mp3"

* SaveTag() *

'set path to file
TagInfo.FileName = App.path & "\test1.mp3"

If you have any question or comments please PM me, thanks and enjoy!

Ps: the initial code and idea was provided to me by JDT, thanks SAM!
Regan
[COLOR=blue]

EZ Archive Ads Plugin for vBulletin Copyright 2006 Computer Help Forum