Msbrowser управления ActiveX установка флага "отмена" в newwindow3
Привет,
Мы включили элемент управления ActiveX MS Browser в компонент MFC для VB-скрипта. Мы используем VB-скрипт для перехвата событий, запускаемых элементами управления ActiveX.
Что я уже пробовал:
Метода webbrowser1.Перейдите("file:///C:/page.html")
Sub WebBrowser1_NewWindow3(ppDisp, ByRef Cancel, dwFlags, bstrUrlContext, bstrUrl)
- Нужно новое, скрытое, неуправляемое окно веб-браузера.
MsgBox ("Event NewWindow3-URL:" + bstrUrl)
Отмена = Истина
Конец Подводной Лодки
Sub WebBrowser1_NewWindow2(ppDisp, ByRef Cancel)
- Нужно новое, скрытое, неуправляемое окно веб-браузера.
Отмена = Истина
MsgBox ("событие NewWindow2-не может быть отменено:" + CStr(отмена))
Конец Подводной Лодки
Sub WebBrowser1_BeforeNavigate2(pDisp, URL, флаги, TargetFrameName, PostData, заголовки, отмена)
'Срабатывает до того, как навигация происходит в данном веб-браузере (элементе window или frameset). Обработка этой навигации может быть изменена.
MsgBox ("Event BeforeNavigate2-URL:" + URL)
Конец Подводной Лодки
Со страницы мы пытаемся открыть страницу из нового окна IE. Происходит запуск события NewWindow3. Но здесь мы установили флаг Cancel как true, ожидая, что он не должен открывать новое окно, так как мы отменили навигацию. Но даже при этом открывается новое окно IE.
является ли это правильным способом предотвратить навигацию для нового окна? Мы также попробовали сделать то же самое с NewWindow2. Мы видим тот же результат.
Не мог бы кто-нибудь разобраться в этом?