The Stop method of the IIsWebServer object stops the server operation.
IIsWebServer.Stop
<%
Dim ServerObj
'Stop the second Web server.
Set ServerObj = GetObject("IIS://LocalHost/W3SVC/2"
ServerObj.Stop
%>
Start, Pause, Continue, Status