我可以在下面显示的代码中非常轻松地使用 Microsoft.Web.Administration dll 在 IIS7 中创建虚拟目录,但我一直在努力寻找如何将“网络服务”写入权限创建后的虚拟目录。谁能指出我正确的方向?
Private Sub CreateVirDir(ByVal WebSite As String, ByVal AppPath As String, ByVal VirPath As String, ByVal DirPath As String)
Dim sm As New Microsoft.Web.Administration.ServerManager()
Dim cpapp As Microsoft.Web.Administration.Application = sm.Sites(WebSite).Applications(AppPath)
cpapp.VirtualDirectories.Add(VirPath, DirPath)
sm.CommitChanges()
End Sub