Excel VBA FTP
 

I've tried several .bat examples and the MS INET for doing an FTP transfer
using Excel VBA and so far none of them work. Does anyone have a code
snippet? The simpler the better:)

Thanks,

Excel VBA FTP
 

"DownThePaint" wrote in message
...
I've tried several .bat examples and the MS INET for doing an FTP transfer
using Excel VBA and so far none of them work. Does anyone have a code
snippet? The simpler the better:)

Thanks,

Dim inet1 As InetCtlsObjects.inet

Set inet1 = New InetCtlsObjects.inet
With inet1
.Protocol = icFTP
.URL = "ftp://ftp.private.com"
.UserName = "George Washington"
.Password = "no_lies"
.Execute , "CD gifs\thegifs"
.Execute , "PUT C:\source.txt target.txt"
.Execute , "CLOSE"
End With

Set inet1 = Nothing

That's an example from MSDN VB5, it works for me in Excel.

--
roger