02-15-2010 02:35 PM
Hello:
I wrote a VB6 program to control some devices using the HPIB-USB-HS. Its on an older PC running win2000. Everything works fine. Using commands/subs such such as ibwrt, ilrd, etc to send out a few simple command, nothing complicated.
However, when moving the installation to a Vista computer, it brings up the program fine, but at the point of actually getting the GPIB portion running, I get: error 53 GPBIB-32.dll not found. I did try pasting that file into a winnt/system32 directory, but no change.
this is where it stalls out :
Public Sub RegisterGPIBGlobals()
Dim rc As Long
rc = RegisterGpibGlobalsForThread(Longibsta, Longiberr, Longibcnt, ibcntl) <====STOPS RIGHT HERE
my vb6 includes niglobal.bas:
32-bit Visual Basic Language Interface
' Version 1.9
' Copyright 2001 National Instruments Corporation.
' All Rights Reserved.
'
AND VBIB-32.bas:
32-bit Visual Basic Language Interface
' Version 1.81
' Copyright 2001 National Instruments Corporation.
' All Rights Reserved.
'
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' This module contains the subroutine declarations,
' function declarations and constants required to use
' the National Instruments GPIB Dynamic Link Library
' (DLL) for controlling IEEE-488 instrumentation. This
' file must be 'added' to your Visual Basic project
' (by choosing Add File from the File menu or pressing
' CTRL+F12) so that you can access the NI-488.2
' subroutines and functions.
'
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Option Explicit
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' NI-488.2 DLL entry function declarations
Declare Function ibask32 Lib "Gpib-32.dll" Alias "ibask" (ByVal ud As Long, ByVal opt As Long, value As Long) As Long
Declare Function ibbna32 Lib "Gpib-32.dll" Alias "ibbnaA" (ByVal ud As Long, sstr As Any) As Long
Declare Function ibcac32 Lib "Gpib-32.dll" Alias "ibcac" (ByVal ud As Long, ByVal v As Long) As Long
Declare Function ibclr32 Lib "Gpib-32.dll" Alias "ibclr" (ByVal ud As Long) As Long
Declare Functio
Any thoughts on where I'm going wrong? I'm not too interested in any major re-write, just need this to run on vista or newer Windows
02-15-2010 03:39 PM
02-16-2010 01:19 PM