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