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