Dim SDB Set SDB = CreateObject("SongsDB.SDBApplication")