Versões: | Advanced Protheus 5.07 , Advanced Protheus 5.08 , Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 |
Nível de Acesso: | Nível 1 (Acesso Clientes) |
Idiomas: | Espanhol , Inglês |
Fecha a conexão atual.
AP5FTP.PRW
FTPDisconnect - Fechamento da conexão atual ( ) --> lSuccess
A função FTPDisconnect() retornará verdadeiro (.T.) se a operação for realizada com sucesso. Se não existir uma conexão a função retornará falso(.F.).
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 desconectar do servidor ftp FTPDISCONNECT()Return NIL