LOCAL oCat as "comadmin.comadmincatalog" >oCat = createobjectex("comadmin.comadmincatalog",'','') >ocat.GetCollection("Applications") >oapps=ocat.GetCollection("Applications") >oapps.populate() >LOCAL myapp >FOR EACH app IN oapps > IF app.Name = "DevCon" > myapp = app > Endif >Endfor >myapp.Value("IsEnabled") = .f. > >*-- Do what you need to do here > >myapp.Value("IsEnabled") = .t.