Получить значение из функции javascript в VBscript

Question

Я хотел бы получить выполнение функции javascript с помощью IE и получить его значение в VBScript. У меня есть следующий код VBscript (раствор должен быть в VBScript):

Dim oIE: Set oIE = CreateObject("InternetExplorer.application") 
With oIE 
    .Visible = True 
    .Navigate (url) 
End With 
Do Until oIE.ReadyState = 4 
    wscript.sleep 100 
Loop 
oIE.Document.parentWindow.execScript("alert(function());") 'Get Return value 

Как я могу получить значение «функции()»? Я знаю, что execscript always returns null. Я мог бы написать javascript элемент, а затем извлечь его значение, но я уверен, что есть лучший способ.

Answer 1

Создайте переменную в javascript. Переменная может быть загружена любым значением, объектом или функцией (как в этом примере). В VBScript вы можете получить его как член oIE.Document.parentWindow:

oIE.Document.parentWindow.execScript("var ultimateAnswer = function(){return 42;}") 
msgbox oIE.Document.parentWindow.ultimateAnswer()