Вы можете сделать это с помощью потоков. Этот код должен помочь вам с первыми шагами:
Set rs = New ADODB.Recordset
rs.Open "select * from YourTable", Connection, adOpenKeyset, adLockOptimistic
Set mstream = New ADODB.Stream
mstream.Type = adTypeBinary
mstream.Open
mstream.LoadFromFile "c:\myfile.pdf"
rs.Fields("blobfield").Value = mstream.Read
rs.Update
Нет ничего опасного в хранении файлов в базе данных. У нас есть база данных SQL Server объемом около 20 ГБ, которая содержит около 40 000 документов, изображений и т. Д. Никогда не было проблем с ней более 3 лет.