Сохранение файла по Ftp

[Klim Bassenger]

Необходимо периодически сохранять и получать файл по FTP...На форуме есть решение от EducatedFool, но мне оно не подходит по причине того, что у меня соединение идет через прокси сервер...
На просторах интернета нашел вот такой код для контрола Inet. Но он почему-то не работает... Пишет "Unable to connect to remote host"


Private Sub CommandButton1_Click()
Inet1.AccessType = icNamedProxy
Inet1.Proxy = "10.10.10.10:8021"
Inet1.URL = "ftp://100.100.100.100"
Inet1.UserName = "FTPUser"
Inet1.Password = "Jfakkk"

Inet1.RequestTimeout = 40
Inet1.Execute , "PUT c:\SendFile.txt SendFile.txt"
Do While Inet1.StillExecuting
DoEvents
Loop
Inet1.Execute , "CLOSE"
MsgBox ("Update Completed")
End Sub

(Proxy и URL я ставил как в Total Commandere)

[legion-mia]

Никто подобную проблему не решал?
просто сейчас тоже столкнулся с тем что мне нужно чтобы файлик на фтп сохранялся...
перегуглил уже кучу вариантов и не один мне не помог...
видимо не понимаю чего.
Есть у кого рабочий вариант кода?