Форум » [x]Harbour » Может есть готовая функция (список файлов с FTP каталога )? » Ответить
Может есть готовая функция (список файлов с FTP каталога )?
Softlog86: Может есть готовая функция (список файлов с FTP каталога )? Имеем путь к определенной папке на FTP-сервере . Нужно получить список файлов в ней с датами 'рождения' . В примерах на MiniGUI - - ошибка в представлении именно дат ... - выдаёт , например , декабрь 2014 .... :(
Ответов - 12
Dima: Softlog86 Вопрос не очень понятен. Лист получаем с помощью ListFiles а дальше разбирай массив.
Softlog86: Уточнение : По некоторым файлам выдаёт время вместо года .....: -rw-r--r-- 1 zipdata xxxxxxx 3091 Nov 26 12:00 017741.jpg <- НЕ ПРАВИЛЬНО!!! Вместо года - возвращает ВРЕМЯ -rw-r--r-- 1 zipdata xxxxxxx 10125 Nov 29 13:32 019151.jpg <- НЕ ПРАВИЛЬНО!!! Вместо года - возвращает ВРЕМЯ -rw-r--r-- 1 zipdata xxxxxxx 27953 Sep 25 07:46 110158.jpg <- НЕ ПРАВИЛЬНО!!! Вместо года - возвращает ВРЕМЯ -rw-r--r-- 1 zipdata xxxxxxx 21841 Feb 20 2013 110256.jpg <- ПРАВИЛЬНО ВОЗВРАЩАЕТ - ДАТА + ФАЙЛ -rw-r--r-- 1 zipdata xxxxxxx 25017 Feb 20 2013 110260.jpg <- ПРАВИЛЬНО ВОЗВРАЩАЕТ - ДАТА + ФАЙЛ
Dima: Softlog86 пишет: Уточнение : По некоторым файлам выдаёт время вместо года .....: Какими средствами получена данная инфа ? Если средствами ListFiles получить массив и вывести инфу по файлам то все правильно ?
Softlog86: ctext := oClient:List() (TIP) . Конечно можно отказаться и использовать то что правильно работает ... Где про ListFiles прочитать (или пример синтаксиса) ?
Dima: Softlog86 harbour-trunk\harbour\contrib\hbtip\ftpcli.prg Пример aftp:=oFtp:ListFiles("*.zip")
Softlog86: К сожалению - :ListFiles('*.jpg') на некоторые файлы приходит дата неверная ( 12.10.2014 ) <--- дожить ещё нужно до неё :) если зайти на FTP через FAR - ДАТЫ отображает правильно . Что делать уже и не знаю ....
Dima: вероятно нужно разбирать METHOD listFiles и тестить что он там не так делает или юзать другую библу , например Hbcurl
Dima: глянь темку может поможет http://forums.fivetechsupport.com/viewtopic.php?f=6&t=27432&p=152864
Softlog86: Там в исходниках такой вариант и прописан // year DO WHILE SubStr( cEntry, ++nStart, 1 ) == " " ENDDO nEnd := hb_At( " ", cEntry, nStart ) cYear := SubStr( cEntry, nStart, nEnd - nStart ) nStart := nEnd IF ":" $ cYear <------- Если получен ГОД неверно cTime := cYear cYear := Str( Year( Date() ), 4, 0 ) <---- Подставляет ГОД из ТЕКУЩЕЙ ДАТЫ .... , хотя логичнее вычитать 12 месяцев от этой даты . ELSE cTime := "" ENDIF
Softlog86: Нужно как-то сообщить разработчикам чтоб исправили в коде ...
Dima: Softlog86 пишет: хотя логичнее вычитать 12 месяцев от этой даты Логики в этом что то не увидел
Softlog86: Я сравнил как представлены даты файлов на FTP - и получилось что ошибка ровно в год :)
полная версия страницы