Автоматизация и боты

 Помощь      Поиск      Пользователи
Сайт Кибор     Программируемый кликер Кибор     Видео обучение     Заказать бот

 Страниц (3): [1] 2 3 »   

> Описание: внутри...
ivantu
Отправлено: 07 Июня, 2019 - 14:32:38
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 732
Дата рег-ции: Нояб. 2013  
Репутация: 14




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

Нашел только sendgetweb()
Но оно я так понял чтоб считывать текстовую информацию
 
 Top
Zireael
Отправлено: 07 Июня, 2019 - 14:50:01
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 4397
Дата рег-ции: Нояб. 2017  
Репутация: 580




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

 Цитата:
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);
 
 Top
ivantu
Отправлено: 07 Июня, 2019 - 15:14:51
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 732
Дата рег-ции: Нояб. 2013  
Репутация: 14




Почему то ничего не скачивает, кавычки не хватало
CODE:
string login=логин"; // исправить на свой

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

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

(Отредактировано автором: 07 Июня, 2019 - 15:16:06)

 
 Top
Dantes3000
Отправлено: 07 Июня, 2019 - 17:54:28
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 1465
Дата рег-ции: Июнь 2016  
Репутация: 58




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


В переменной file будет не 0, если скачалось удачно
 
 Top
ivantu
Отправлено: 07 Июня, 2019 - 19:41:05
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 732
Дата рег-ции: Нояб. 2013  
Репутация: 14




Благодарю.
 
 Top
ivantu
Отправлено: 07 Июня, 2019 - 22:03:49
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 732
Дата рег-ции: Нояб. 2013  
Репутация: 14




Друзья еще несколько вопросов, можно ли файлик отправить на фтп?
И может ли кибор к примеру извлекать zip?
 
 Top
Dantes3000
Отправлено: 08 Июня, 2019 - 01:01:56
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 1465
Дата рег-ции: Июнь 2016  
Репутация: 58




 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:\");
 
 Top
Zireael
Отправлено: 08 Июня, 2019 - 02:57:01
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 4397
Дата рег-ции: Нояб. 2017  
Репутация: 580




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

CODE:
system("C: & cd C:\Program Files (x86)\7-Zip & 7z x C:\test.zip -oC:\");
 
 Top
ivantu
Отправлено: 08 Июня, 2019 - 09:08:52
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 732
Дата рег-ции: Нояб. 2013  
Репутация: 14




А системным архиватором никак? Просто zip по умолчанию можно извлечь вшитым в системе функционалом.
 
 Top
ivantu
Отправлено: 10 Июня, 2019 - 09:36:26
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 732
Дата рег-ции: Нояб. 2013  
Репутация: 14




Друзья тема с файлами связана, не буду засорять форум, напишу тут,
Как удалить файлик нашел WINAPI - DeleteFile но как использовать пока не научился понимать справку docs.microsoft.com
И следом как его перименовать есть так же winAPI - MoveFile
 
 Top
Страниц (3): [1] 2 3 »
Сейчас эту тему просматривают: 1 (гостей: 1, зарегистрированных: 0)
« Вопросы и решение проблем »


Все гости форума могут просматривать этот раздел.
Только зарегистрированные пользователи могут создавать новые темы в этом разделе.
Только зарегистрированные пользователи могут отвечать на сообщения в этом разделе.
 




Powered by