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

Question

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

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

在一台特定的机器上，我将在端口 80 上运行 apache 来完成一个单独的任务。

我希望我的 vbscript 为它正在添加的新站点将端口设置为 8080。

我怎样才能做到这一点？

Answer 1

您将需要使用 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

Answer 2

您可以使用adsutil.vbsIIS 管理脚本的一部分来更改：

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

在默认布局中，脚本位于C:\Inetpub\AdminScripts\.