🚀 go-pugleaf

I'd try stepping through the server code when calling the RS_Iniciar()
method from the client.
You will find that

int a = 1/0 ;

will not throw the exception class that your catch() block is expecting,
therefore no error is returned.
To test returning rich error information, why not try something like;

STDMETHODIMP TQARiskAppSrvrImpl::RS_Iniciar()
{
String ErrMsg = "An Error occured!" ;
return Error(ErrMsg.Message.c_str(), IID_IQARiskAppSrvr);
}

If it's any help, I always use the following functions to decode rich error
information returned from my COM servers;

On the client enclose all COM server calls like so;

CheckResult(MyServer->MyMethod()) ;

and CheckResult is defined as follows;

const CODE_BASE = 0x300 ;

// Retrieve any error information from a HRESULT returned by a COM call
// If the HRESULT contains error info, we throw an EOleException
void CheckResult(HRESULT hr)
{
if (FAILED(hr))
  {
  WideString EDesc ;
  WideString ESrc ;
  WideString EHlpFile ;
  ULONG EHlpCtx = 0 ;

  IErrorInfo* ErrorInfo = NULL ;
  if (SUCCEEDED(GetErrorInfo(0, &ErrorInfo)))
    {
    ErrorInfo->GetDescription(&EDesc) ;
    ErrorInfo->GetSource(&ESrc) ;
    ErrorInfo->GetHelpFile(&EHlpFile) ;
    ErrorInfo->GetHelpContext(&EHlpCtx) ;
    ErrorInfo->Release() ;
    }
  throw EOleException(EDesc, HResultToNumber(hr), ESrc, EHlpFile, EHlpCtx) ;
  }
}

int HResultToNumber(int hr)
{
return HRESULT_CODE(hr) - CODE_BASE ;
}

Note that this assumes that the COM class derives from
ISupportErrorInfoImpl, which it will if the server was created using the
Builder COM wizards.

BigStew

"Carlos F. Quijano" <cquijanot@cable.net.co> wrote in message
news:3d3721ba_1@dnews...
> Hi again...
>
> Well , I try to use your code but my program no works.
>
> Is any interface required?
>
> When I try to read 'er', allways is null , why?
>
> Ths again!
>
> Carlos