FTP and Inet control, multiple files same dir

[dj4]

Put your file example ListBox and get here file what you want to send.

Something like this:

Dim SendFile as String
Dim Count as Integer

Count = List1.ListCount

SendFile = List1.Text

Do

Inet1.Execute , "PUT " & SendFile & " " & SendFile
Do
DoEvents
Loop While Inet1.StillExecuting

Loop Until Count < 0


Or look here:
http://www.vbsquare.com/internet/inet1
http://www.vbsquare.com/internet/inet2
http://www.vbsquare.com/internet/inet3

-Dj4