SOAP实例：客户端(C++) + 服务器端(Web + COM+)

向右看齐 2022-08-18 03:04 243阅读 0赞

远程soap服务器端有个com其中一接口是  
HRESULT GetTemp(\[in\]BSTR Url,\[out,retval\]BSTR\*Return);  
他的实现是  
STDMETHODIMP cGetTime::GetTemp(BSTR Url, BSTR \*Return)  
\{  
 // TODO: Add your implementation code here  
 \*Return = SysAllocString(\_T("jones"));  
 return S\_OK;  
\}

现在在客户端用soap调

\#import "c:Program Filescommon FilesMSSoapBinariesmssoap30.dll" raw\_interfaces\_only, exclude("IStream", "ISequentialStream", "\_LARGE\_INTEGER", "\_ULARGE\_INTEGER", "tagSTATSTG", "\_FILETIME", "IErrorInfo")  
using namespace MSSOAPLib30; //soap的dll

int main(int argc, char\* argv\[\])  
\{  
 coInitialize(NULL);  
 \_variant\_t result;  
 DISPID dispidFn=0;  
   
 HRESULT hr;  
 ISoapclientPtr pSoapclient;  
 pSoapclient=ISoapclientPtr(\_\_uuidof(Soapclient30));  
   
 long lValue=10;  
 try  
 \{  
  //连接soap站点  
  hr=pSoapclient->MSSoapInit(\_bstr\_t("http://192.168.100.171:8888/SoapTest.WSDL"),  
   \_bstr\_t("SoapTest"),\_bstr\_t("GetTimeSoapPort"),NULL);  
    if(FAILED(hr))  
  \{  
   printf("MSSoapInit 失败rn");  
   \_com\_issue\_error(hr);  
  \}

LPOLESTR pServiceName = L"GetTemp"; //得到com中的GetTemp的方法ID  
  hr = pSoapclient->GetIDsOfNames(IID\_NULL, &pServiceName, 1,  
   LOcALE\_SYSTEM\_DEFAULT, &dispidFn);  
  if(FAILED(hr))  
  \{  
   printf("GetIDsOfNames 失败rn");  
  \}  
  else  
  \{  
    TcHAR strData\[126\]=;  
   VARIANT args\[1\]=;  
   args\[0\].vt = VT\_BSTR;  
   wsprintf(strData,"test");  
   args\[0\].bstrVal = \_bstr\_t(strData).copy(); //传的参数 既BSTR Url ,如果有多个参数 那args\[\]就是传的参数的数组

EXcEPINFO excepinfo=;  
   DISPPARAMS params=;  
   params.cArgs = 1;  
   params.rgvarg= args;  
   \_variant\_t result;  //返回的是BSTR \*Return 即"jones"  
   UINT uArgErr=0;  
   //调用GetTemp的方法  
   hr=pSoapclient->Invoke(dispidFn, IID\_NULL, LOcALE\_SYSTEM\_DEFAULT,  
     DISPATcH\_METHOD, &params, &result, &excepinfo, NULL);  
   if(FAILED(hr))  
   \{  
    printf("Invoke 失败rn");  
    \_com\_issue\_error(hr);  
   \}  
   else  
     
  \}  
 \}  
 catch(\_com\_error& e)  
 \{  
  TcHAR str\[205\]=;  
  wsprintf(str,"%s,%s,%s,%d",e.Source(),e.Description(),  
   e.ErrorMessage(),e.Error());  
    
 \}  
 coUninitialize();  
 return 0;  
\}

好了一个简单的soap调用就完成了.