Dim AppPoolName AppPoolName = "NOM_DE_MON_POOL_D_APPLICATION" Set AppPool = GetObject("IIS://localhost/W3SVC/AppPools/" & AppPoolName) AppPool.Recycle()