The ADSI container object Create method creates a new object in a container.
Set NewObj = Object.Create(KeyType, Name)
<% Dim WebServiceObj, ServerObj ' Get the web service object, which contains servers Set WebServiceObj = GetObject("IIS://LocalHost/W3SVC") ' Create a new web server object in the container Set ServerObj = WebServiceObj.Create("IIsWebServer", "3") ' Add code to configure server and create Root virtual directory %>
GetObject, Delete, CopyHere, MoveHere