我需要为使用WebBrowser组件呈现HTML的旧MS Word加载项添加新逻辑。
我向包含VBS脚本的aspx发送请求:
<script language="VBScript" type="text/vbscript">
Sub SayHello()
MsgBox "Hi"
End Function
</script>
我添加到VBA处理程序,该处理程序在加载html文档时触发:
Private Sub WebBrowser_DocumentComplete(ByVal pDisp As Object, URL As Variant)
WebBrowser.Document.InvokeScript "SayHello" 'This line returns error: Object doesn't support this property or method
End Sub
上述问题的原因是什么?
P.S。我可以在WebBrowser.Document.Scripts集合中看到带有“ SayHello”的已加载vbs脚本。
P.P.S。我还尝试使用vp脚本从
调用子或函数“ SayHello” WebBrowser.InvokeScript "SayHello"
我也遇到同样的错误...