You can use the AppGetStatus method of the IIsWebDirectory object to retrieve the current status of a Web application.
vReturn = IIsWebDirectory.AppGetStatus
APPSTATUS_NOTDEFINED | No application is defined at the specified path. |
APPSTATUS_RUNNING | The application is running. |
APPSTATUS_STOPPED | The application is not running. |
<% Dim DirObj, vStatus Set DirObj = GetObject("IIS://LocalHost/W3SVC/1/ROOT/MyAppDir") ' Get the status of the application vReturn = DirObj.AppGetStatus %>
AppCreate, AppDelete, AppDeleteRecursive, AppUnload, AppUnloadRecursive, AppDisable, AppDisableRecursive, AppEnable, AppEnableRecursive