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>

Reply via email to