IIS 7 - IIS 6 Проблема

Question

Я пытаюсь запустить этот скрипт для назначения пула приложений на веб-сайт работает под IIS 6

Set oWebAdmin = GetObject("winmgmts:root\WebAdministration") 
Set oSite = oWebAdmin.Get("Site.Name='Site'") 
oSite.ApplicationDefaults.ApplicationPool = "NewAppPool" 
oSite.Put_ 

Этот сценарий не может работать под IIS 6 ... Есть ли это что-то не так?

Спасибо,

Answer 1

Set objVirtualDirectory = GetObject("IIS://localhost/" + strSitePath + "/ROOT") 


' Assign the Pool to the Site 
objVirtualDirectory.AppPoolID = strAppPool 
objVirtualDirectory.AppFriendlyName = "me app" 
objVirtualDirectory.Put_()