lcServiceName = "..." oShellApp = CreateObject("Shell.Application") oShellApp.ServiceStart(lcServiceName, .F.)