在VC6.0中我們通常用Ado的FIEld 對象的GetChuck和AppendChunk來讀寫Blob對象，但是這樣做要寫很多的代碼，其實ado給我們提供了一個更易操作的對象那就是Stream Object，通過它我們可以更容易的操作數據庫中的Blob對象，而且可以直接把Blob對象從數據庫保存到本地文件，或者直接讀取文件寫入到數據庫中。下面就詳細描述如何操作。
首先申明Stream對象
_ StreamPtr pStm;
pStm.CreateInstance("ADODB.Stream");
variant_t varOptional(DISP_E_PARAMNOTFOUND,VT_ERROR);
pStm->PutType(adTypeBinary);//類型為二進制
//得到字段內容的大小
// long lDataSize = m_pRecordset->GetFIElds()->GetItem("photo")->ActualSize;
//m_pRecordset為一個打開的紀錄集對象，含有photo這個blob字段
pStm->Open( varOptional,
adModeUnknown, adOpenStreamUnspecifIEd, _bstr_t(), _bstr_t());
//打開pStm
pStm->Write(_variant_t(m_pRecordset->GetFIElds()->GetItem("photo")->Value));
//把photo字段的內容寫入pStm
pStm->SaveToFile("c:\publogo.jpg", adSaveCreateOverWrite);
pStm->Close();
//直接保存為文件,如果是別的格式只要保存的時候改變後綴就可以了
下面是如果不保存成文件可以直接通過Com對象來繪制該圖片，IPicture 可以顯示多種格式圖片.
HGLOBAL hGlobal = GlobalAlloc(GMEM_MOVEABLE, pStm->GetSize());
LPVOID pvData = NULL;
IStream *ps;
if (hGlobal != NULL)
{
if ((pvData = GlobalLock(hGlobal)) != NULL)
{
char * m_pBMPBuffer = new char[pStm->GetSize()+1];//分配必要的存儲空間
char *pBuf = NULL;
SafeArrayAccessData(varBLOB.parray,(void **)&pBuf);
memcpy(pvData,pBuf,pStm->GetSize()); //復制數據到緩沖 區 m_pBMPBuffer
SafeArrayUnAccessData (varBLOB.parray);
GlobalUnlock(hGlobal);
CreateStreamOnHGlobal(hGlobal, TRUE, &ps);
}
}
IPicture *pPic;
if(SUCCEEDED(OleLoadPicture(ps,pStm->GetSize() ,TRUE,IID_IPicture,(LPVOID*)&pPic)))
{
OLE_XSIZE_HIMETRIC hmWidth;
OLE_YSIZE_HIMETRIC hmHeight;
pPic->get_Width(&hmWidth);
pPic->get_Height(&hmHeight);
double fX,fY;
CDC *pDC = GetClIEntDC();//這裡根據具體請況來取
fX=(double)pDC->GetDeviceCaps(HORZRES)*(double)hmWidth/((double)pDC->GetDeviceCaps(HORZSIZE)*100.0);
fY =(double)pDC->GetDeviceCaps(VERTRES)*(double)hmHeight/((double)pDC->GetDeviceCaps(VERTSIZE)*100.0);
if(FAILED(pPic->Render(*pDC,0,0,(DWORD)fX,(DWord)fY,0,hmHeight,hmWidth,-hmHeight,NULL)))
AfxMessageBox("圖像繪制失敗！");
pPic->Release();
}
這樣就完成了對圖片文件從數據庫讀出和顯示的過程。
對於從文件寫入數據庫就相對的容易多了,
_StreamPtr pStm;
pStm.CreateInstance("ADODB.Stream");
variant_t varOptional(DISP_E_PARAMNOTFOUND,VT_ERROR);
// long lDataSize = m_pRecordset->GetFIElds()->GetItem("photo")->ActualSize;
pStm->PutType(adTypeBinary；
pStm->Open( varOptional,
adModeUnknown, adOpenStreamUnspecifIEd, _bstr_t(), _bstr_t());
pStm->LoadFromFile("c:\book.gif");//讀入文件
variant_t varBLOB=pStm->Read(adReadAll);
m_pRecordset->GetFIElds()->GetItem("photo")->Value= varBLOB;//保存到數據集對象。
以上就是關於ADO的Stream對象操作數據庫中的blob字段的具體方法，主要是對圖片我們還可對它進行改造成其他的，比如讀者可以改造成讀取XML文件，並保存等等。
由於本人水平有限，寫作難免有很多不足之處，懇請大家指教，也希望來信交流。索取例子代碼或交流請來信[email protected]，或者在CSDN論壇給arvid_gs發短消息。
