John,

>ApprDir = sys(5) + curdir()
>Tempdir = sys(2023)
>cd (TempDir)
>FileCnt =adir(Temps)
>on error X = .T.

>for Ctr = 1 to FileCnt
>erase (Temps[Ctr, 1])
>endfor

>cd (AppDir)

>The "on error" line is just to prevent the display of errors if a file is in use. This >code does not work. I am always left in the temp folder not the application folder.

Could that be because your application directory is ApprDir in the first line and AppDir in the last line?

David