Alamance-Burlington School System

Copy the following code in a text file (.txt) and rename it in (.vbs)…. Function GetIPAddress()Dim objWMIService, IPConfigSet, IPConfig, IPAddress, iDim strIPAddress‘ Connect to the WMI serviceSet objWMIService = GetObject(“winmgmts:” _& “{impersonationLevel=impersonate}!\\.\root\cimv2″)‘ Get all TCP/IP-enabled network adaptersSet ... ................
................