TAKE FILE FROM FTP — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м (→Текст) |
||
| (не показана одна промежуточная версия этого же участника) | |||
| Строка 2: | Строка 2: | ||
Прием файла с FTP сервера | Прием файла с FTP сервера | ||
[[TAKE_FILE_FROM_FTP]]() | [[TAKE_FILE_FROM_FTP]]() | ||
| + | = Текст = | ||
| + | local ftp, aa, path | ||
| + | |||
| + | path := 'c:\Test\_' | ||
| + | path := Nice_Path( path ) | ||
| + | |||
| + | try | ||
| + | ftp := FTPOPEN( host, 21, user, pass, ~PassiveMode := true ) | ||
| + | aa := FTPLIST( ftp ) | ||
| + | |||
| + | FTPGET( ftp, aa[1], path + aa[1] ) | ||
| + | |||
| + | finally | ||
| + | FTPCLOSE( ftp ) | ||
| + | end | ||
| + | |||
= Смотрите также = | = Смотрите также = | ||
[[Полезные функции]] | [[Полезные функции]] | ||
[[Функции Delphi]] | [[Функции Delphi]] | ||
Текущая версия на 11:40, 4 августа 2020
TAKE_FILE_FROM_FTP - это программа из справочника R266
Прием файла с FTP сервера
TAKE_FILE_FROM_FTP()
Текст
local ftp, aa, path path := 'c:\Test\_' path := Nice_Path( path ) try ftp := FTPOPEN( host, 21, user, pass, ~PassiveMode := true ) aa := FTPLIST( ftp ) FTPGET( ftp, aa[1], path + aa[1] ) finally FTPCLOSE( ftp ) end
