1
0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-08-15 20:13:31 +02:00
This commit is contained in:
Anton
2024-03-17 19:24:27 +03:00
2 changed files with 13 additions and 5 deletions

View File

@@ -34,10 +34,12 @@
// //
// Параметры: // Параметры:
// ClientID - Строка - Client ID // ClientID - Строка - Client ID
// Calendar - Булево - разрешение на методы Calendar
// Drive - Булево - разрешение на методы Drive
// //
// Возвращаемое значение: // Возвращаемое значение:
// Строка - Сформировать ссылку получения кода // Строка - Сформировать ссылку получения кода
Функция СформироватьСсылкуПолученияКода(Знач ClientID) Экспорт Функция СформироватьСсылкуПолученияКода(Знач ClientID, Знач Calendar = Истина, Знач Drive = Истина) Экспорт
URL = "https://accounts.google.com/o/oauth2/auth"; URL = "https://accounts.google.com/o/oauth2/auth";
@@ -46,7 +48,7 @@
ПараметрыURL.Вставить("client_id" , ClientID); ПараметрыURL.Вставить("client_id" , ClientID);
ПараметрыURL.Вставить("redirect_uri" , "http://localhost"); ПараметрыURL.Вставить("redirect_uri" , "http://localhost");
ПараметрыURL.Вставить("access_type" , "offline"); ПараметрыURL.Вставить("access_type" , "offline");
ПараметрыURL.Вставить("scope" , ПолучитьСписокРазрешений()); ПараметрыURL.Вставить("scope" , ПолучитьСписокРазрешений(Calendar, Drive));
URL = URL + OPI_Инструменты.ПараметрыЗапросаВСтроку(ПараметрыURL); URL = URL + OPI_Инструменты.ПараметрыЗапросаВСтроку(ПараметрыURL);
@@ -122,11 +124,17 @@
#Область СлужебныеПроцедурыИфункции #Область СлужебныеПроцедурыИфункции
Функция ПолучитьСписокРазрешений() Функция ПолучитьСписокРазрешений(Calendar, Drive)
МассивРазрешений = Новый Массив; МассивРазрешений = Новый Массив;
МассивРазрешений.Добавить("https://www.googleapis.com/auth/calendar");
МассивРазрешений.Добавить("https://www.googleapis.com/auth/drive"); Если Calendar Тогда
МассивРазрешений.Добавить("https://www.googleapis.com/auth/calendar");
КонецЕсли;
Если Drive Тогда
МассивРазрешений.Добавить("https://www.googleapis.com/auth/drive");
КонецЕсли;
Возврат СтрСоединить(МассивРазрешений, " "); Возврат СтрСоединить(МассивРазрешений, " ");

Binary file not shown.