具体代码如下：
HRESULT hr = S_OK;
WCHAR wszPathName[]=L"alan\\testqueue";
IMSMQQueueInfoPtr spQInfo1("MSMQ.MSMQQueueInfo");
spQInfo1->PutPathName(wszPathName);
IMSMQQueuePtr spQRec = spQInfo1->Open(MQ_RECEIVE_ACCESS, MQ_DENY_NONE);
_variant_t vtReceiveTimeout = 300000L;
IMSMQMessagePtr spRMsg = spQRec->Receive(&vtMissing, &vtMissing,
&vtMissing, &vtReceiveTimeout);
if (NULL == spRMsg)
{
::MessageBox(NULL, _T("No messages found"), _T("Test Receive Message"), MB_OK);
return ;
}
strXML=spRMsg->Body;
::MessageBox(NULL, (char*)(_bstr_t)spRMsg->Body, _T("Test Receive Message"), MB_OK);
