Показать сообщение отдельно
  #5  
Старый 30.01.2011, 16:12
Fazotron Fazotron вне форума
Прохожий
 
Регистрация: 26.10.2009
Сообщения: 38
Репутация: 10
По умолчанию

Цитата:
Сообщение от Страдалецъ
Вкладка Indy вас наверное устроит
ага, спасибо.
только я решил лучше использовать ics
написал вот такой код:

Код:
    FtpClient1.UserName:='mylogin'; 
    FtpClient1.PassWord:='test'; 
    FtpClient1.HostName:='ololo.com'; 
    FtpClient1.Passive := True; 
    FtpClient1.LocalFileName:='.\myfile.txt'; 
    FtpClient1.HostDirName:='/'; 
    FtpClient1.HostFileName := FtpClient1.LocalFileName; 
    try 
        FtpClient1.Connect; 
        FTPClient1.Binary := True; 
        FtpClient1.Put; 
        FtpClient1.Quit; 
    except 
        ShowMessage('Error uploading to FTP'); 
    end; 

выдает ошибку:


что не так?
Ответить с цитированием