« Accessing Microsoft S… | Home | Map of blog readers »

Tip of the day: How to launch Disc Utility?

You can use this code:
  Sub Open()
dim f as FolderItem = LaunchServicesFindApplicationForInfoMBS("","com.apple.DiskUtility","")

if f<>Nil then
f.Launch
end if
End Sub
By bundle ID you can launch all applications on Mac. Even if the user moved or renamed them. Used tags:
30 08 10 - 11:46