Teledyne LeCroy SAS_SATA Automation API manual - Manual (Page 144)

Teledyne LeCroy SASAnalyzer Object Events
138 Automation API for Teledyne LeCroy SAS/SATA Protocol Suite
Example
VBScript:
ID = Analyzer
CLASSID = " clsid: 297CD804-08F5-4A4F-B3BA-779B2654B27C " >
" >
C++:
HRESULT __stdcall OnTraceCreated( IDispatch* trace )
{
ISASTrace* sas_trace;
HRESULT hr;
hr = trace->QueryInterface( IID_ISASTrace,
(void**)&sas_trace );
if (FAILED(hr))
{
_com_error er(hr);
if (er.Description().length() > 0)
::MessageBox( NULL, er.Description(), _T("SASTracer
client"), MB_OK );
else
::MessageBox( NULL, er.ErrorMessage(),_T("SASTracer
client"), MB_OK );
return hr;
}
. . .
return hr;
}