Here is the code to *delete* virtuals, just in case:

' Note: This script must be run numerous times until
'       all virtuals have been removed.  IIS can't keep
'       up with the quick delete operations.

Set oIIS = GetObject ("IIS://localhost/W3SVC/1")
Set IISRoot = oIIS.GetObject("IIsWebVirtualDir", "Root")

For Each ChildObject In IISRoot
        WScript.Echo ChildObject.Name
Next


For Each ChildObject In IISRoot
        IISRoot.Delete "IISWebVirtualDir", "/" & ChildObject.Name
Next

Set IISRoot = Nothing
Set oIIS = Nothing 


~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
Find out how CFTicket can increase your company's customer support 
efficiency by 100%
http://www.houseoffusion.com/banners/view.cfm?bannerid=49

Message: http://www.houseoffusion.com/lists.cfm/link=i:4:201344
Archives: http://www.houseoffusion.com/cf_lists/threads.cfm/4
Subscription: http://www.houseoffusion.com/lists.cfm/link=s:4
Unsubscribe: 
http://www.houseoffusion.com/cf_lists/unsubscribe.cfm?user=11502.10531.4
Donations & Support: http://www.houseoffusion.com/tiny.cfm/54

Reply via email to