Printable View
I have an old ISA output board that I built some years ago with 8 relays on board which are controlled from QBasic by:
OUT (hex address), (hex data)
the data parameter selects which combination of relays are switched on/off.
I am trying to figure out how to achieve the same effect in VB6 and suspect it may involve some API calls which I have managed before. Does any kind soul have the time to pont me in the right direction?
Chris
you can use rtlMoveMemory. I made up a 'hex address'
Code:Private Declare Sub RtlMoveMemory Lib "kernel32.dll" _
(Destination As Any, Source As Any,ByRef Length As SIZE_T )
Dim t as string
x=strptr(t)
hexaddress = &H0044
rtlMoveMemory( hexaddr,x , lenB(t) )
You might want to try this DLL at www.lvr.com/parport.htm The DLL is originally designed to give IO to the parallel port, but since it can take the port number as a parameter, it is the same as the INP and OUT statements in QB.