Anyone had a error with FindLstn() when Spy is not running ?

[colinM]

We have a new system and I have loaded GPIB version 1.7 with NT4 SP6a and VB6 with SP5. When running our program it works for the first time only, after which you need to run SPY program or re-start the system !
The calling code is:-

' Find all Listeners on bus
Call FindLstn(BoardNo, Addresslist(), Listeners(), count)
If (ibsta And EERR) Then
Message = "Error finding all Listeners"
Exit Function
End If


the code returns an error and so does not find all our listeners.

Does anyone have any suggestions ??

[Randy Solomonson]

Hello-

What exactly is the error? Why does the system need a restart? Is it a blue screen? If so, what does the blue screen say?

Randy Solomonson
Application Engineer
National Instruments

[colinM]

our software reported:-
"Error finding all listeners
ibsta=&H8130
iberr=ETAB
ibcnt=0x7"

I have found the solution and that was to put a 100mS delay between the following calls:-
RegisterGPIBGlobalsForThread()
and
FindLstn32()
this has now fixed this problem