' Restarts the default web site in IIS Sub RestartDefaultSite() Dim p As New Process() p.StartInfo.FileName = "net.exe" p.StartInfo.WindowStyle = ProcessWindowStyle.Hidden ' set the parameters to STOP the service p.StartInfo.Arguments = "STOP W3SVC /Y" p.Start() p.WaitForExit() ' make it restart p.StartInfo.Arguments = "START W3SVC /Y" p.Start() p.WaitForExit()End Sub