mirror of
https://github.com/Bayselonarrend/OpenIntegrations.git
synced 2024-11-24 08:52:18 +02:00
VK: Автотесты и метод удаления альбома
This commit is contained in:
parent
a24894a4f9
commit
752a257a21
@ -71,6 +71,14 @@
|
||||
Hash = "hash";
|
||||
Photo = "photo";
|
||||
Serv = "server";
|
||||
|
||||
Если Не ТипЗнч(МассивКартинок) = Тип("Массив") Тогда
|
||||
|
||||
ОднаКартинка = МассивКартинок;
|
||||
МассивКартинок = Новый Массив;
|
||||
МассивКартинок.Добавить(ОднаКартинка);
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Для Каждого КартинкаПоста Из МассивКартинок Цикл
|
||||
|
||||
@ -255,6 +263,25 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Удалить альбом.
|
||||
//
|
||||
// Параметры:
|
||||
// IDАльбома - Строка,Число - ID альбома
|
||||
// Параметры - Структура из Строка - См.ПолучитьСтандартныеПараметры
|
||||
//
|
||||
// Возвращаемое значение:
|
||||
// ДвоичныеДанные, Неопределено, Произвольный - Ответ сервера ВК
|
||||
Функция УдалитьАльбом(Знач IDАльбома, Знач Параметры = "") Экспорт
|
||||
|
||||
Параметры_ = ПолучитьСтандартныеПараметры(Параметры);
|
||||
Параметры_.Вставить("album_id", OPI_Инструменты.ЧислоВСтроку(IDАльбома));
|
||||
|
||||
Ответ = OPI_Инструменты.Get("api.vk.com/method/photos.deleteAlbum", Параметры_);
|
||||
|
||||
Возврат Ответ;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Создать историю.
|
||||
//
|
||||
// Параметры:
|
||||
|
@ -28,6 +28,11 @@
|
||||
.ДобавитьСерверныйТест("Телеграм_ЗакрепитьОткрепитьСообщение" , "Закрепить/открепить сообщение")
|
||||
.ДобавитьСерверныйТест("Телеграм_ПолучитьЧислоУчастников" , "Получить число участников")
|
||||
|
||||
.ДобавитьТестовыйНабор("ВКонтакте")
|
||||
.ДобавитьСерверныйТест("ВК_СоздатьУдалитьПост" , "Создать/Удалить пост")
|
||||
.ДобавитьСерверныйТест("ВК_СоздатьОпрос" , "Создать опрос")
|
||||
.ДобавитьСерверныйТест("ВК_СохранитьУдалитьКартинку" , "Добавить/удалить картинку и альбом")
|
||||
|
||||
.ДобавитьТестовыйНабор("Яндекс.Диск")
|
||||
.ДобавитьСерверныйТест("ЯДиск_ПолучитьИнформациюОДиске" , "Получить информацию о диске")
|
||||
.ДобавитьСерверныйТест("ЯДиск_СоздатьПапку" , "Создать папку")
|
||||
@ -506,6 +511,126 @@
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область ВК
|
||||
|
||||
Процедура ВК_СоздатьУдалитьПост() Экспорт
|
||||
|
||||
Параметры = ПолучитьПараметрыВК();
|
||||
Текст = "Пост из автотеста";
|
||||
URL = "https://github.com/Bayselonarrend/OpenIntegrations";
|
||||
Картинка = ПолучитьДвоичные("Картинка");
|
||||
ИВФ = ПолучитьИмяВременногоФайла("png");
|
||||
Картинка.Записать(ИВФ);
|
||||
|
||||
МассивРезультатов = Новый Массив;
|
||||
|
||||
МассивРезультатов.Добавить(OPI_VK.СоздатьПост(Текст, Картинка, Ложь , , Параметры));
|
||||
ЮТОбщий.Пауза(10);
|
||||
|
||||
МассивРезультатов.Добавить(OPI_VK.СоздатьПост(Текст, ИВФ , Истина, URL, Параметры));
|
||||
ЮТОбщий.Пауза(10);
|
||||
|
||||
Для Каждого Результат Из МассивРезультатов Цикл
|
||||
|
||||
ЮТест.ОжидаетЧто(Результат)
|
||||
.ИмеетТип("Соответствие")
|
||||
.Заполнено()
|
||||
.Свойство("response.post_id").ИмеетТип("Число").Заполнено();
|
||||
|
||||
ИДПоста = Результат["response"]["post_id"];
|
||||
Удаление = OPI_VK.УдалитьПост(ИДПоста, Параметры);
|
||||
|
||||
ЮТест.ОжидаетЧто(Удаление)
|
||||
.ИмеетТип("Соответствие")
|
||||
.Заполнено()
|
||||
.Свойство("response").ИмеетТип("Число").Равно(1);
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
УдалитьФайлы(ИВФ);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура ВК_СоздатьОпрос() Экспорт
|
||||
|
||||
Параметры = ПолучитьПараметрыВК();
|
||||
Вопрос = "Вопрос из автотеста";
|
||||
|
||||
МассивВариантов = Новый Массив;
|
||||
МассивВариантов.Добавить("Вариант 1");
|
||||
МассивВариантов.Добавить("Вариант 2");
|
||||
МассивВариантов.Добавить("Вариант 3");
|
||||
|
||||
Результат = OPI_VK.СоздатьОпрос(Вопрос, МассивВариантов, , Параметры);
|
||||
|
||||
ЮТест.ОжидаетЧто(Результат)
|
||||
.ИмеетТип("Соответствие")
|
||||
.Заполнено()
|
||||
.Свойство("response.post_id").ИмеетТип("Число").Заполнено();
|
||||
|
||||
ИДПоста = Результат["response"]["post_id"];
|
||||
OPI_VK.УдалитьПост(ИДПоста, Параметры);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура ВК_СохранитьУдалитьКартинку() Экспорт
|
||||
|
||||
Параметры = ПолучитьПараметрыВК();
|
||||
Имя = "Альбом из автотеста";
|
||||
Описание = "Новый альбом из автотеста";
|
||||
ОписаниеКартинки = "Картинка автотест";
|
||||
Картинка = ПолучитьДвоичные("Картинка");
|
||||
ИВФ = ПолучитьИмяВременногоФайла("png");
|
||||
Картинка.Записать(ИВФ);
|
||||
|
||||
Альбом = OPI_VK.СоздатьАльбом(Имя, Описание, Параметры);
|
||||
|
||||
ЮТест.ОжидаетЧто(Альбом)
|
||||
.ИмеетТип("Соответствие")
|
||||
.Заполнено()
|
||||
.Свойство("response.description").Равно(Описание);
|
||||
|
||||
ИДАльбома = Альбом["response"]["id"];
|
||||
|
||||
МассивРезультатов = Новый Массив;
|
||||
|
||||
МассивРезультатов.Добавить(OPI_VK.СохранитьКартинкуВАльбом(ИДАльбома, Картинка, ОписаниеКартинки, Параметры));
|
||||
ЮТОбщий.Пауза(10);
|
||||
|
||||
МассивРезультатов.Добавить(OPI_VK.СохранитьКартинкуВАльбом(ИДАльбома, ИВФ , ОписаниеКартинки, Параметры));
|
||||
ЮТОбщий.Пауза(10);
|
||||
|
||||
Для Каждого Результат Из МассивРезультатов Цикл
|
||||
|
||||
ЮТест.ОжидаетЧто(Результат)
|
||||
.ИмеетТип("Соответствие")
|
||||
.Заполнено()
|
||||
.Свойство("response[0].text").Равно(ОписаниеКартинки)
|
||||
.Свойство("response[0].album_id").Равно(ИДАльбома);
|
||||
|
||||
ИДКартинки = Результат["response"][0]["id"];
|
||||
Удаление = OPI_VK.УдалитьКартинку(ИДКартинки, Параметры);
|
||||
|
||||
ЮТест.ОжидаетЧто(Удаление)
|
||||
.ИмеетТип("Соответствие")
|
||||
.Заполнено()
|
||||
.Свойство("response").ИмеетТип("Число").Равно(1);
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
Удаление = OPI_VK.УдалитьАльбом(ИДАльбома, Параметры);
|
||||
|
||||
ЮТест.ОжидаетЧто(Удаление)
|
||||
.ИмеетТип("Соответствие")
|
||||
.Заполнено()
|
||||
.Свойство("response").ИмеетТип("Число").Равно(1);
|
||||
|
||||
УдалитьФайлы(ИВФ);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область YandexDisk
|
||||
|
||||
Процедура ЯДиск_ПолучитьИнформациюОДиске() Экспорт
|
||||
@ -813,5 +938,19 @@
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Функция ПолучитьПараметрыВК()
|
||||
|
||||
Параметры = Новый Структура;
|
||||
НомерГруппы = ПолучитьПараметр("ВК_НомерГруппы");
|
||||
|
||||
Параметры.Вставить("access_token" , ПолучитьПараметр("ВК_Токен"));
|
||||
Параметры.Вставить("owner_id" , "-" + НомерГруппы);
|
||||
Параметры.Вставить("app_id" , ПолучитьПараметр("ВК_Приложение"));
|
||||
Параметры.Вставить("group_id" , НомерГруппы);
|
||||
|
||||
Возврат Параметры;
|
||||
|
||||
КонецФункции
|
||||
|
||||
#КонецОбласти
|
||||
// BSLLS:Typo-on
|
Loading…
Reference in New Issue
Block a user