Вот так загружаю Float
float CDatabase::FieldValueFlt(int index)
{
Fields* fields = 0;
m_recordset->get_Fields(&fields);
Field* field = 0;

VARIANT idx;
idx.vt = VT_I4;
idx.lVal = index;
fields->get_Item(idx, &field);

VARIANT newVal;
newVal.vt = VT_R4;
if (field->GetActualSize()==0) return NULL;
field->get_Value(&newVal);

return newVal.fltVal;
}

Вот так BLOB
int CDatabase::FieldValueBlob(int index,char *FileName)
{
if (m_recordset->GetFields()->GetItem(_variant_t((long)index))->GetActualSize()==0) return 0;

_StreamPtr stream;
stream.CreateInstance("ADODB.Stream");
_variant_t varOptional(DISP_E_PARAMNOTFOUND,VT_ERROR);
stream->raw_Open(varOptional, adModeUnknown, adOpenStreamUnspecified,NULL,NULL);
stream->put_Type(adTypeBinary);
stream->Write(m_recordset->GetFields()->GetItem(_variant_t((long)index))->GetValue());
stream->SaveToFile(FileName,adSaveCreateOverWrite);
stream->Close();

return 1;
}

Как загрузить строку типа char?