Try

myvar = getfile()

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