Teledyne LeCroy USB Analyzer Automation Manual - Manual (Page 90)

Teledyne LeCroy Automation API Reference Manual for USBTracer, USB Advisor, and Voyager USB Protocol
Suite
90
Example
C++:
// In this example, use wrapper functions provided by #import directive.
IUsbTrace* usb_trace;
. . .
IUsbVerificationScript* usb_vscript = NULL;
usb_trace->QueryInterface( IID_ IUsbVerificationScript, (void**)&usb_vscript ) )
assert( usb_vscript != NULL );
IVScriptEngine* usb_vsengine = NULL;
usb_vsengine = usb_vscript -> GetVScriptEngine("Test_1");
assert( usb_vsengine != NULL );
VS_RESULT result = usb_vsengine ->
RunVScript ();
. . .
VARIANT my_var;
VariantInit( &my_var );
usb_vsengine->GetScriptVar( _bstr_t("MyVar"), &my_var );
if( my_var.vt == VT_BSTR ) ProcessString( my_var.bstrVal );
. . .
WSH:
. . .
Set Trace = Analyzer.OpenFile( TraceName ) ' Open the trace.
Set VSEngine = Trace.GetVScriptEngine( VScript ) ' Get VS Engine object.
Result = VSEngine.RunVScript
MyIntVar = VSEngine.GetScriptVar( "MyIntVar" ) ' Suppose MyVar contains an integer
MyStrVar = VSEngine.GetScriptVar( "MyStrVar" ) ' Suppose MyVar contains a string.
MsgBox " MyIntVar = " & CStr(MyIntVar) & ", MyStrVar = " & MyStrVar