loFso = CreateObject("Scripting.FileSystemObject") TRY loFolder = loFso.Getfolder(tcDirectory) loFolder.Delete() llOK = .T. CATCH llOK = .F. ENDTRY