Скачать: CL | DM;

Want a simple KOLFTP example   Найти похожие ветки 

← →
lundeholm   (2005-07-20 02:52) [0]

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?

---

← →
Dodfr   (2005-07-20 11:46) [1]

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

---

← →
lundeholm   (2005-07-20 14:26) [2]

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.

---

← →
Thaddy   (2005-07-20 14:46) [3]

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 21:01) [4]

Thaddy, your component worked fine. Thanks.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c