You can use the AppEnableRecursive method of the IIsWebVirtualDir object to reinstate Web application definitions that were previously disabled with the AppDisableRecursive method. If the applications specified were not previously deleted, they will be reregistered with MTS.
IIsWebVirtualDir.AppEnableRecursive
<%
Dim VDirObj
Set VDirObj = GetObject("IIS://LocalHost/W3SVC/1/ROOT/MyAppVDir")
' Enable the application at this directory
' and at all subordinate directories
VDirObj.AppEnableRecursive
%>
AppCreate, AppDelete, AppDeleteRecursive, AppUnload, AppUnloadRecursive, AppGetStatus, AppDisable, AppDisableRecursive, AppEnable