Получить возвращаемое значение функции Javascript в элементе управления WebBrowser в vb6

Question

У меня есть приложение vb6,

Я выполняю вызов функции с помощью скрипта WebBrowser, но мне нужно получить возвращаемое значение этой функции

моя текущая функция

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

Тогда мне нужно значение v .. Возможное значение - функция javascript.

Как получить "v", мой тестовый ответ с ошибкой 91 (переменная объекта с переменной блока не установлена). Я начинающий с vb6.

Answer 1

1. Назначьте возвращаемое значение вашей функции JavaScript переменной JavaScript.
2. Используйте execScript метод WebBrowser.Document.ParentWindow для позвоните по коду JavaScript.

3. Теперь получаем значение переменной через 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
   

Answer 2

Попробуйте:

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