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

Teledyne LeCroy Automation API for PETracer/PETrainer
34
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.ApplyDisplayOptions CurrentDir & "Input\test_do.opt"
Trace.ExportToText CurrentDir & "Output\text_export.txt"
C++:
IPETrace* pe_trace;
TCHAR file_name[_MAX_PATH];
LONG packet_from;
LONG packet_to;
. . .
try
{
pe_trace->ExportToText( file_name, packet_from, packet_to );
}
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;
}