>Try
>
>myvar = getfile()
>
>right(myvar,len(myvar)-atc('.',myvar)) && displays the extension
>left(myvar,atc('.',myvar)-1) && displays the filename

The functions listed won't work reliably with long file names, which can contain more than one '.' (ie the completely legal file name my.file.name) or contain no '.' (ie myfilename)