mirror of
https://github.com/Bayselonarrend/OpenIntegrations.git
synced 2025-02-03 13:22:19 +02:00
Разное
This commit is contained in:
Anton
parent
59a6ff4591
commit
a212ca93de
BIN
Media/main.gif
Normal file
BIN
Media/main.gif
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 21 MiB |
@ -329,99 +329,35 @@
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область ВК
|
||||
#Область VK
|
||||
|
||||
Процедура ВК_СоздатьСсылкуТокена() Экспорт
|
||||
|
||||
Приложение = OPI_ПолучениеДанныхТестов.ПолучитьПараметр("VK_AppID");
|
||||
Результат = OPI_VK.СоздатьСсылкуПолученияТокена(Приложение);
|
||||
|
||||
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСсылкуПолученияТокена");
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат)
|
||||
.ИмеетТип("Строка")
|
||||
.Заполнено();
|
||||
|
||||
OPI_Инструменты.Пауза(5);
|
||||
ПараметрыТеста = Новый Структура;
|
||||
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("VK_AppID", ПараметрыТеста);
|
||||
|
||||
VK_СоздатьСсылкуПолученияТокена(ПараметрыТеста);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура ВК_СоздатьУдалитьПост() Экспорт
|
||||
|
||||
Response = "response";
|
||||
Параметры = ПолучитьПараметрыВК();
|
||||
Текст = "Пост из автотеста";
|
||||
URL = "https://github.com/Bayselonarrend/OpenIntegrations";
|
||||
Картинка = OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Picture");
|
||||
ИВФ = ПолучитьИмяВременногоФайла("png");
|
||||
Картинка.Записать(ИВФ);
|
||||
ПараметрыТеста = Новый Структура;
|
||||
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture" , ПараметрыТеста);
|
||||
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture2", ПараметрыТеста);
|
||||
|
||||
МассивКартинок = Новый Массив;
|
||||
МассивКартинок.Добавить(OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Picture"));
|
||||
МассивКартинок.Добавить(OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Picture2"));
|
||||
|
||||
МассивРезультатов = Новый Массив;
|
||||
|
||||
МассивРезультатов.Добавить(OPI_VK.СоздатьПост(Текст, Картинка, Ложь , , Параметры));
|
||||
OPI_Инструменты.Пауза(5);
|
||||
|
||||
МассивРезультатов.Добавить(OPI_VK.СоздатьПост(Текст, ИВФ , Истина, URL, Параметры));
|
||||
OPI_Инструменты.Пауза(5);
|
||||
|
||||
МассивРезультатов.Добавить(OPI_VK.СоздатьПост(Текст, МассивКартинок, Истина, URL, Параметры));
|
||||
OPI_Инструменты.Пауза(5);
|
||||
|
||||
Для Каждого Результат Из МассивРезультатов Цикл
|
||||
|
||||
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьПост");
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат[Response]["post_id"]).ИмеетТип("Число").Заполнено();
|
||||
|
||||
ИДПоста = Результат[Response]["post_id"];
|
||||
Результат = OPI_VK.УдалитьПост(ИДПоста, Параметры);
|
||||
|
||||
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьПост");
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат) .ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат[Response]).ИмеетТип("Число").Равно(1);
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
УдалитьФайлы(ИВФ);
|
||||
|
||||
OPI_Инструменты.Пауза(5);
|
||||
VK_СоздатьПост(ПараметрыТеста);
|
||||
VK_УдалитьПост(ПараметрыТеста);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура ВК_СоздатьСоставнойПост() Экспорт
|
||||
|
||||
Response = "response";
|
||||
Параметры = ПолучитьПараметрыВК();
|
||||
Текст = "Пост из автотеста";
|
||||
URL = "https://github.com/Bayselonarrend/OpenIntegrations";
|
||||
Картинка = OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Picture");
|
||||
Видео = OPI_ПолучениеДанныхТестов.ПолучитьДвоичные("Video");
|
||||
ПараметрыТеста = Новый Структура;
|
||||
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture" , ПараметрыТеста);
|
||||
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Video" , ПараметрыТеста);
|
||||
|
||||
ЗагрузкаКартинки = OPI_VK.ЗагрузитьФотоНаСервер(Картинка, Параметры)["response"][0];
|
||||
ЗагрузкаВидео = OPI_VK.ЗагрузитьВидеоНаСервер(Видео, "Новое видео", , , Параметры);
|
||||
|
||||
ВладелецКартинки = OPI_Инструменты.ЧислоВСтроку(ЗагрузкаКартинки["owner_id"]);
|
||||
ВладелецВидео = OPI_Инструменты.ЧислоВСтроку(ЗагрузкаВидео["owner_id"]);
|
||||
|
||||
IDКартинки = OPI_Инструменты.ЧислоВСтроку(ЗагрузкаКартинки["id"]);
|
||||
IDВидео = OPI_Инструменты.ЧислоВСтроку(ЗагрузкаВидео["video_id"]);
|
||||
|
||||
МассивВложений = Новый Массив;
|
||||
МассивВложений.Добавить("photo" + ВладелецКартинки + "_" + IDКартинки);
|
||||
МассивВложений.Добавить("video" + ВладелецВидео + "_" + IDВидео);
|
||||
|
||||
Результат = OPI_VK.СоздатьСоставнойПост(Текст, МассивВложений, Ложь, URL, Параметры);
|
||||
|
||||
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСоставнойПост");
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат[Response]["post_id"]).ИмеетТип("Число").Заполнено();
|
||||
VK_СоздатьСоставнойПост(ПараметрыТеста);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
@ -3535,57 +3471,6 @@
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_ВКИстина(Знач Результат)
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["response"]).ИмеетТип("Число").Равно(1);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_ГКОбъект(Знач Результат, Знач Наименование, Знач Описание)
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие");
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["summary"]).Равно(Наименование);
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["description"]).Равно(Описание);
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["id"]).ИмеетТип("Строка").Заполнено();
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_Пусто(Знач Результат)
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(ЗначениеЗаполнено(Результат)).Равно(Ложь);
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_ТвиттерТекст(Знач Результат, Знач Текст)
|
||||
|
||||
ТекстОтвета = Результат["data"]["text"];
|
||||
ТекстОтвета = Лев(ТекстОтвета, СтрДлина(Текст));
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(ТекстОтвета).Равно(Текст);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_ВайберОк(Знач Результат)
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["status_message"]).Равно("ok");
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["status"]).Равно(0);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_НоушнОбъект(Знач Результат, Знач Вид = "page")
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["object"]).Равно(Вид);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_СлакОк(Знач Результат)
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["ok"]).Равно(Истина);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_ТелеграмОпрос(Знач Результат, Знач Вопрос)
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
@ -3638,10 +3523,70 @@
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_ВКПост(Знач Результат)
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["response"]["post_id"]).ИмеетТип("Число").Заполнено();
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_ВКИстина(Знач Результат)
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["response"]).ИмеетТип("Число").Равно(1);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_ГКОбъект(Знач Результат, Знач Наименование, Знач Описание)
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие");
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["summary"]).Равно(Наименование);
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["description"]).Равно(Описание);
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["id"]).ИмеетТип("Строка").Заполнено();
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_Пусто(Знач Результат)
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(ЗначениеЗаполнено(Результат)).Равно(Ложь);
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_ТвиттерТекст(Знач Результат, Знач Текст)
|
||||
|
||||
ТекстОтвета = Результат["data"]["text"];
|
||||
ТекстОтвета = Лев(ТекстОтвета, СтрДлина(Текст));
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(ТекстОтвета).Равно(Текст);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_ВайберОк(Знач Результат)
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["status_message"]).Равно("ok");
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["status"]).Равно(0);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_НоушнОбъект(Знач Результат, Знач Вид = "page")
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["object"]).Равно(Вид);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура Проверка_СлакОк(Знач Результат)
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Соответствие").Заполнено();
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат["ok"]).Равно(Истина);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область АтомарныеТесты
|
||||
|
||||
#Область Telegram
|
||||
|
||||
Процедура Telegram_ПолучитьИнформациюБота(ПараметрыФункции)
|
||||
|
||||
Токен = ПараметрыФункции["Telegram_Token"];
|
||||
@ -3738,7 +3683,7 @@
|
||||
IDЧата = ПараметрыФункции["Telegram_ChatID"];
|
||||
IDКанала = ПараметрыФункции["Telegram_ChannelID"];
|
||||
Текст = ПараметрыФункции["String"];
|
||||
Картинка = ПараметрыФункции["Picture"];
|
||||
Картинка = ПараметрыФункции["Picture"];
|
||||
|
||||
КартинкаПуть = ПолучитьИмяВременногоФайла("png");
|
||||
КопироватьФайл(Картинка, КартинкаПуть);
|
||||
@ -4423,4 +4368,124 @@
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область VK
|
||||
|
||||
Процедура VK_СоздатьСсылкуПолученияТокена(ПараметрыФункции)
|
||||
|
||||
Приложение = ПараметрыФункции["VK_AppID"];
|
||||
Результат = OPI_VK.СоздатьСсылкуПолученияТокена(Приложение);
|
||||
|
||||
// END
|
||||
|
||||
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСсылкуПолученияТокена");
|
||||
|
||||
OPI_ПолучениеДанныхТестов.ОжидаетЧто(Результат).ИмеетТип("Строка").Заполнено();
|
||||
|
||||
OPI_Инструменты.Пауза(5);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура VK_СоздатьПост(ПараметрыФункции)
|
||||
|
||||
Параметры = ПолучитьПараметрыВК();
|
||||
Текст = "Пост из автотеста";
|
||||
URL = "https://github.com/Bayselonarrend/OpenIntegrations";
|
||||
|
||||
Картинка = ПараметрыФункции["Picture"]; // URL, Путь или Двоичные данные
|
||||
Картинка2 = ПараметрыФункции["Picture2"]; // URL, Путь или Двоичные данные
|
||||
|
||||
ИВФ = ПолучитьИмяВременногоФайла("png");
|
||||
Картинка2.Записать(ИВФ);
|
||||
|
||||
МассивКартинок = Новый Массив;
|
||||
МассивКартинок.Добавить(Картинка);
|
||||
МассивКартинок.Добавить(ИВФ);
|
||||
|
||||
Результат = OPI_VK.СоздатьПост(Текст, МассивКартинок, Истина, URL, Параметры);
|
||||
|
||||
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьПост");
|
||||
|
||||
Проверка_ВКПост(Результат); // SKIP
|
||||
ИДПоста = Результат["response"]["post_id"]; // SKIP
|
||||
|
||||
Результат = OPI_VK.СоздатьПост(Текст, Картинка, Ложь , , Параметры);
|
||||
|
||||
// END
|
||||
|
||||
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьПост (одна картинка)");
|
||||
|
||||
Проверка_ВКПост(Результат);
|
||||
OPI_Инструменты.Пауза(5);
|
||||
|
||||
Результат = OPI_VK.СоздатьПост(Текст, ИВФ , Истина, URL, Параметры);
|
||||
|
||||
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьПост (один путь)");
|
||||
|
||||
Проверка_ВКПост(Результат);
|
||||
|
||||
OPI_Инструменты.ДобавитьПоле("VK_PostID", ИДПоста, "Строка", ПараметрыФункции);
|
||||
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("VK_PostID", ПараметрыФункции["VK_PostID"]);
|
||||
|
||||
УдалитьФайлы(ИВФ);
|
||||
OPI_Инструменты.Пауза(5);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура VK_УдалитьПост(ПараметрыФункции)
|
||||
|
||||
Параметры = ПолучитьПараметрыВК();
|
||||
ИДПоста = ПараметрыФункции["VK_PostID"];
|
||||
|
||||
Результат = OPI_VK.УдалитьПост(ИДПоста, Параметры);
|
||||
|
||||
// END
|
||||
|
||||
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "УдалитьПост");
|
||||
|
||||
Проверка_ВКИстина(Результат);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура VK_СоздатьСоставнойПост(ПараметрыФункции)
|
||||
|
||||
Параметры = ПолучитьПараметрыВК();
|
||||
Текст = "Пост из автотеста";
|
||||
URL = "https://github.com/Bayselonarrend/OpenIntegrations";
|
||||
|
||||
Картинка = ПараметрыФункции["Picture"]; // URL, Путь или Двоичные данные
|
||||
Видео = ПараметрыФункции["Video"]; // URL, Путь или Двоичные данные
|
||||
|
||||
ИВФ = ПолучитьИмяВременногоФайла("png");
|
||||
Картинка.Записать(ИВФ);
|
||||
|
||||
ЗагрузкаКартинки = OPI_VK.ЗагрузитьФотоНаСервер(ИВФ, Параметры)["response"][0];
|
||||
ЗагрузкаВидео = OPI_VK.ЗагрузитьВидеоНаСервер(Видео, "Новое видео", , , Параметры);
|
||||
|
||||
ВладелецКартинки = OPI_Инструменты.ЧислоВСтроку(ЗагрузкаКартинки["owner_id"]);
|
||||
ВладелецВидео = OPI_Инструменты.ЧислоВСтроку(ЗагрузкаВидео["owner_id"]);
|
||||
|
||||
IDКартинки = OPI_Инструменты.ЧислоВСтроку(ЗагрузкаКартинки["id"]);
|
||||
IDВидео = OPI_Инструменты.ЧислоВСтроку(ЗагрузкаВидео["video_id"]);
|
||||
|
||||
МассивВложений = Новый Массив;
|
||||
МассивВложений.Добавить("photo" + ВладелецКартинки + "_" + IDКартинки);
|
||||
МассивВложений.Добавить("video" + ВладелецВидео + "_" + IDВидео);
|
||||
|
||||
Результат = OPI_VK.СоздатьСоставнойПост(Текст, МассивВложений, Ложь, URL, Параметры);
|
||||
|
||||
// END
|
||||
|
||||
// !OInt OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "СоздатьСоставнойПост");
|
||||
|
||||
Проверка_ВКПост(Результат);
|
||||
УдалитьФайлы(ИВФ);
|
||||
|
||||
OPI_Инструменты.Пауза(5);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
@ -37,7 +37,7 @@
|
||||
| --out - путь к файлу сохранения результата (двоичных данных в частности)
|
||||
|", СтатусСообщения.Информация);
|
||||
|
||||
Сообщить("Полную документацию можно найти по адресу: https:/openintegrations.dev" + Символы.ПС
|
||||
Сообщить("Полную документацию можно найти по адресу: https://openintegrations.dev" + Символы.ПС
|
||||
, СтатусСообщения.Внимание);
|
||||
|
||||
ЗавершитьРаботу(0);
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user