ID 3 Tags (VBA Code)

[hamlet35]

I am using the code I found here to pull MP3 tags and put them into a database and I am having tons of compile errors:

Here is just one example (they all seem to be the same type)

Public Property Let Genre(ByVal vData As Integer)
If (Len(Dir(mvarFilename))) = 0 Then Exit Property
If vData < 0 Or vData > 255 Then vData = 255 'This is where I am getting most of the compile errors
Mid(tagData, 128, 1) = Chr(vData)
mvarGenre = vData
End Property

Any ideas? Do I have to register something or is there another module I am missing?

Thanks everyone