File Naming

[David Thompson]

>The drawback is
>that the file will have to open twice, unless it is being opened by
>another database that uses OpenAs to name it with the short name.

It just occurred to me, that the file wouldn't have to have any 
windows the first time it opened. You could save the file to open 
without windows, and have the .Initialize open one of the forms on 
the second open. It would look something like this.

If  info("DatabaseName") contains "#"
Local FilePath, FileName
      FilePath =  folderpath(folder(""))
      FileName =  info("DatabaseName")
      CloseFile
      OpenAs "Your Short Name"
      OpenFile FilePath + FileName
      Rtn
Endif

SetWindow 50,50,500,600,""
OpenForm "Your Initial Form"

/* The rest of the .Initialize goes here */

Dave