List Applications in an Application Pool

Returns a list of all the applications in the MSSharePointAppPool application pool.

VBScript Code


strComputer = "LocalHost"
Set objIIS = GetObject _
    ("IIS://" & strComputer & "/W3SVC/AppPools/MSSharePointAppPool")
arrApps = objIIS.EnumAppsInPool
 
For i = 0 to Ubound(arrApps)
    Wscript.Echo arrApps(i)
Next