You can use the AppEnableRecursive method of the IIsWebDirectory 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.
IIsWebDirectory.AppEnableRecursive
<% Dim DirObj Set DirObj = GetObject("IIS://LocalHost/W3SVC/1/ROOT/MyAppDir") ' Enable the application at this directory ' and at all subordinate directories DirObj.AppEnableRecursive %>
AppCreate, AppDelete, AppDeleteRecursive, AppUnload, AppUnloadRecursive, AppGetStatus, AppDisable, AppDisableRecursive, AppEnable