xmlrequest.CreateInstance("Msxml2.XMLHTTP")在XP系统执行失败

[我喝多了]

if(SUCCEEDED(xmlrequest.CreateInstance("Msxml2.XMLHTTP")))
{
MessageBox("创建成功",MB_OK);
}
else
MessageBox("创建失败",MB_OK);

if(SUCCEEDED(xmlrequest.CreateInstance("Msxml2.XMLHTTP"))) 为什么这行代码在XP系统下执行失败，程序直接弹出
"创建失败"窗口，XP系统已经安装了MSXML4.0 SP2,IE8,NET3.5,WIN7系统和VISTA系统都没问题，就XP不行呢

[我喝多了]

IXMLHTTPRequestPtr xmlrequest;

try
{
xmlrequest.CreateInstance("Msxml2.XMLHTTP");
xmlrequest->open(_bstr_t("GET"),_bstr_t("http://aion.plaync.co.kr/"),vFalse);
xmlrequest->send();
}
catch(...)
{
MessageBox("错误");
}

这样也直接弹出 “错误”框，好像IXMLHTTPRequestPtr 在XP系统下就是不能运行，为什么呢，请大侠指点

[jameshooo]

先看看CreateInstance返回值是什么，大部分情况都能马上判断出原因

[SullenSun]

#import "msxml3.dll"
using namespace MSXML2;
CoInitialize(0);
IXMLHTTPRequestPtr pIXMLHTTPRequest = NULL;
BSTR bstrString = NULL;
HRESULT hr;

try {
hr=pIXMLHTTPRequest.CreateInstance("Msxml2.XMLHTTP.3.0");
SUCCEEDED(hr) ? 0 : throw hr;

hr=pIXMLHTTPRequest->open("GET", "http://localhost/books.xml ", false);
SUCCEEDED(hr) ? 0 : throw hr;

hr=pIXMLHTTPRequest->send();
SUCCEEDED(hr) ? 0 : throw hr;

bstrString=pIXMLHTTPRequest->responseText;

::MessageBox(NULL, _bstr_t(bstrString), _T("Results"), MB_OK);

if(bstrString)
{
::SysFreeString(bstrString);
bstrString = NULL;
}

} catch (...) {
::MessageBox(NULL, _T("Exception occurred"), _T("Error"), MB_OK);
if(bstrString)
::SysFreeString(bstrString);
}
可以的