Selecting iPhoto images

I’ve been looking for an example like the Mail program uses for adding iPhoto images but without luck.
Can anyone point me to example?

thanks
Martin

Check the MediaLibrary classes in MBS Plugin:
https://www.monkeybreadsoftware.net/topic-medialibrary.shtml

Thanks Christian

if not NSMediaLibraryBrowserControllerMBS.available then
MsgBox “Please run on Mac OS X 10.9.”
end if

dim c as NSMediaLibraryBrowserControllerMBS
c = NSMediaLibraryBrowserControllerMBS.sharedMediaLibraryBrowserController
c.mediaLibraries = c.NSMediaLibraryImage
'c.NSMediaLibraryAudio + c.NSMediaLibraryMovie
c.Visible = True