set objWSHShell = CreateObject("WScript.Shell")
strRegKey = "HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\"
objWSHShell.RegWrite strRegKey & "DisableDynamicUpdates", 1

