... #import "msxml4.dll" using namespace MSXML2; #import "C:\Program Files\Common Files\MSSoap\Binaries\MSSOAP30.DLL" exclude("IStream", "IErrorInfo", "ISequentialStream", "_LARGE_INTEGER", "_ULARGE_INTEGER","tagSTATSTG","_FILETIME") using namespace MSSOAPLib30; ... HRESULT hr; CString WebUrl = "http://www.WebServicex.net/TranslateService.asmx?wsdl"; try { CoInitialize(NULL); ISoapSerializerPtr Serializer; ISoapReaderPtr Reader; ISoapConnectorPtr SoapConnector; //创建SoapConnector类的对象 SoapConnector.CreateInstance(__uuidof(HttpConnector30)); //指定Web服务的地址 SoapConnector->Property ["EndPointURL"] =(LPSTR)(LPCTSTR)WebUrl; //与Web服务连接 hr=SoapConnector->Connect(); if(FAILED(hr)) return ; //指定Web服务完成的操作 SoapConnector->Property ["SoapAction"] = _T("http://www.webservicex.net/Translate"); //准备发送消息给Web服务 SoapConnector->BeginMessage(); // 创建SoapSerializer对象 Serializer.CreateInstance(__uuidof(SoapSerializer30)); // 将serializer连接到connector的输入字符串 Serializer->Init(_variant_t((IUnknown*)SoapConnector->InputStream)); // 创建SOAP消息 Serializer->StartEnvelope("soap","",""); Serializer->StartBody(""); Serializer->StartElement("Translate","http://www.webservicex.net","","soap"); Serializer->StartElement("LanguageMode","","","soap"); Serializer->WriteString((_bstr_t)(LPCTSTR)"EnglishTOChinese"); Serializer->EndElement(); Serializer->StartElement("Text","","","soap"); Serializer->WriteString((_bstr_t)(LPCTSTR) "translate"); Serializer->EndElement(); Serializer->EndElement(); Serializer->EndBody(); Serializer->EndEnvelope(); //消息真正地发给Web服务 hr=SoapConnector->EndMessage(); if(FAILED(hr)) return ; // 读取响应 Reader.CreateInstance(__uuidof(SoapReader30)); // 将reader联接到connector的输出字符串 Reader->Load(_variant_t((IUnknown*)SoapConnector->OutputStream), _T("")); MessageBox( CString((const char *)Reader->RpcResult->text) ); } catch (_com_error e) { MessageBox( (CString)(char*)e.Description() ); }

这是一个在线翻译的例子，可行！我试过，不过有时候可是那那样的服务器原因出现999错误