I found this code somewhere on this forum a few years ago. and it seems to work just fine
Public Sub Show_in_Finder(f as FolderItem) Dim a As AppleEvent = New AppleEvent("misc", "slct", "com.apple.finder") a.FolderItemParam("----") = f If a.send Then a = New AppleEvent("misc", "actv", "com.apple.finder") If a.send Then End If End If End Sub
But am I correct that this is NOT acceptable to the AppStore?
Also I need a similar routine to implement the QuickLook function (assuming it is not code inside Xcode which is where I saw it)