Code:

$strComputer = "."
$objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" + $strComputer + "\root\cimv2")
if $objWMIService 
	$colNetAdapters = $objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
	For Each $objNetAdapter In $colNetAdapters
		$errEnable = $objNetAdapter.EnableDHCP()
		? iif($errEnable=0,"Success","Error Setting DHCP")
	Next
else
	? "error getting WMI" 
endif
_________________________
How to ask questions the smart way <-----------> Before you ask