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.