Dark Angle

隨筆 - 298 文章 - 377 trackbacks - 0

2007年7月

>

日

一

二

三

四

五

六

24

25

26

27

28

29

30

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

24

25

26

27

28

29

30

31

1

2

3

4

常用鏈接

留言簿(34)

隨筆分類

隨筆檔案

文章檔案

相冊

ascent

收藏夾

office 插件開發(2)

搜索

閱讀排行榜

評論排行榜

VC++6.0 通過HTTP方式獲取網頁 OpenURL

1 //頭部包含afxinet.h
2  #include <afxinet.h>
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:/\r\n"
19   "Accept-Language:zh-cn\r\n"
20   "User-Agent:VCTestClient\r\n";
21  CString m_strHTML;
22  try
23  {
24   CInternetSession sess;//建立會話
25   CHttpFile* pF=(CHttpFile)sess.OpenURL(pstrURL,1,INTERNET_FLAG_TRANSFER_ASCII||INTERNET_FLAG_RELOAD,headers,strlen(headers));//打開文件
26   注意:OpenURL 方法的dwFlags參數必須選擇傳輸模式為INTERNET_FLAG_TRANSFER_ASCII 或者 INTERNET_FLAG_TRANSFER_BINARY
27   CString szData,szAllData;
28   while(pF->ReadString(szData))
29   {
30    //讀取文件
31    szAllData+="\r\n";
32    szAllData+=szData;
33   }
34   pF->Close();
35   sess.Close();
36   m_strHTML=szAllData;
37  }
38  catch(CException e)
39  {
40   AfxMessageBox("獲取數據失敗");
41  }
42  return m_strHTML;
43 }
-------------------------------------------------------------------------------------------------------------------------------------
// 顯示圖片, lpstrImgUrl 為圖片URL地址，hWnd 為窗口句柄
HRESULT CBMPDlg::ShowPic(char lpstrImgUrl,HWND hWnd)
{
    HDC hDC_Temp=::GetDC(hWnd);
    IPicture pPic;
    IStream pStm;
    BOOL bResult;
    DWORD dwFileSize,dwByteRead;
    char headers =    "Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, application/xaml+xml, application/vnd.ms-xpsdocument, application/x-ms-xbap, application/x-ms-application, /"
                    "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 聶文龍閱讀(9651) 評論(2) 編輯收藏引用

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 <IPicture> 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 <IStream> 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(); 回復更多評論

# re: VC++6.0 通過HTTP方式獲取網頁 OpenURL 2013-10-20 10:50 張滔

謝謝這篇文章，我想請問一下調用showpic函數時參數傳遞是怎么樣的，我的扣扣1603098050 回復更多評論

刷新評論列表

只有注冊用戶登錄后才能發表評論。




網站導航: 博客園 IT新聞 BlogJava 博問 Chat2DB 管理

青青草原综合久久大伊人导航_色综合久久天天综合_日日噜噜夜夜狠狠久久丁香五月_热久久这里只有精品