Here is an example of how to make an FTP using Inet: InetFTP

And to download the whole list, you'll have to make your own, because that's not included. Probably something like:

Code:
On Error Resume Next
For i = 0 to List1.ListCount
Call CmdDownload_Click 'download button
List1.ListIndex = List1.ListIndex + 1
DoEvents
Next i