This is driving me batty...
Here's the code:
Dim AppTypes as New FileType
AppTypes.Name="Application Types"
AppTypes.Extensions=".app"
Dim f as FolderItem = GetOpenFolderItem(AppTypes)
if f <> Nil then
MsgBox f.AbsolutePath
end if
All I want to be selectable in the dialog box is applications, but
with above code, everything is selectable.
What am I missing?
Jeff J.
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>