在 vb6 中的 WebBrowser 控件中检索 Javascript 函数的返回值答案

【问题标题】：Retrieve return value of a Javascript function in the WebBrowser control in vb6在 vb6 中的 WebBrowser 控件中检索 Javascript 函数的返回值
【发布时间】：2013-04-04 08:33:03
【问题描述】：

我有一个 vb6 应用程序，

我使用 WebBrowser 脚本进行函数调用，但我需要获取该函数的返回值

我目前的功能是

v = WebBrowser1.Document.parentWindow("v = function(){return callOther();};v()");

然后，我需要 v 值.. 可能的值是 javascript 函数。

如何检索“v”，我的测试响应出现错误 91（未设置块变量的对象变量）.. 我是 vb6 的初学者。

【问题讨论】：

相关问题：How to retrive form value using execScript in VB6?

标签： vb6 webbrowser-control

【解决方案1】：

将 JavaScript 函数的返回值分配给 JavaScript 变量。
使用WebBrowser.Document.ParentWindow的execScript方法调用您的 JavaScript 代码。

现在通过以下方式检索变量的值 WebBrowser.Document.Script.<JavaScript variable name, case-sensitive> 在 VB6 中。

Private Sub cmdJsFunc_Click()
    Dim retVal As String

    Call WebBrowser1.Document.parentWindow.execScript("v = function(){return 3.14;}; tempJsVar=v();")
    retVal = WebBrowser1.Document.Script.tempJsVar

    MsgBox retVal
End Sub

【讨论】：

【解决方案2】：

试试：

Set v = WebBrowser1.Document.parentWindow("v = function(){return callOther();};v()")

【讨论】：