sYourCommand = "ipconfig/flushdns"
Shell("cmd /c " & sYourCommand, vbHide)
sYourCommand = "ipconfig/release"
Shell("cmd /c " & sYourCommand, vbHide)
sYourCommand = "ipconfig/renew"
Shell("cmd /c " & sYourCommand, vbHide)