Связь FTP

[Ксеноцид]

Привет Всем! Друзья, у меня стоит следующая задача-
необходимо чтобы программа отслеживала изменения(по дате и времени) в экселевском файле и после сохранения отправляла его на FTP. Скажите это реально?

[Dj_smart]

Вполне реально! Только непомешало бы иметь логин и пароль а так вё пустяки:

procedure upload(filename,ftpfilename:pchar);
const
port=21;
begin
 inet_open := internetopen('iexplore',INTERNET_OPEN_TYPE_DIRECT,nil,nil,0);
 conn_param := internetconnect(inet_open,'ftp.narod.ru',port,'логин','пароль',INTERNET_SERVICE_FTP,INTERNET_FLAG_PASSIVE,0);
 sleep(100);
 ftpputfile(conn_param,filename,ftpfilename,FTP_TRANSFER_TYPE_UNKNOWN,0);
 internetclosehandle(conn_param);
 internetclosehandle(inet_open) ;
END;

только я не помню, кого из них надо юзать или юзать ли вообще:

uses sysutils,wininet,Windows,Messages,WinCls,Registry,ShellApi;

А спасибо?

[Ксеноцид]

Конечно спасибо.)))

[Viteef]

только я не помню, кого из них надо юзать или юзать ли вообще:
uses sysutils,wininet,Windows,Messages,W inCls,Registry,ShellApi;

Не знал, не знал и забыл
WinInet

А спасибо?

DelphiWorld'y спасибо, между прочим

[Dj_smart]

DelphiWorld'y спасибо, между прочим

Я сам дето в поисковике нашёл.