In the DB in post 19, frmMetaData has a button click event that updates metadata:
The Meta. values are the existing values(which may be blank) in the mp3 file's attributes. The txt(boxes) contain values you typed in.
Code:
Private Sub cmdUpdate_Click()
If (txtArtist & "") = "" Then
MsgBox "Blank Artist not allowed!", vbInformation, " C A N N O T B E B L A N K "
Exit Sub
End If
If txtArtist <> Meta.mdArtist Then
wmp.currentMedia.setItemInfo "Artist", Me.txtArtist
End If
If txtTitle <> Meta.mdTitle Then
wmp.currentMedia.setItemInfo "Title", Me.txtTitle
End If
If txtGenre <> Meta.mdGenre Then
wmp.currentMedia.setItemInfo "Genre", Me.txtGenre
End If
If txtTrack <> Meta.mdTrack Then
wmp.currentMedia.setItemInfo "WM/TrackNumber", Me.txtTrack
End If
If Len(txtAlbum & "") = 0 Then
wmp.currentMedia.setItemInfo "Album", vbNullString
ElseIf txtAlbum <> Meta.mdAlbum Then
wmp.currentMedia.setItemInfo "Album", Me.txtAlbum
End If
DoCmd.Close acForm, Me.Name
End Sub