1с и drive.google.com

Добрый День уважаемые коллеги. Мне нужно скачать папку  с картинками с гугл диска, но у  меня не получатся даже один файл скачать .  С создаётся файл с нужным наименованием, но 9 байт. Помогите с кодом.
КлючAPI="AIzaSyDkc2uRdw-G76GmFN3QlGuogVJEAK-f62M";
    // путь к файлу https://drive.google.com/file/d/158l33ArWj-bKzCg9zI0iSM2KQJROvFvX/view?usp=sharing
    ИДФайла=       "158l33ArWj-bKzCg9zI0iSM2KQJROvFvX";
        ssl = Новый ЗащищенноеСоединениеOpenSSL(
                Новый СертификатКлиентаWindows(),
                Новый СертификатыУдостоверяющихЦентровWindows());

   Соединение = Новый HTTPСоединение("www.googleapis.com",,,,,, ssl);

   Запрос = Новый HTTPЗапрос("drive/v3/files/" + ИДФайла + "/?key=" + КлючAPI);

   Ответ = Соединение.Получить(Запрос);
   ИнфОФайле = Ответ.ПолучитьТелоКакСтроку();
   Чтение = Новый ЧтениеJSON;
   Чтение.УстановитьСтроку(ИнфОФайле);
   Отв = ПрочитатьJSON(Чтение);
   //Запрос = Новый HTTPЗапрос("drive/folders/1C7UVmH8wCT92RhkNDPBAJdukee1pSwxl/?key=" + КлючAPI + "&alt=media");
//  Запрос = Новый HTTPЗапрос("drive/folders/1C7UVmH8wCT92RhkNDPBAJdukee1pSwxl/?key=" + КлючAPI + "&alt=media");
   Запрос = Новый HTTPЗапрос("drive/folders/"+ИДФайла+"/?key=" + КлючAPI + "&alt=media");



   //Запрос = Новый HTTPЗапрос("drive/v3/files/" + ИДФайла + "/?key=" + КлючAPI + "&alt=media");

   Ответ = Соединение.Получить(Запрос);


   Данные = Ответ.ПолучитьТелоКакДвоичныеДанные();

   ПутьДляСохранения = "";

   Д = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение);
   Д.ПолноеИмяФайла = Отв.name;


   Если Д.Выбрать() Тогда
      Данные.Записать(Д.ПолноеИмяФайла);
   КонецЕсли;