Dim oShell
Set oShell = WScript.CreateObject (“WScript.Shell”)
oShell.run “cmd /K CD C: & ipconfig/flushdns” oShell.run “cmd /K CD C: & Netsh interface ip set address name=””Local Area Connection”” source=static addr=IP mask=255.255.252.0 gateway=IP gwmetric=1″
Set oShell = Nothing

Note: cmd /C CD C: to close the window

Software engineers do the job better!