mfc获取web服务器文件,如何从MFC编写的应用程序（MSVC 2008）查询基于CGI的Web服务器并处理结果？...

CInternetSession internet_session;

CHttpConnection* connection = NULL;

CHttpFile* file = NULL;

TRY {

connection = internet_session.GetHttpConnection("www.somehost.com", (INTERNET_PORT)80);

// URI needs to be a relative path here

file = connection->OpenRequest(CHttpConnection::HTTP_VERB_GET, "/some/file/on/server", NULL, 1, NULL, "HTTP/1.1");

BOOL send_result = file->SendRequest();

if (send_result == FALSE) {

// When can this happen? Only when connection fails between this and the previous call.

// Need to use ugly MFC exception stuff because OpenRequest et al. use it.

::AfxThrowInternetException(internet_session.GetContext());

}

}

CATCH (CInternetException, e) {

if (file) {

file->Close();

}

delete connection;

file = NULL;

connection = NULL;

}

END_CATCH

if (!file) {

delete file;

delete connection;

return false;

}

DWORD status_code;

file->QueryInfoStatusCode(status_code);

if (status_code != 200) {

CString result;

if (status_code == 403) {

result.Format("Authentication error (HTTP 403)");

} else if (status_code == 404) {

result.Format("Object not found (HTTP 404)");

} else if (status_code == 500) {

result.Format("Application error: malformed request (HTTP 500)");

} else {

result.Format("Got unsupported HTTP status code %d", status_code);

}

file->Close();

delete file;

delete connection;

return false;

}