Função: FTPUpload - Copia arquivo da máquina local p/ 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:
Copia um arquivo da máquina local para o servidor FTP.
A função FTPUpload() copia um arquivo da máquina local para o diretório corrente no servidor FTP.
O arquivo a ser copiado deve estar abaixo do RootPath do Protheus.
Programa Fonte:
AP5FTP.PRW
Sintaxe:
FTPUpload - Copia arquivo da máquina local p/ diretório ( cFILELOCALcFILEFTP ) --> lSuccess
Retorno:
-
lSuccess(logico)
- Retorna se o upload foi efetuado 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 //Tenta realizar o upload de um item qualquer no array //Armazena no local indicado pela constante PATH if !FTPUPLOAD( PATH, aRetDir[1][1] ) conout( "Nao foi possivel realizar o upload!!" ) Return NIL EndIf //Tenta desconectar do servidor ftp FTPDISCONNECT()Return NIL
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| cFILELOCAL | Caracter | Caminho e nome do arquivo na máquina a ser copiado para o servidor FTP | X | ||||||||||||||
| cFILEFTP | Caracter | Caminho e nome do arquivo no servidor FTP onde será copiado. | X |