_StreamPtr 操作

1 //头部包含 afxinet.h
 2  #include 
 3 CInternetSession::OpenURL函数原型为：
 4 CStdioFile* OpenURL( LPCTSTR pstrURL, //文件URL地址
 5   DWORD dwContext = 1, //上下文ID
 6   DWORD dwFlags = INTERNET_FLAG_TRANSFER_ASCII, //标记
 7   LPCTSTR pstrHeaders = NULL, //发送到服务器的数据头
 8   DWORD dwHeadersLength = 0 );//发送到服务器的数据头长度
 9 dwFlags可以为：
10 INTERNET_FLAG_RELOAD 强制重读数据 
11 INTERNET_FLAG_DONT_CACHE 不保存到缓存 
12 INTERNET_FLAG_TRANSFER_ASCII 使用文本数据 
13 INTERNET_FLAG_TRANSFER_BINARY 使用二进制数据
14 //获取网页的方法代码如下
15 CString getURLContext(LPCTSTR pstrURL)
16 {
17  //自定义http头信息
18  char* headers="Accept:**"
                    "Accept-Encoding: gzip, deflate\r\n"
                    "Accept-Language: zh-CN\r\n"
                    "Content-Type: application/x-www-form-urlencoded\r\n"
                    "Cache-Control: no-cache\r\n";
    //读取网页上图片文件，实际是个CHttpFile指针
    CInternetSession session("HttpClient");

    DWORD dwFlags = INTERNET_FLAG_TRANSFER_BINARY|INTERNET_FLAG_RELOAD|INTERNET_FLAG_DONT_CACHE;
    CFile* httpFile = (CFile*)session.OpenURL(lpstrImgUrl,1,dwFlags,headers,strlen(headers));//1,dwFlags

    if (httpFile!=INVALID_HANDLE_VALUE)
    {
        char achQueryBuf[32];
        DWORD dwQueryBufLen = sizeof(achQueryBuf);
        CHttpFile * pHF = (CHttpFile*)httpFile;
        pHF->QueryInfo(HTTP_QUERY_CONTENT_LENGTH, achQueryBuf, &dwQueryBufLen, NULL);
        dwFileSize = (DWORD)atol(achQueryBuf);        

if (dwFileSize==0xFFFFFFFF)
            return E_FAIL;
    }
    else
    {
        return E_FAIL;
    }
    //分配全局存储空间
    HGLOBAL hGlobal = GlobalAlloc(GMEM_MOVEABLE, dwFileSize);
    LPVOID pvData = NULL;
    if (hGlobal == NULL)
        return E_FAIL;
    if ((pvData = GlobalLock(hGlobal)) == NULL)//锁定分配内存块
        return E_FAIL;
    //把文件读入内存缓冲区
    dwByteRead = httpFile->Read(pvData,dwFileSize);
    GlobalUnlock(hGlobal);
    CreateStreamOnHGlobal(hGlobal, TRUE, &pStm);
    //装入图形文件
    bResult=OleLoadPicture(pStm,dwFileSize,TRUE,IID_IPicture,(LPVOID*)&pPic);
    if(FAILED(bResult))
        return E_FAIL;
    OLE_XSIZE_HIMETRIC hmWidth; //图片的真实宽度, 单位为英寸
    OLE_YSIZE_HIMETRIC hmHeight; //图片的真实高度, 单位为英寸
    pPic->get_Width(&hmWidth);
    pPic->get_Height(&hmHeight);
    //转换hmWidth和hmHeight为pixels距离，1英寸=25.4毫米
    int nWidth = MulDiv(hmWidth,GetDeviceCaps(hDC_Temp,LOGPIXELSX),2540);
    int nHeight = MulDiv(hmHeight,GetDeviceCaps(hDC_Temp,LOGPIXELSY),2540);
    //将图形输出到屏幕上（有点像BitBlt）
    bResult=pPic->Render(hDC_Temp,0,0,nWidth,nHeight,0,hmHeight,hmWidth,-hmHeight,NULL);
    pPic->Release();
    httpFile->Close();//关闭打开的文件

    if (SUCCEEDED(bResult))
    {
        return S_OK;
    }
    else
    {
        return E_FAIL;
    }
}
// 显示图片, lpstrImgUrl 为图片URL地址，hWnd 为窗口句柄　　　
HRESULT Utils::ShowPic(char *lpstrImgUrl,HWND hWnd)　　　
{　　　
　　HDC hDC_Temp=GetDC(hWnd);　　　
　　　
　　IPicture *pPic;　　　
　　IStream *pStm;　　　
　　　
　　BOOL bResult;　　　
　　　
　　DWORD dwFileSize,dwByteRead;　　　
　　　
　　//读取网页上图片文件，实际是个CHttpFile指针　
　　CInternetSession session("HttpClient");　
　　CFile* httpFile = (CFile*)session.OpenURL(lpstrImgUrl);　
　　　
　　if (httpFile!=INVALID_HANDLE_VALUE)　　　
　　{　　　
　　　　dwFileSize=　httpFile->GetLength();//获取文件字节数　　　
　　　　　
　　　　if (dwFileSize==0xFFFFFFFF)　　　
　　　　　　return E_FAIL;　　　
　　}　　　
　　else　　　
　　{　　　
　　　　return E_FAIL;　　　
　　}　　　
　　　
　　　
　　//分配全局存储空间　　　
　　HGLOBAL hGlobal = GlobalAlloc(GMEM_MOVEABLE, dwFileSize);　　　
　　LPVOID pvData = NULL;　　　
　　　
　　if (hGlobal == NULL)　　　
　　　　return E_FAIL;　　　
　　　
　　if ((pvData = GlobalLock(hGlobal)) == NULL)//锁定分配内存块　　　
　　　　return E_FAIL;　　　
　　　
　　//把文件读入内存缓冲区　　　
　　dwByteRead = httpFile->Read(pvData,dwFileSize);　
　　　
　　GlobalUnlock(hGlobal);　　　
　　　
　　CreateStreamOnHGlobal(hGlobal, TRUE, &pStm);　　　
　　　
　　//装入图形文件　　　
　　bResult=OleLoadPicture(pStm,dwFileSize,TRUE,IID_IPicture,(LPVOID*)&pPic);　　　
　　　
　　if(FAILED(bResult))　　　
　　　　return E_FAIL;　　　
　　　
　　OLE_XSIZE_HIMETRIC hmWidth; //图片的真实宽度, 单位为英寸　　　
　　OLE_YSIZE_HIMETRIC hmHeight; //图片的真实高度, 单位为英寸　　　
　　pPic->get_Width(&hmWidth);　　　
　　pPic->get_Height(&hmHeight);　　　
　　　
　　//转换hmWidth和hmHeight为pixels距离，1英寸=25.4毫米　　　
　　int nWidth = MulDiv(hmWidth,GetDeviceCaps(hDC_Temp,LOGPIXELSX),2540);　　　
　　int nHeight = MulDiv(hmHeight,GetDeviceCaps(hDC_Temp,LOGPIXELSY),2540);　　　
　　　
　　//将图形输出到屏幕上（有点像BitBlt）　　　
　　bResult=pPic->Render(hDC_Temp,0,0,nWidth,nHeight,　　　
　　　　0,hmHeight,hmWidth,-hmHeight,NULL);　　　
　　　
　　pPic->Release();　　　
　　　
　　httpFile->Close();//关闭打开的文件　　　
　　　
　　if (SUCCEEDED(bResult))　　　
　　{　　　
　　　　return S_OK;　　　
　　}　　　
　　else　　　
　　{　　　
　　　　return E_FAIL;　　　
　　}　　　
}　
// 显示图片, lpstrImgUrl 为图片URL地址，hWnd 为窗口句柄　
HRESULT Utils::ShowPic(char *lpstrImgUrl,HWND hWnd)　　
{　　
　　HDC hDC_Temp=GetDC(hWnd);　　
　　IPicture *pPic;　　
　　IStream *pStm;　　
　　BOOL bResult;　　
　　DWORD dwFileSize,dwByteRead;　　
　　
//读取网页上图片文件，实际是个CHttpFile指针
CInternetSession session("HttpClient");
CFile* httpFile = (CFile*)session.OpenURL(lpstrImgUrl);
　　if (httpFile!=INVALID_HANDLE_VALUE)　　
　　{　　
　　　　dwFileSize=　httpFile->GetLength();//获取文件字节数　　
　
　　　　if (dwFileSize==0xFFFFFFFF)　　
　　　　　　return E_FAIL;　　
　　}　　
　　else　　
　　{　　
　　　　return E_FAIL;　　
　　}　　
　　//分配全局存储空间　　
　　HGLOBAL hGlobal = GlobalAlloc(GMEM_MOVEABLE, dwFileSize);　　
　　LPVOID pvData = NULL;　　
　　if (hGlobal == NULL)　　
　　　　return E_FAIL;　　
　　if ((pvData = GlobalLock(hGlobal)) == NULL)//锁定分配内存块　　
　　　　return E_FAIL;　　
　　//把文件读入内存缓冲区　　
　　dwByteRead = httpFile->Read(pvData,dwFileSize);
　　GlobalUnlock(hGlobal);　　
　　CreateStreamOnHGlobal(hGlobal, TRUE, &pStm);　　
　　//装入图形文件　　
　　bResult=OleLoadPicture(pStm,dwFileSize,TRUE,IID_IPicture,(LPVOID*)&pPic);　　
　　if(FAILED(bResult))　　
　　　　return E_FAIL;　　
　　OLE_XSIZE_HIMETRIC hmWidth; //图片的真实宽度, 单位为英寸　
　　OLE_YSIZE_HIMETRIC hmHeight; //图片的真实高度, 单位为英寸　
　　pPic->get_Width(&hmWidth);　　
　　pPic->get_Height(&hmHeight);　　
　　//转换hmWidth和hmHeight为pixels距离，1英寸=25.4毫米　
　　int nWidth = MulDiv(hmWidth,GetDeviceCaps(hDC_Temp,LOGPIXELSX),2540);　
　　int nHeight = MulDiv(hmHeight,GetDeviceCaps(hDC_Temp,LOGPIXELSY),2540);　
　　//将图形输出到屏幕上（有点像BitBlt）　　
　　bResult=pPic->Render(hDC_Temp,0,0,nWidth,nHeight,　　
　　　　0,hmHeight,hmWidth,-hmHeight,NULL);　　
　　pPic->Release();　　
　　httpFile->Close();//关闭打开的文件　　
　　if (SUCCEEDED(bResult))　　
　　{　　
　　　　return S_OK;　　
　　}　　
　　else　　
　　{　　
　　　　return E_FAIL;　　
　　}　　
}　
posted on 2013-04-05 17:49 聂文龙 阅读(4704) 评论(2)  编辑 收藏 引用
VC++6.0 通过HTTP方式获取网页 OpenURL

FeedBack:
# re: VC++6.0 通过HTTP方式获取网页 OpenURL 2013-04-07 20:05 聂文龙
C中使用Stream Object读取数据中流文件并显示Bmp,JPG等图片

在VC中我们通常用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文件，并保存等等。


转换为Bitmap

CComPtr spPic;
if (varImage.vt != (VT_ARRAY|VT_UI1))return FALSE;
SAFEARRAY *psa = varImage.parray;

//get size
long size=0;
_com_util::CheckError(SafeArrayGetUBound(psa, 1, &size));
size += 1;

//copy
char *pBuf = NULL;
_com_util::CheckError(SafeArrayAccessData(psa, (void **)&pBuf));
HGLOBAL hGlobal = GlobalAlloc(GMEM_MOVEABLE, size);
void *pGlobal = GlobalLock(hGlobal);
if (!pGlobal)return FALSE;

memcpy(pGlobal, pBuf, size);
SafeArrayUnaccessData(psa);
GlobalUnlock(hGlobal);

CComPtr spStream;
_com_util::CheckError(CreateStreamOnHGlobal(hGlobal, true, &spStream));
_com_util::CheckError(OleLoadPicture(spStream, 0, TRUE, IID_IPicture, (void **)&spPic));

HBITMAP hBmp;
spPic-> get_Handle((OLE_HANDLE *)&hBmp);
CBitmap bmp;
bmp.Attach(hBmp);
BITMAP bm;
bmp.GetBitmap(&bm);
int x=bm.bmWidth;
int y=bm.bmHeight;
bmp.Detach();