У меня есть класс VB.NET, который вызывается с расширением контекстного меню в Internet Explorer.
Код имеет доступ к объектной модели страницы, и чтение данных не является проблемой. Это код тестовой функции ... он изменяет текст строки состояния (OK), печатает HTML-страницу (OK), изменяет HTML, добавляя текст, и снова печатает HTML-страницу (OK, во втором всплывающем мой добавленный текст в HTML)
Но окно Internet Explorer не показывает его. Где я делаю не так?
Public Sub CallingTest(ByRef Source As Object)
Dim D As mshtml.HTMLDocument = Source.document
Source.status = "Working..."
Dim H As String = D.documentElement.innerHTML()
MsgBox(H)
D.documentElement.insertAdjacentText("beforeEnd", "ThisIsATest")
H = D.documentElement.outerHTML()
MsgBox(H)
Source.status = ""
End Sub
Функция вызывается так из JavaScript:
<script>
var EB = new ActiveXObject("MyObject.MyClass");
EB.CallingTest(external.menuArguments);
</script>