Ошибка загрузки данных изображения из SQL Server в локальную переменную

Question

Я хочу сохранить данные изображения varbinary(max) в любом Dim, но он показывает ошибку вроде:

несоответствие типа данных

Вот код:

strSQL = "SELECT * FROM [NEWDATABASE].[dbo]." & tablename & " WHERE BarCode = '" & barcodenow & "'"

objCommand.CommandText = strSQL
Set objRecordset = objCommand.Execute

dim lngValue
lngValue = objRecordset.Fields(3).Value