如何以编程方式（以vbscript）在IIS下更改/设置站点的tcp端口？

Question

我的编程环境包括用于在干净的机器上设置我的自动创建的脚本。

一步使用vbscript在IIS上配置用于监视构建的网站。

在特定的机器上，我将在端口80上运行apache以执行单独的任务。

我想让我的vbscript将它添加的新网站的端口设置为8080。

我该怎么做？

Answer 1

你可以使用adsutil.vbs作为IIS管理脚本的一部分来更改：

 
cscript adsutil.vbs set W3SVC/1/ServerBindings “:8080:” 

在默认布局中，脚本驻留在C:\Inetpub\AdminScripts\中。

Answer 2

你将需要添加使用WMI或ADSI

http://www.adopenstatic.com/cs/blogs/ken/archive/2006/07/28/188.aspx

上有代码的提取物的主机头（一个小编辑）

Dim objWebApp 
    Dim intArraySize 
    Dim arrOldBindings 
    Dim arrNewBindings
 

Set objWebApp = GetObject("IIS://localhost/w3svc/" WebSiteID) 

If isArray(objWebApp.ServerBindings) then 

arrOldBindings = objWebApp.ServerBindings 
    intArraySize = UBound(arrOldBindings) 
    Redim arrNewBindings(intArraySize + 1) 

    For i = 0 to intArraySize 
    arrNewBindings(i) = arrOldBindings(i) 
    Next 

arrNewBindings(intArraySize + 1) = ":mydomain.com:8080:" 

    objWebApp.Put "ServerBindings", (arrNewBindings) 
    objWebApp.SetInfo 

End If