Alle volte può risultare utile, specie con Windows 2000 o XP Professional, cambiare da script il path di un sito web.
Nel caso specifico serve per poter testare, ad esempio, più siti in momenti separati.
La cosa si può fare attraverso la console di gestione del servizo, oppure in maniera molto più rapida attraverso uno script che sfrutta ADSI.
Questo esempio, se messo in una virtual dir, vi consentirà di farlo nel modo più semplice possibile, anche da remoto.
Ovviamente lo script non deve girare nel contesto dell'utente IUSR_nomesvr ma come administrator, per cui è consigliabile (ancora una volta) tenerlo in una directory impostata come virtual directory web, con autenticazione NT.

<%

on error resume next
Set objW3SVC = GetObject("IIS://localhost/W3SVC/1/ROOT")
objW3SVC.Path = "d:\webs\test\"
objW3SVC.SetInfo
set objW3SVC = Nothing

if err.number<>0 then
 Response.Write ("Errore: " & err.description & " " & err.number)
else
 Response.write ("Tutto ok!")
end if

%>

Con qualche piccola modifica poi è possibile farne uno script WSH da poter lanciare direttamente da riga di comando.