Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Не работают гугл карты          
SherifSP Подменю пользователя
сообщение 23.12.20, 21:00
Сообщение #1

Молчаливый
*
Группа: Пользователи
Сообщений: 1
Спасибо сказали: 0 раз
Рейтинг: 0

Добрый вечер уважаемые, стоит задача вывести гугл карту на экран, ранее (2017г.) другим программистом был разработан участок вывода торговых точек на карту и прорисовка маршрутов, но с 2018 года когда гугл ввёл ограничения на количество просмотров карты обработка перестала работать. На данный момент получилось вывести карту в поле HTML документа, но прорисовать маркер на карте никак не получается, платформа выводит ошибку при попытке вызвать js функцию прописанную ранее в html документе. Ниже приведу пример вызова функции с выводом ошибки, буду признателен за помощь.

Код
Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)  // Перед открытием формы обработки заполним текст html документа вынесенного на форму 
    
    Макет = ЭтотОбъект.ПолучитьМакет("Макет");
    Документ = ЭлементыФормы.ПолеHTMLДокумента1.Document;    
    Документ.write(Макет.ПолучитьТекст());
    
КонецПроцедуры

Процедура ПолеHTMLДокумента1ДокументСформирован(Элемент)    
    
    Name = "Тест трт";
    Discr = "Хелетий";
    html="<strong>ТРТ: "+Name+"</strong.><br />"+"Контрагент: "+Discr+"<br />"+"Широта: "+Широта+"<br />"+"Долгота: "+Долгота;
    ЭлементыФормы.ПолеHTMLДокумента1.document.parentwindow.eval("setLetLng("+Формат(Широта,"ЧРД=.; ЧГ=0")+","+Формат(Долгота,"ЧРД=.; ЧГ=0")+",'"+"НоваяТРТ"+"','"+html+"')");

КонецПроцедуры


В последней строке кода ошибка следующего типа "Метод объекта не обнаружен eval".

Кусок кода с html документа
Код
<html><head><title>Google maps API</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8"><!--Используем IE11, так как API поддерживает версии с 9 по 11 -->
<meta http-equiv="X-UA-Compatible" content="IE=11">
<meta name="GENERATOR" content="MSHTML 11.00.10570.1001">
<meta name="viewport" content="initial-scale=1.0, user-scalable=no">
<style>HTML {
    PADDING-BOTTOM: 0px; MARGIN: 0px; PADDING-LEFT: 0px; PADDING-RIGHT: 0px; HEIGHT: 100%; OVERFLOW: hidden; PADDING-TOP: 0px
}
BODY {
    PADDING-BOTTOM: 0px; MARGIN: 0px; PADDING-LEFT: 0px; PADDING-RIGHT: 0px; HEIGHT: 100%; OVERFLOW: hidden; PADDING-TOP: 0px
}
</style>

<script src="https://maps.googleapis.com/maps/api/js?key=AIzaSyAuTy6WX9zVtq5R5NNJV02zQugosbVddKA" type="text/javascript"></script>


Сообщение отредактировал Vofka - 06.01.21, 11:05

Vofka Подменю пользователя
сообщение 24.12.20, 9:03
Сообщение #2

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13948
Из: Киев
Спасибо сказали: 4514 раз
Рейтинг: 3635.6

А так?
ЭлементыФормы.ПолеHTMLДокумента1.Document.eval(...);

29a Подменю пользователя
сообщение 27.12.20, 18:47
Сообщение #3

Говорящий
***
Группа: Пользователи
Сообщений: 94
Спасибо сказали: 31 раз
Рейтинг: 33.3

Цитата(SherifSP @ 23.12.20, 21:00) *
ЭлементыФормы.ПолеHTMLДокумента1.Document.parentWindow.eval("setLetLng("+Формат(Широта,"ЧРД=.; ЧГ=0")+","+Формат(Долгота,"ЧРД=.; ЧГ=0")+",'"+"НоваяТРТ"+"','"+html+"')");

Вот так попробуйте:
ЭлементыФормы.ПолеHTMLДокумента1.Перейти("java script:setLetLng("+Формат(Широта,"ЧРД=.; ЧГ=0")+","+Формат(Долгота,"ЧРД=.; ЧГ=0")+",'"+"НоваяТРТ"+"','"+html+"')");


Сообщение отредактировал Vofka - 28.12.20, 9:37

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 28.03.24, 22:20
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!