Функция закачки файла по FTP протоколу используя Wininet

← →
Dr.Nemo (2005-08-30 15:05) [0]

Вот есть такой код //Функция закачки файла по FTP протоколу procedure FtpUploadFile(FtpHost, FtpUser, FtpPass, LocalFile, FtpFile: string); var hNet, hFTP: Pointer; begin hNet:=InternetOpen("Program_Name", 0, nil, nil, 0); hFTP:=InternetConnect(hNet, PChar(FtpHost), 21, PChar(FtpUser), PChar(FtpPass), 1, 0, 0); FtpPutFile(hFtp, Pchar(LocalFile), Pchar(FtpFile), 0, 0); InternetCloseHandle(hFTP); InternetCloseHandle(hNet); end;
как и где указать параметры подключения
begin ????????????? end;

← →
McSource (2005-08-30 16:22) [1]

Не парься! Возьми стандартный компонент TIdFTP, кажись вкладка Indy. Если нужен пример готового FTP-клиента пиши на scaint@mail.ru

← →
Dr.Nemo (2005-08-31 01:48) [2]

Спасибо обязательно напишу!

← →
dmitry501 © (2005-08-31 05:13) [3]

Dr.Nemo (30.08.05 15:05)
А что вызывает сложность? По-моему все понятно...
begin FtpUploadFile("ftp://ftp.microsoft.com", "anonymous", "login@microsoft.com", "c:\README.1ST", "/developr/fox/public/UPDATES/CURRENT/README.1ST"); end;

О спасибки большое щас попробую!!

Функция закачки файла по FTP протоколу используя Wininet Найти похожие ветки