VBScript

JavaScript console

See more JavaScript Examples

Demonstrates console output using Chilkat JavaScript. VBScript

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

success = 0

' This example demonstrates using the built-in console object.
' The Javascript run in this example is shown below.

' Load the JavaScript from a file.
set sbScript = CreateObject("Chilkat.StringBuilder")
success = sbScript.LoadFile("qa_data/js_tests/test_console.js","utf-8")
If (success = 0) Then
    outFile.WriteLine(sbScript.LastErrorText)
    WScript.Quit
End If

set js = CreateObject("Chilkat.Js")
set result = CreateObject("Chilkat.JsonObject")

' Run the JavaScript
' Results (not console output) go to result.
' Note: Eval returns the completion value of the script. This is generally the value of the last evaluated expression.
' In this case, the last evaluated expression is console.log which does not calculate a value. Therefore, it returns undefined.
success = js.Eval(sbScript,result)
If (success = 0) Then
    outFile.WriteLine(sbScript.LastErrorText)
    WScript.Quit
End If

' We can look at the result, which is "undefined", which is normal and expected.
outFile.WriteLine(result.Emit())
' The result JSON is: {"type":"undefined","value":"undefined"}

' The console output is retrieved by calling ConsoleOutputSb
set sbOut = CreateObject("Chilkat.StringBuilder")
js.ConsoleOutputSb sbOut
outFile.WriteLine(sbOut.GetAsString())

outFile.Close