The Net 1.2 library seems to have what you need to test:
Dim f As FTP
f.Initialize("YourEventToHandleCompleted","ftp.something.com",21,User,Pass)
f.PassiveMode = True
f.DownloadFile("ServerFilePath",TrueIfItsATextFile,LocalFolder,LocalFileName)
DownloadCompleted (ServerPath As String, Success As Boolean)
DownloadProgress (ServerPath As String, TotalDownloaded As Long, Total As Long)
UploadCompleted (ServerPath As String, Success As Boolean)
UploadProgress (ServerPath As String, TotalUploaded As Long, Total As Long)
DeleteCompleted (ServerPath As String, Success As Boolean)
CommandCompleted (Command As String, Success As Boolean, ReplyCode As Int, ReplyString As String)
ListCompleted (ServerPath As String, Success As Boolean, Folders() As FTPEntry, Files() As FTPEntry)