#import "msxml4.dll"  
   #import "mssoap30.dll" exclude("IErrorInfo", "IStream", "ISequentialS", "_LARGE_INTEGER", "_ULARGE_INTEGER", "tagSTATSTG", "_FILETIME") 
   #define serviceURL L"https://cgk/RA/RA.wsdl" 
   #define adminCertName L"CURRENT_USER\\My\\Администратор" 

   HRESULT hr; 
    CComQIPtr < MSSOAPLib30::ISoapClient, &__uuidof(MSSOAPLib30::ISoapClient)> oSoap; 
    hr = oSoap.CoCreateInstance (__uuidof(MSSOAPLib30::SoapClient30)); 
    hr = oSoap->MSSoapInit(serviceURL, L"RA", L"CertViewSoapPort", L""); 
    CComDispatchDriver oDisp; 
    hr = oSoap->QueryInterface(&oDisp); 
    oSoap->ConnectorProperty[L"SSLClientCertificateName"] = adminCertName; 
    oSoap->ConnectorProperty[L"UseSSL"] = CComVariant(true); 
    oSoap->ConnectorProperty[L"Timeout"] = CComVariant(long(60000)); 
    DISPID dispID; 
    hr = oDisp.GetIDOfName(L"GetCACertificate", &dispID); 
    CComVariant vType(long(0)); 
    hr = oDisp.Invoke1 (dispID, &vType, vCert); 
    return hr;