权限被拒绝:GetObject(“ IIS://”&strServer&“ / w3svc / 4 / ROOT”)

时间:2019-11-21 04:10:34

标签: vba iis-7

请帮助。我的代码在Visual Basic中。错误权限被拒绝GetObject(“ IIS:// loclahost / w3svc / 4 / ROOT”)

    Set wServer = GetObject("IIS://loclahost/w3svc/4")
    Set wRoot = GetObject("IIS://loclahost/w3svc/4/ROOT") 'Get the root web
    Set wNew = wRoot.Create("IIsWebVirtualDir", strWebName) 'Create a new web off the root

    ''Create New App
    wNew.AppCreate True

1 个答案:

答案 0 :(得分:0)

我建议您可以发布有关您需求的更多详细信息。

您是否在IIS上托管的Web应用程序中运行此代码?

您的应用程序池似乎没有足够的权限来获取IIS网站信息。

如果您要创建或修改IIS设置,建议您尝试修改对本地系统的应用程序池标识权限。

详细信息,您可以参考以下步骤:

1。在IIS管理器中,选择“应用程序池”。

2。从应用程序池列表中,右键单击您的应用程序池,然后选择“高级设置”。

3。在“流程模型”部分中,将身份属性从ApplicationPoolIdentity更改为localsystem,然后单击“确定”。