Custom-Event из Internet Explorer в Visual Basic - PullRequest
2 голосов
/ 18 апреля 2019

Мне нужно прослушать настраиваемое событие из браузера, контролируемого в визуальной базовой программе Недавнее обновление Windows предотвращает работу vbscript

Наша проблема: после обновления windos KB4490481 интернет-обозреватель теряет свои возможности VBScript! Я знаю, что IE11 все равно не запускает VBScript, но я говорю о браузерном контроле, который по умолчанию ведет себя как IE7!

Ну ладно, я конвертировал код VBScript в javascript, что кажется неплохим Но он также использует Customevents, я использовал эту помощь для него: здесь

Кажется нормально, когда вы слушаете внутренне событие

Но мне нужно, чтобы обычное пользователь поднял основную программу, которая содержит браузерный контроль, это не работает!

К сожалению, основная программа написана на VB6 (Visual Basic 6), поэтому я не вижу в этом особой помощи Моя проблема в том, что "addEventListener" правильно с помощью https://msdn.microsoft.com/en-us/ie/aa752045(v=vs.94) Я могу обучаться у тех, кто не пользуется услугами, таких как

Browser.Document.getElementById("btnMyButton").addEventListener "click", cfForward

но не для моего обычного

Browser.Document.addEventListener "JSEvent", cfForward, False

Может ли кто-нибудь оказать помощь? Я думаю, что рабочий VBA Office Sample также поможет мне

Лучше всего для меня будет ключ реестра, чтобы вернуть vbscript

Другие вещи, которые не помогают: <meta http-equiv="x-ua-compatible" content="IE=10"> ==> не имеет эффекта, vbscript не запускается

переименуйте страницу в .hta: Vbscript там еще работает, но есть диалог подтверждения, и он открывает свое собственное окно

спасибо Дональд

"btnMyButton" - это кнопка

Browser.Document.getElementById("btnMyButton").addEventListener "click", cfForward ==> все в порядке

«JSEvent» - это пользовательское событие, которое запускается из-под запуска для тестирования

Browser.Document.addEventListener "JSEvent", cfForward, False ==> не в порядке

...