Função: FTPErase - Apaga arquivo no diretório
Versões: | Advanced Protheus 5.07 , Advanced Protheus 5.08 , Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Nível de Acesso: | Nível 1 (Acesso Clientes) |
Idiomas: | Espanhol , Inglês |
Descrição:
Apaga arquivo no servidor FTP.
A função FTPErase() apaga arquivo no diretório corrente do FTP.
Programa Fonte:
AP5FTP.PRW
Sintaxe:
FTPErase - Apaga arquivo no diretório ( cFILEFTP ) --> lSuccess
Retorno:
-
lSuccess(logico)
- Retorna se a operação foi efetuada com sucesso
Observações
Retorno
lSucess
Se a operação for realizada com sucesso a função retornará verdadeiro (.T.).
Exemplos
Para que o exemplo abaixo funcione, é necessário que seu computador tenha sido configurado como um servidor ftp.#INCLUDE "protheus.ch"#DEFINE DEFAULT_FTP 21 #DEFINE PATH "\teste\"Function TestFTP() Local aRetDir := {} //Tenta se conectar ao servidor ftp em localhost na porta 21 //com usuário e senha anônimos if !FTPCONNECT( "localhost" , 21 ,"Anonymous", "[email protected]" ) conout( "Nao foi possivel se conectar!!" ) Return NIL EndIf //Retorna apenas os arquivos contidos no local aRetDir := FTPDIRECTORY( "*.*" , ) //Retorna os diretórios e arquivos contidos no local //aRetDir := FTPDIRECTORY( "*.*" , "D") //Verifica se o array está vazio If Empty( aRetDir ) conout( "Array Vazio!!" ) Return NIL EndIf //Tenta excluir o arquivo do diretório do FTP. if !FTPERASE( aRetDir[1][1] ) conout( "Nao foi possivel excluir o arquivo!!" ) Return NIL EndIfReturn NIL
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
cFILEFTP | Caracter | Nome do arquivo | X |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas