Кибор :: Версия для печати

1. ivantu - 07 Июня, 2019 - 06:32:38 - перейти к сообщению

Друзья подскажите пожалуйста как можно скачать файл, к примеру с своего фтп, и положить в папку с кибор?

Нашел только sendgetweb()
Но оно я так понял чтоб считывать текстовую информацию

2. Zireael - 07 Июня, 2019 - 06:50:01 - перейти к сообщению

Цитата:

как можно скачать файл, к примеру с своего фтп

Цитата:

external(INT, "InternetOpen", "InternetOpenA", "Wininet.dll" );
external(INT, "InternetCloseHandle", "InternetCloseHandle", "Wininet.dll" );
external(INT, "InternetConnect", "InternetConnectA", "Wininet.dll" );
external(INT, "FtpSetCurrentDirectory", "FtpSetCurrentDirectoryA", "Wininet.dll" );
external(INT, "FtpGetFile", "FtpGetFileA", "Wininet.dll" );

int open, _close, connect, file, catalog;

string ftp="zireael.zzz.com.ua"; // фтп, исправить на свой
string login=логин"; // исправить на свой
string pass="пароль"; // исправить на свой

open=InternetOpen("Microsoft Internet Explorer", 0, 0, 0, 0);
connect=InternetConnect(open, ftp, 21, login, pass, 1, 134217728, 0);
catalog=FtpSetCurrentDirectory(connect, ftp);
file=FtpGetFile(connect, "time.txt", "time.txt", 0, 0, 0); // скачать файл time.txt в папку с кибор
_close=InternetCloseHandle(connect);

3. ivantu - 07 Июня, 2019 - 07:14:51 - перейти к сообщению

Почему то ничего не скачивает, кавычки не хватало

CODE:

string login=логин"; // исправить на свой

Но все же так и не скачивает, права доступа у файла 644, пробовал 777, как бы должен качать.
(Добавление)
P/S Папробовал другой хостинг все нормально качает, спасибо!

А можно как то проверить что файл скачался, есть какие нить команды для этого?

4. Dantes3000 - 07 Июня, 2019 - 09:54:28 - перейти к сообщению

ivantu пишет:

А можно как то проверить что файл скачался, есть какие нить команды для этого?

В переменной file будет не 0, если скачалось удачно

5. ivantu - 07 Июня, 2019 - 11:41:05 - перейти к сообщению

Благодарю.

6. ivantu - 07 Июня, 2019 - 14:03:49 - перейти к сообщению

Друзья еще несколько вопросов, можно ли файлик отправить на фтп?
И может ли кибор к примеру извлекать zip?

7. Dantes3000 - 07 Июня, 2019 - 17:01:56 - перейти к сообщению

ivantu пишет:

Друзья еще несколько вопросов, можно ли файлик отправить на фтп?

заменить все слова Get на Put и удалить один нолик из предпоследней строчки
(Добавление)

ivantu пишет:

И может ли кибор к примеру извлекать zip?

Установить 7zip надо. И через командную строку разархивировать.

Сначала cd C:\Program Files\7-Zip
потом 7z x d:\sn.zip -od:\

первый путь это какой файл, второй - куда.

Вот только через кибор почему-то не хочет работать

CODE:

system("cd C:\Program Files\7-Zip | 7z x d:\sn.zip -od:\");

8. Zireael - 07 Июня, 2019 - 18:57:01 - перейти к сообщению

Цитата:

Вот только через кибор почему-то не хочет работать

CODE:

system("C: & cd C:\Program Files (x86)\7-Zip & 7z x C:\test.zip -oC:\");

9. ivantu - 08 Июня, 2019 - 01:08:52 - перейти к сообщению

А системным архиватором никак? Просто zip по умолчанию можно извлечь вшитым в системе функционалом.

10. ivantu - 10 Июня, 2019 - 01:36:26 - перейти к сообщению

Друзья тема с файлами связана, не буду засорять форум, напишу тут,
Как удалить файлик нашел WINAPI - DeleteFile но как использовать пока не научился понимать справку docs.microsoft.com
И следом как его перименовать есть так же winAPI - MoveFile