Teledyne LeCroy UWBTracer Automation Manual - Manual (Page 68)

LeCroy UWBTracer Automation API Reference Manual Manual Version 3.02
64
Example
C++: // In this example we use wrapper functions provided by #import directive
//
IUwbTrace*
uwb_trace;
. . .
IUwbVerificationScript* uwb_vscript = NULL;
uwb_trace->QueryInterface( IID_ IUwbVerificationScript, (void**)&uwb_vscript ) )
assert( uwb_vscript != NULL );
IVScriptEngine* uwb_vsengine = NULL;
uwb_vsengine = uwb_vscript -> GetVScriptEngine("Test_1");
assert( uwb_vsengine != NULL );
VARIANT my_var;
VariantInit( &my_var );
my_var.vt = VT_I4; // Integer
my_var.lVal = 100;
uwb_vsengine->SetScriptVar( _bstr_t("MyVar"), my_var ); // set internal script variable
'MyVar' to 100
VS_RESULT result = uwb_vsengine -> RunVScript ();
. . .
WSH:
. . .
Set Trace = Analyzer.OpenFile( TraceName ) ' Open the trace
Set VSEngine = Trace.GetVScriptEngine( VScript ) ' Get VS Engine object
VSEngine.GetScriptVar( "MyIntVar" , 100 )
VSEngine.GetScriptVar( "MyStrVar" , "Hello !!!" )
Result = VSEngine.RunVScript