Installation manual

STAR-LINK™
20
3
PROPERTY NETWORKSTATUS
PURPOSE
Returns the network status.
DESCRIPTION
This read only property returns the network status.
IDL
[propget, id(13), helpstring("property NetworkStatus")] HRESULT NetworkStatus([out,
retval] short *pVal);
DATA TYPE
Short
POSSIBLE VALUES
The control return only these values:
NRF_IDLE = 0
NRF_LINE_OPEN = 1
NRF_NET_OPEN = 2
NRF_NET_CLOSE = 3
EXAMPLE
...
Public Const NRF_IDLE = 0 ' Network RF Status
Public Const NRF_LINE_OPEN = 1
Public Const NRF_NET_OPEN = 2
Public Const NRF_NET_CLOSE = 3
...
Dim strStatus As String
Select Case RFNCCTL.NetworkStatus
Case NRF_IDLE
strStatus = "Network is in IDLE state"
Case NRF_LINE_OPEN
strStatus = "Serial Line is OPENED"
Case NRF_NET_OPEN
strStatus = "Network is RUNNING"
Case NRF_NET_CLOSE
strStatus = "Network is in CLOSED"
End Select
MsgBox strStatus, vbExclamation, "Network Status"
...