1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

Ftp Dll

Discussão em 'Programação' iniciada por Delta, 20 de Novembro de 2004. (Respostas: 0; Visualizações: 537)

  1. Delta

    Delta Suspenso

    queria que fizessem um teste a esta DLL, usa uma API do Windows mas desconheço se ela é produto da instalação do Visual Studio ou se é standard do próprio Windows.

    Faz upload ou download de endereços remotos (seja máquinas UNIX ou servidores FTP)

    Endereço de download :

    http://pwp.netcabo.pt/falmartins/ftp.dll

    ######################################
    Modo de usar em sites FTP
    ######################################

    Sub testes()
    Dim ftp As New oftp

    Status = ftp.FTP_UPLOAD("pwp.netcabo.pt", "", "falmartins", "mypassword", "c:\aaaa\ftp.dll")

    Status = ftp.FTP_DOWNLOAD("pwp.netcabo.pt", "falmartins", "mypassword", "", "c:\xpto_20", "conversion.dll")

    Debug.Print Status
    End Sub

    ===========
    SINTAXE UPLOAD
    ===========

    FTP_UPLOAD(URL/IP, REMOTE PATH, USER, PASSWORD,LOCAL_FILE_TO_UPLOAD)

    Return Status String da Operação

    ===========
    SINTAXE DOWNLOAD
    ===========

    FTP_DOWNLOAD(URL/IP, USER,PASSWORD,REMOTE PATH, LOCAL PATH, REMOTE_FILE_TO_DOWNLOAD)

    Return Status String da Operação

    ================================
    Exemplo de upload de um servidor UNIX do meu local de trabalho
    ================================

    FTP_UPLOAD("160.3.0.4","/u02/cendir/adhoc", "v0efalm","v0efalm","c:\ftp.dll")

    FTP_DOWNLOAD("160.3.0.4", "v0efalm","v0efalm","/u02/cendir/adhoc","c:\","ficheiro.txt")

    ================================

    Compatível com todas as aplicações de ambiente Windows


    Digam alguma coisa
     
    Última edição: 20 de Novembro de 2004

Partilhar esta Página