You want to something along the lines of this?
'The “0” in the GetGPIBoard is the index of the GPI board in Hardware Setup > GPI Boards
'(Board #1 = Index 0, Board #2 = Index 1, etc..)
Physical GPO:
OnOnline:
Dim gpi As xpGPIBoard
If engine.GPIBoardCount > 0 Then
engine.GetGPIBoard(0, gpi)
gpi.SetOutputPinState(0, true)
End If
OnOffline:
Dim gpi As xpGPIBoard
If engine.GPIBoardCount > 0 Then
engine.GetGPIBoard(0, gpi)
gpi.SetOutputPinState(0, false)
End If
#XPression