vb.net - 使用 external.menuArguments 在 Internet Explorer 窗口中修改 HTML

Question

我有一个在 Internet Explorer 中使用上下文菜单扩展调用的 VB.NET 类。

代码可以访问页面的对象模型，读取数据没有问题。这是一个测试函数的代码……它改变状态栏文本(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>

Answer 1

据我所知，为了使用 insertAdjacentText 或任何其他编辑方法，文档对象应该处于设计模式。在设计模式下，您可以自由编辑文档，用户也可以。检查this网站了解更多详情