IsActivated Example for Visual Basic
Dim out$
'test the local computer's connection
out$ = "Activated: " & CStr(LEADDICOMNet1.IsActivated (LEADDICOMNet1.hNet))
out$ = out$ & Chr(13)
out$ = out$ & "Connected: " & CStr(LEADDICOMNet1.IsConnected (LEADDICOMNet1.hNet))
out$ = out$ & Chr(13)
out$ = out$ & "Associated: " & CStr(LEADDICOMNet1.IsAssociated (LEADDICOMNet1.hNet))
MsgBox out$