请教ado在VC中如何更新大字段 急啊~~~~~


void SaveLongBinary(CString strSQL,char *buf,int nSize)
{
_RecordsetPtr   pRs;
pRs.CreateInstance(__uuidof(Recordset));
pRs->Open((LPCTSTR)strSQL, (IDispatch *)theApp.m_pConn, adOpenStatic, adLockOptimistic, adCmdText);
if (pRs->AdoEOF)
{
pRs->AddNew();
pRs->Collect["SGUID"]=(LPCTSTR)GetGuid();
pRs->Collect["A_UNIT1"] =(LPCTSTR)theApp.m_strProject;
} SAFEARRAY *psa = SafeArrayCreateVector(VT_UI1, 0, nSize);
if (psa)
{
char *bufSa;
SafeArrayAccessData(psa, (void **)&bufSa);

memcpy(bufSa, buf, nSize);
SafeArrayUnaccessData(psa);
VARIANT var;
var.vt = VT_ARRAY|VT_UI1;
var.parray = psa;
pRs->Fields->Item["A_BMP"]->AppendChunk(var);
pRs->Update();
}
pRs->Close();
}