From Xojo Documentation
| This item was deprecated in version 2019r2.
Please use System.NetworkInterface as a replacement.
Use the NetworkInterface object to obtain networking information about the user's computer.
Use the optional parameter to specify the network interface card. Index is zero-based. If Index is out of bounds, an OutOfBoundsException is raised. NetworkInterfaceCount gives you the number of network interfaces in the computer.
The following simple example displays the IP address, Subnet mask, and Mac address for the selected network interface. At start-up, the application detects all the network interfaces installed on the user’s computer and loads them into a PopupMenu. The user then selects the desired network interface and the values are displayed in TextFields.
The PopupMenu's Open event handler is:
The Change event handler for the PopupMenu is this:
If Me.ListIndex > -1 Then
// Get the NetworkInterface object for the selected item
Dim iface As NetworkInterface = System.GetNetworkInterface(Me.ListIndex)
MacAddressField.Text = iface.MACAddress
IPAddressField.Text = iface.IPAddress
SubnetMaskField.Text = iface.SubnetMask