Teledyne LeCroy Automation API for Teledyne LeCroy PETracer_PETrainer - Manual (Page 44)

Teledyne LeCroy Automation API for PETracer/PETrainer
39
Example
WSH:
Set Analyzer = WScript.CreateObject( “CATC.PETracer” )
CurrentDir = Left( WScript.ScriptFullName, InstrRev( WScript.ScriptFullName, “\” ) )
Set Trace = Analyzer.MakeRecording (CurrentDir & "Input\test_ro.rec")
Trace.ReportErrorSummary CurrentDir & "Output\error_summary.txt"
C++:
IPETrace* pe_trace;
TCHAR file_name[_MAX_PATH];
. . .
try
{
pe_trace->ReportErrorSummary( file_name );
}
catch ( _com_error& er)
{
if (er.Description().length() > 0)
::MessageBox( NULL, er.Description(), _T("PETracer client"), MB_OK );
else
::MessageBox( NULL, er.ErrorMessage(), _T("PETracer client"), MB_OK );
return 1;
}