>Dear Sir,
>
>I load my PJX file from this location
>D:\Projects\vfp\office\accounts
>
>[pre]
>lcFullPath=FULLPATH(CURDIR()) && D:\Projects\vfp\office\accounts
>LastFolder = substr(m.lcFullPath, rat('\', m.lcFullPath) + 1)
>?LastFolder
>[/pre]
>
>The above codes display noting
>
>Please help again

That is another thing then since

lcFullPath=FULLPATH(CURDIR()) is NOT "D:\Projects\vfp\office\accounts" but "D:\Projects\vfp\office\accounts\" (Notice the last backslash)


lcFullPath = FULLPATH(CURDIR())
lcFullpath = Left(lcFullpath, Len(lcFullPath) - 1)
lcLastFolder = Justfname(lcFullpath)


Carlos