Teledyne LeCroy SAS_SATA Automation API manual User Manual
Page 88
Teledyne LeCroy
SASTrace Object
82
Automation API for Teledyne LeCroy SAS/SATA Protocol Suite
if ( SUCCEEDED ( trace->QueryInterface(
IID_ISASVerificationScript,
(void**)&vscript
) )
{
try
{
VS_RESULT result = vscript -
>RunVerificationScript("Test1");
if( result == PASSED )
{
::MessageBox( NULL, "Test verification 1 is passed
!!!",
"SASTracer client", MB_OK );
}
}
catch (_com_error& er)
{
if (er.Description().length() > 0)
::MessageBox( NULL, er.Description(), "SASTracer
client", MB_OK );
else
::MessageBox( NULL, er.ErrorMessage(), "SASTracer
client", MB_OK );
return 1;
}
}
else
{
::MessageBox( NULL, "Unable to get
ISASVerificationScript interface !!!",
_T("SASTracer client"), MB_OK );
return 1 ;
}
. . .
WSH:
Set Analyzer = WScript.CreateObject("LeCroy.SASTracer")
Set Trace = Analyzer.OpenFile( "C:\Some trace
files\some_trace.sas" )