SEND FILE TO FTP SRG — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м (Текст)
м
 
(не показаны 2 промежуточные версии этого же участника)
Строка 1: Строка 1:
 
[[SEND_FILE_TO_FTP_SRG]] - это программа из справочника [[R266]]
 
[[SEND_FILE_TO_FTP_SRG]] - это программа из справочника [[R266]]
 
 
  Отправка файла на FTP сервер для [[SRG]]
 
  Отправка файла на FTP сервер для [[SRG]]
 
+
[[SEND_FILE_TO_FTP_SRG]]()
 
= Текст =
 
= Текст =
 
  local ftp, path, name
 
  local ftp, path, name
Строка 11: Строка 10:
 
   
 
   
 
  try
 
  try
   ftp := [[FTPOPEN]]( 'host', '21', , )
+
   ftp := [[FTPOPEN]]( 'host', '21', , <span style="color:#0000FF">~PassiveMode := true</span> )
 
   [[FtpPut]]( ftp, path + name,, name )
 
   [[FtpPut]]( ftp, path + name,, name )
 
   [[Message]]( 'ok' )
 
   [[Message]]( 'ok' )
Строка 22: Строка 21:
  
 
[[Функции Delphi]]
 
[[Функции Delphi]]
 +
 +
[[FTPPUT]]

Текущая версия на 11:22, 31 августа 2017

SEND_FILE_TO_FTP_SRG - это программа из справочника R266

Отправка файла на FTP сервер для SRG

SEND_FILE_TO_FTP_SRG()

Текст

local ftp, path, name

path := 'c:\Test\_\'
path := Nice_Path( path )
name := '1.txt'

try
  ftp := FTPOPEN( 'host', '21', , ~PassiveMode := true )
  FtpPut( ftp, path + name,, name )
  Message( 'ok' )
finally
  FTPCLOSE( ftp )
end

Смотрите также

Полезные функции

Функции Delphi

FTPPUT