You can use the AppGetStatus method of the IIsWebVirtualDir object to retrieve the current status of a Web application.
vReturn = IIsWebVirtualDir.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 VDirObj, vStatus
Set VDirObj = GetObject("IIS://LocalHost/W3SVC/1/ROOT/MyAppVDir")
' Get the status of the application
vReturn = VDirObj.AppGetStatus
%>
AppCreate, AppDelete, AppDeleteRecursive, AppUnload, AppUnloadRecursive, AppDisable, AppDisableRecursive, AppEnable, AppEnableRecursive