| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Want a simple KOLFTP example [Delphi]

lundeholm ©   (2005-07-20 02:52:00) 

Hi!

I tried KolFTP today. I couldn't get it to work. This is my code:


program Project2;

{$APPTYPE CONSOLE}

uses
 kol,kolftp,windows;

var FTP:TKOLFTP;
begin
 FTP:= NewKOLFtpClient;

 FTP.HostAddr:='ftp.home.no';
 FTP.UserName:='filipsprogram';
 FTP.UserPass:='password';

 FTP.Connect;
 FTP.Login;

 FTP.Put('c:\arrow.bmp');

 FTP.Close;
 FTP.Free

end.


I want to upload c:\arrow.bmp but this fails. What am I doing wrong?

---

lundeholm   (2005-07-20 21:01:00) [1]

Thaddy, your component worked fine. Thanks.

---

Thaddy   (2005-07-20 14:46:00) [2]

You could try and use my kolsimpleftp with the INTERNET_MODE_PASSIVE flag in the internetconnect call.
kolsimpleftp uses the wininet api, just like ftp.exe that comes with the operating system.

---

lundeholm   (2005-07-20 14:26:00) [3]

Thanks for your reply Dodfr.

My firewall pops up when executing the program but I click "Yes, allow this connection" in the box, so that should not be the problem. I don't know much about this stuff, so my guess is that my code is wrong. I tried changing to passive mode, but it didn't work.

---

Dodfr   (2005-07-20 11:46:00) [4]

are you NATed behind a proxy/firewall ? if yes, you cannot do FTP wihtout PASSIVE mode.

---

Наверх