C / C++ / MFC

	MSXML2::IXMLDOMDocument2Ptr       request(__uuidof(MSXML2::DOMDocument30));<br />
	BOOL                              bretval;<br />
<br />
	request->async = false;<br />
	bretval = request->load(lpcsSoapEnvelopeFileXML);<br />
	if(bretval)<br />
	{<br />
		MSXML2::IXMLHTTPRequestPtr  serv (__uuidof(MSXML2::XMLHTTP30));<br />
		serv->open ("POST",lpcsURL, false);<br />
		serv->setRequestHeader ("Content-Type", "text/xml; charset=utf-8");<br />
		serv->setRequestHeader ("SOAPAction", lpcsFuncURL);<br />
		serv->send (_variant_t(request->xml));<br />
<br />
	        MSXML2::IXMLDOMDocument2Ptr        response;<br />
		response = serv->responseXML;<br />
	<br />
		csResponce = (LPCSTR)serv->responseText;<br />
	}<br />
	return csResponce;