DirRemove

DirRemove ( < cDiretorio> ) --> lRet

lRet(array_of_record)
• Retorna, verdadeiro (.T.), se o diretório for eliminado com sucesso; caso contrário, falso (.F.). Observação: Quando a função retorna falso (.F.), é possível obter mais detalhes da ocorrência, recuperando o código de erro, através da função FError().

• Caso seja especificado um path sem a unidade de disco, o mesmo será considerado no ambiente do servidor, a partir do RootPath do ambiente (caso o path comece com \), ou a partir do diretório corrente (caso o path não seja iniciado com \).
• Quando o path absoluto é especificado (com unidade de disco preenchida), a função será executada na estação em que o Smart Client está em execução.
• Ao executar essa função em JOB (processo isolado do servidor, sem interface), não é possível especificar um Path absoluto de disco. Caso isso seja realizado, o retorno da função será .F. e a função FError() retornará -1 (Syntax Error).
• Para remover o diretório, é necessário ter permissão correspondente (incluir, alterar e excluir) e que o mesmo esteja vazio; ou seja, sem subdiretórios ou arquivos.

cDelPath := 'c:\TmpFiles'lRemoveOk := DIRREMOVE(cDelPath)IF !lRemoveOk      MsgStop('Falha ao remover a pasta ')Else      MsgStop('Pasta '+cDelPath+' removida com sucesso.')Endif