Google maps - получение координат по адресу, отображение на карте и корректировка адреса перемещением маркера

08.02.17

Интеграция - WEB-интеграция

Google maps - получение координат по адресу, отображение на карте и корректировка адреса перемещением маркера

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
Обработка
.epf 11,04Kb
187
187 Скачать (1 SM) Купить за 1 850 руб.

Обработка позволяет по адресу определять координаты (использовал Яндекс - по России, Украине лучше работает говорят), по координатам устанавливать маркер с возможностью перемещения по карте для уточнения адреса - новые, уточненные координаты возвращаются в форму в процессе перемещения маркера.

В обработке мало кода, всё просто и понятно, такого готового решения я не нашел, поэтому пришлось писать самому, дёргая из инета части. Думаю, что многим пригодится.

См. также

WEB-интеграция Администрирование веб-серверов Платные (руб)

Веб-портал обеспечивает удобный доступ к конфигурации 1С:ITIL(ИТИЛ), 1С:ITILIUM, Управление IT-отделом 8 через интернет с любого устройства посредством браузера, увеличивая эффективность работы пользователей и снижая нагрузку на сервер. Быстрая инсталляция портала за пару часов, удобный и интуитивно понятный интерфейс и безопасность данных помогут упростить работу с порталом и ускорить выполнение бизнес-процессов компании.

128000 руб.

19.12.2023    2977    5    0    

11

WEB-интеграция Анализ продаж Системный администратор Программист Пользователь Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Управленческий учет Платные (руб)

Модуль "Подсистема интеграции AmoCRM с 1С" позволяет обеспечить единое информационное пространство, в котором пользователи могут эффективно управлять клиентской базой, следить за статусами сделок и поддерживать актуальность данных как в AmoCRM, так и в 1С.

60000 руб.

07.05.2019    35057    69    45    

28

Оптовая торговля Розничная торговля WEB-интеграция 1С:Управление торговлей 10 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Платные (руб)

Онлайн-заказ - это решение для автоматизации процесса оформления заказов на сайте в торговых организациях. Продукт обеспечивает легкое взаимодействие между компанией и клиентами через веб-интерфейс, интегрированный с 1С:Предприятие. Система позволяет снизить операционные расходы, повысить лояльность клиентов и оптимизировать работу отдела продаж.

57600 руб.

26.11.2024    2712    2    3    

5

WEB-интеграция Программист Бизнес-аналитик Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Оптовая торговля, дистрибуция, логистика ИТ-компания Платные (руб)

Модуль "Экспортер" — это расширение для 1С, предназначенное для автоматизации процессов выгрузки данных. Оно позволяет эффективно извлекать, преобразовывать и передавать данные из систем 1С в интеграционную платформу Spot2D. Подсистема упрощает настройку, снижает количество ручных операций и обеспечивает удобный контроль данных.

14400 руб.

20.12.2024    1043    7    2    

9

WEB-интеграция Программист Руководитель проекта Платформа 1С v8.3 1C:Бухгалтерия 1С:Франчайзи, автоматизация бизнеса Платные (руб)

Расширение значительно упрощает написание API на 1С. Веб программисты получают простой и понятный доступ к 1С. Описание API создаётся автоматически и представляется в виде удобном как для человека, так и для программной обработки.

24000 руб.

27.09.2024    4657    4    2    

5

Сайты и интернет-магазины WEB-интеграция Системный администратор Программист Пользователь Платформа 1С v8.3 1C:Бухгалтерия 1С:Управление торговлей 11 Автомобили, автосервисы Россия Управленческий учет Платные (руб)

Интеграционный модуль обмена между конфигурацией Альфа Авто 5 и Альфа Авто 6 и порталом AUTOCRM. Данный модуль универсален. Позволяет работать с несколькими обменами AUTOCRM разных брендов в одной информационной базе в ручном и автоматическом режиме.

36000 руб.

03.08.2020    19273    23    22    

20

WEB-интеграция Программист Платформа 1С v8.3 Бухгалтерский учет 1С:Бухгалтерия 3.0 Бытовые услуги, сервис Платные (руб)

Внешняя обработка разрабатывалась для загрузки документов из Ветменеджер в 1С: Бухгалтерия 3.0

12000 руб.

02.02.2021    19033    54    50    

