Instrument Control (GPIB, Serial, VISA, IVI)

cancel
Showing results for 
Search instead for 
Did you mean: 

IVI-Driver for TKDS30xx in VBA - initialization Error

Hello

 

want to connect a Tektronix TDS3014B from VBA (Excel), to read some Measures, Read/Write Configs, trigger the scope from a script ...

I've used the method found in a document found on the Vektrex Website (the only one i found):

 

 

First made the COM Object Available to the Project --> VBA Refences, IviScope Type Lib V3.0 & IviSessionFactory Type Lib 1.0 enabled

 

Code

 Public Sub InitScope()
Dim SessionFactory As IviSessionFactory
Dim Oszi As IIviScope

  Set SessionFactory = New IviSessionFactory      'Create a new Instance of the Object

 

  Set Oszi = SessionFactory.CreateDriver("tkds30xx")    'Create an instance of the Driver, here comes an error


  Oszi.Initialize ResourceName:="MyScope", idquery:=False, Reset:=True    'initialize the Driver and open connection

 

 

at the CreateDriver Method occurs an Error:

Runtime Error  '-2147217149 (80041103)':

IIviSessionFactory: Software Module (tkds30xx) has no Prog ID

 

I've spend a lot of time to search IVI-C or IVI-Com-Drivers for this Tek Scope (or generic), that run from VBA / VB), but found only some diffuse hints to installations of Software like

SignalExpress Tektronix edition, but all of these software content nothing, that i can identify as an under VBA usable IVI-Driver.

  

Can you show me a way to become a real working Driver for Scopes in VBA ?

Thanks

 

0 Kudos
Message 1 of 2
(3,746 Views)

Hi Holger,

could you please tell us more about the website you found which describes the steps you used?

 

Unfortunately you can only use the Factory method with IVI-Com drivers. For the TKDS30xx we only have IVI-C drivers available. See also this thread that discusses a similar issue.

 

If you are able to use VB instead of VBA, you might want to take a look at this page, which requires you to install Measurement Studio. 

 

Regards

--
Peter A.
Field Sales Engineer, NI Germany
0 Kudos
Message 2 of 2
(3,649 Views)