dhcp

I’ve created small tool(for windows XP/Vista), writen in visual basic 6.this tool was created for switching between static LAN ip to DHCP and back to original static IP (original IP saved in temporary variable) without opening network configuration, And without typing anything, just few mouse click is what we need. This tool using Windows Management Instrumentation for enumerating all network interface, get parameters, and set parameters.

Set objwmiservice = GetObject("winmgmts:\\.\root\cimv2")
Set colNIC_Config = objwmiservice.ExecQuery("Select * from Win32_NetworkAdapterConfiguration WHERE Index='" && _
                    Netconf.strIFIndex(CboIF.ListIndex) && "' AND IPEnabled=TRUE")