31
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. Serj1C 484 05.07.12 12:34 Сейчас в теме
2. vadimlp77 31 05.07.12 12:58 Сейчас в теме
(1) Serj1C, с геокодированием как раз меньше всего проблем - этого добра хватает, мне нужно было получить возможность с помощью маркера вносить уточнение в координаты, что и было сделано. А геокодирование как сопутствующий функционал.
3. vadimlp77 31 18.07.12 18:08 Сейчас в теме
Народ, отпишитесь, 22 скачивания и один комментарий :)
Помогло хоть кому то?
7. Spacer 363 01.10.13 19:45 Сейчас в теме
(3) Хорошая штука! Помогло. Как раз искал что-то подобное.
4. logos 216 01.08.12 12:00 Сейчас в теме
Немного не то, что хотелось бы. Ищу способ получить данные маркера через событие "ПриНажатии" поля HTML документа. Уже нашёл как привязывать событие нажатия на маркер к нажатию на документ, но не могу выцепить свойства маркера. Думал автор справился, но в его примере не реализован функционал определения того, координаты какого маркера поменялись, если их несколько
5. vadimlp77 31 06.08.12 12:48 Сейчас в теме
(4) logos, появится время - посмотрю, что можно сделать - не думаю, что это будет сложно. Сейчас загружен очень.
6. logos 216 06.08.12 13:15 Сейчас в теме
Оказалось довольно сложно, как вылижу - сделаю свою публикацию
8. Spacer 363 02.10.13 15:00 Сейчас в теме
Кстати, заметил что широта и долгота отображаются наоборот.
То что является широтой пишется в поле долгота и наоборот.
9. vadimlp77 31 21.10.13 18:03 Сейчас в теме
(8) Spacer, ну там были с этим приколы - гугл писал в одном порядке, яндекс в другом, потом кажется кто то поменял порядок
10. AK-74S 8 23.12.13 22:11 Сейчас в теме
Хороший пример, как для начала. Плюсик палюбому.
Но - проблемка. Иногда (не всегда!) начинает раз за разом "вылетать" 1С-ка на строках
HTTPСервис = Новый HTTPСоединение("geocode-maps.yandex.ru",,,,, Ложь);
либо
ЭлементыФормы.ПолеHTMLДокумента.УстановитьТекст(ТекстHTML);
1С:Предприятие 8.2 (8.2.17.153), обычные формы, Виндовз Сервер 2003.
Кто-нибудь поборол?
11. Kaavan 97 29.10.14 11:22 Сейчас в теме
Очень помогло, спасибо! потом поделюсь получившейся в итоге окончательной формой ввода географических координат, если будет интересно коллегам.
12. karapuzzzz 63 05.02.16 16:37 Сейчас в теме
Внесу небольшие изменения. Во-первых это https. Надо последним параметром при создании HTTP соединения передавать тип соединения:
Новый HTTPСоединение("geocode-maps.yandex.ru",,,,ПроксиСервер,Ложь, Новый ЗащищенноеСоединениеOpenSSL)

Дальше. Я, например, не люблю без крайней необходимости дергать диск и сохранять результат через файловую систему. Для этого меняем конструкцию запроса:
Соединение = Новый HTTPСоединение("geocode-maps.yandex.ru",,,,ПроксиСервер,Ложь, Новый ЗащищенноеСоединениеOpenSSL); 
    Запрос = Новый HTTPЗапрос;
	Запрос.АдресРесурса = "1.x/?geocode=" + СтроковыеФункции.URLEncode(Адрес);
	
	//// Формирование заголовков
	Запрос.Заголовки.Вставить("Connection","Keep-Alive");
	Запрос.Заголовки.Вставить("Content-Type", "text/html");
	Запрос.Заголовки.Вставить("Accept-Charset","utf-8");
	Запрос.Заголовки.Вставить("Accept", "*/*");
	
	//// Добавление к запросу сообщения
	//Запрос.УстановитьТелоИзСтроки(СтроковыеФункции.URLEncode(Адрес), "CESU-8");
    Попытка 
        // Ответ = Соединение.Получить("1.x/?geocode=" + СтроковыеФункции.URLEncode(Адрес)); 
		Ответ = Соединение.Получить(Запрос); 
    Исключение 
        Сообщить(ОписаниеОшибки(), СтатусСообщения.Важное); 
        Возврат Неопределено;
    КонецПопытки; 

    Возврат Ответ.ПолучитьТелоКакСтроку("CESU-8");
Показать

Таким образом, функция "YandexGeoCodeGet" уже сразу возвращает текст XML.
Соответственно вместо
ЧтениеXML.ОткрытьФайл(АдресOutput);

Ставим
ЧтениеXML.УстановитьСтроку(СтрокаXML);

где СтрокаXML это то, что вернула функция.
13. piton66 2 04.12.20 14:54 Сейчас в теме
Сорри но не работает.
ДокументДОМ = ПостроительDOM.Прочитать(ЧтениеXML);
по причине:
Ошибка разбора XML: - [6,8]
Фатальная ошибка:
Opening and ending tag mismatch: hr line 5 and body
Оставьте свое сообщение