一個簡單的HTTP通訊的例子，使用了CInternetSession，CHttpConnection，CHttpFile三個類。

void CBaseHttpDlg::OnBnClickedGet()<br />{<br />// TODO: 在此添加控制項通知處理常式代碼<br /> UpdateData();<br /> CString txt;<br /> m_RichEditHttpRespone.GetWindowText(txt);</p><p>CInternetSession InterSession;<br />CHttpConnection* con = InterSession.GetHttpConnection(m_strURL);<br />CHttpFile* pf = con->OpenRequest(con->HTTP_VERB_GET, m_strURL);</p><p> pf->AddRequestHeaders(_T("Content-Type: application/x-www-form-urlencoded"));<br /> pf->AddRequestHeaders(_T("Accept: */*"));<br /> pf->SendRequest();</p><p> DWORD dwStatus = 0;<br /> DWORD dwBuffLen = sizeof(dwStatus);<br />BOOL bSuccess = pf->QueryInfo(HTTP_QUERY_STATUS_CODE|HTTP_QUERY_FLAG_NUMBER, &dwStatus, &dwBuffLen);<br /> CString s; s.Format(_T("/r/nQueryInfo : %d"), dwStatus);<br /> txt += s;</p><p> if( bSuccess && dwStatus>= 200 && dwStatus<300)<br /> {<br /> char buffer[10240];<br /> memset(buffer, 0, 10240);<br /> int nReadCount = 0;<br /> txt += "/r/nContent : ";</p><p> while((nReadCount = pf->Read(buffer, 10240)) > 0)<br /> {<br /> txt += buffer;<br /> memset(buffer, 0, 10240);<br /> }<br /> }<br /> else<br /> {<br /> s.Format(_T("/r/nCode : %d"), bSuccess);<br /> txt += s + _T("/r/n網站伺服器錯誤 ") + m_strURL;<br /> }<br /> txt += "/r/nGetObject : ";<br /> txt += pf->GetObject();<br /> txt += "/r/n";<br /> m_RichEditHttpRespone.SetWindowText(txt);</p><p>UpdateData(FALSE);</p><p> pf->Close();<br /> InterSession.Close();<br />}

 

這隻是一個最基本的東西，還需要做很多額外的工作，待補充。