FTP-клиент
Обзор
Этот код написан как класс Visual Foxpro. FTP Class предоставляет набор функций, которые позволяют вам работать с FTP-серверами. Для его работы необходима библиотека wininet.dll, которая поставляется с IE 4.0 и выше.
Как работает
Для работы с классом вам нужно подключить к вашей программе FTP.PRG:
Set Procedure To ftp.prg Additive
Следующая строка создаст экземпляр класса:
sz_ftp = createobject('ftp_service')
Теперь использовать класс вы можете через переменную sz_ftp
Пример открытия соединения с FTP-сервром:
sz_ftp.OpenInternet("user", "password", "ftpaddress", "port")
Обычно во всех FTP-серверах испольузется порт 21.
Команды для работы
Здесь приведены лишь основные команды, доступные в этом классе. Хотя скорее всего этими командами вы и ограничитесь в своей работе. Тем не менее остальные - приведены в прилагаемом doc-файле в архиве.
OpenInternet ( Установить соединение с сервером)
Синтаксис:
OpenInternet (
char UserName,
char UserPassword,
char FTP Address,
char FTP Port
)
Параметры:
UserName - имя пользователя (ANONYMOUS на общедоступные сервера)
UserPassword - пароль
FTP Address - адрес FTP-сервера
FTP Port - порт FTP-сервера (обычно 21)
Возвращаемое значение:
Возвращаемое значение .T. , если функция успешно соеденилась с сервером, иначе .F.
CloseInternet (закрыть соединение)
Синтаксис:
CloseInternet ( )
Параметры:
None
Возвращаемое значение:
Nothing
GetFtpFile (скачать файл)
Синтаксис:
GetFtpFile (
char RemoteFile,
char LocalFile,
logical FailifExist
)
Параметры:
RemoteFile - имя и путь файла на FTP-сервере для скачивания с него.
LocalFile - имя и путь файла на локальном компьютере
FailifExist - .T. прекращения скачивания, если файл с таким именем уже есть на локальном компьютере, .F. - перезаписать файл
Возвращаемое значение:
Возвращаемое значение .T. если успешно скачано
Возвращаемое значение .F. если ошикбка
PutFtpFile (закачать файл на FTP-сервер)
Синтаксис:
PutFtpFile (
char RemoteFile,
char LocalFile
)
Параметры:
RemoteFile - путь и имя файла на FTP-сервере
LocalFile - локальное имя файла
Возвращаемое значение:
Возвращаемое значение .T. если успешно
Возвращаемое значение .F. если неуспешно
DeleteFtpFile (удалить файл)
Синтаксис:
DeleteFtpFile (
Char RemoteFile
)
Параметры:
RemoteFile - имя и путь файла на FTP-сервере
Возвращаемое значение:
Возвращаемое значение .T. если файл удален
Возвращаемое значение .F. если не удален
RenameFtpFile (переименовать файл)
Синтаксис:
RenameFtpFile (
char OldName,
char NewName
)
Параметры:
OldName - текущее имя файла
NewName - новое имя файла
Возвращаемое значение:
Возвращаемое значение .T. если успешно
Возвращаемое значение .F. если неуспешно
CreateFtpDirectory (создать директорию)
Синтаксис:
CreateFtpDirectory (
char Directory
)
Параметры:
Directory - имя директории
Возвращаемое значение:
Возвращаемое значение .T.если успешно
Возвращаемое значение .F. если неуспешно
RemoveFtpDirectory (удалить директорию)
Синтаксис:
RemoveFtpDirectory (
char Directory
)
Параметры:
Directory - имя директории
Возвращаемое значение:
Возвращаемое значение .T. если успешно
Возвращаемое значение .F. если неуспешно
ChangeFtpDirectory (сменить текущую директорию)
Синтаксис:
ChangeFtpDirectory (
char Path
)
Параметры:
Path - путь
Возвращаемое значение:
Возвращаемое значение .T. если успешно
Возвращаемое значение .F. если неуспешно
Автор публикации
Вложенные файлы
# |
Название |
Тип файла |
Размер |
|---|---|---|---|
| 1 | ftp_class | .zip | 21,40 КБ |