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

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

Копирование методами Windows с ftp

SamProf ©   (2006-06-19 14:52:00) 

Существует функция копирования файлов методами Windows на компе:

function WindowsCopyFile(FromFile, ToDir : string) : boolean;
var F : TShFileOpStruct;
begin
 F.Wnd := 0; F.wFunc := FO_COPY;
 FromFile:=FromFile+#0; F.pFrom:=pchar(FromFile);
 ToDir:=ToDir+#0; F.pTo:=pchar(ToDir);
 F.fFlags := FOF_ALLOWUNDO or FOF_NOCONFIRMATION;
 result:=ShFileOperation(F) = 0;
end;

Есть ли возможность вызвать стандартное копирование windows, но с ftp!?

---

palva   (2006-06-21 10:36:00) [1]

Методами Windows? Тогда можно разгрузить файл с ftp так:
{$APPTYPE CONSOLE}
function URLDownloadToFile(
 pCaller: Longword;
 szURL: PChar;
 szFileName: PChar;
 dwReserved: Longword;
 lpfnCB: Longword
): Longword; StdCall; external 'urlmon.dll' name 'URLDownloadToFileA';

var
 ret:Longword;
begin
 ret := URLDownloadToFile(0,
   ' ftp://login:password@ftp.narod.ru/filename.jpg', 'logo.jpg', 0, 0);
 if ret<> 0 then
   WriteLn('Error')
 else
   WriteLn('OK');
end.


---

Дмитрий Белькевич   (2006-06-21 01:10:00) [2]

wininet крайне не рекомендую. за ics не скажу - не работал. работаю с indy девяткой, всё замечательно работает. саму винду не рекомендую по той же причине, так как через wininet и работает.
причина очень простая: на разных машинах установлен разный explorer, а wininet растёт именно из него. получается такая беда: ftp везде немного разный, какие-то эксплореры работают с одними ftp, но не работают с другими и наоборот, короче, посде третьего эксплорера, под который пришлось подстраиваться, я плюнул на это всё счастье мелкософтовское и переписал всё на indy, что бы уже точно ни от чего не зависеть. С тех пор проблем не было.

---

SamProf   (2006-06-20 13:24:00) [3]

мне нада, что файл скачала сама винда, т.е появилось стандартное окошко копирования файла и винда преспокойно сама скачала файлик!

---

Pavia   (2006-06-20 00:40:00) [4]

uses WinInet;

---

Dmitrij_K   (2006-06-19 19:25:00) [5]

http://www.google.com/search?ie=UTF-8&hl=ru&q=%69%63%73%20%64%65%6C%70%68%69

---

Dmitrij_K   (2006-06-19 19:14:00) [6]

internet component сьют

---

SamProf   (2006-06-19 18:17:00) [7]

Что такое ICS?

---

TUser   (2006-06-19 18:11:00) [8]

> Есть ли возможность вызвать стандартное копирование windows, но с ftp!?

Использовать стандартную программу ftp. Имхо - проще использовать ICS.

---

Наверх