Работаю с ADO, получаю записи из рекодсета. Несколько записей представлено в бинарном виде (массив байтов). И никак не получается этот массив получить в С++. Сначала проверял работу в Excel VBA

Dim abArray() As Byte
abArray = rec.fields("Info.Prod.Code").value;

и єтот код работает. Пытаюсь сделать аналог в С++:

long idx = 0;
value = rec->Fields->GetItem("Info.Prod.Code")->Value;
SAFEARRAY *res = value.parray;
hr = SafeArrayLock( res );
hr = SafeArrayGetElement( res, &idx, &q );
hr = SafeArrayUnlock( res );

не работает (собственно value.parray указывает на забитый мусором участок памяти). Как правильно сделать?