(Xojo Plugin) Call a JavaScript Function Returning an Object

See more JavaScript Examples

Note: This example requires Chilkat v11.4.0 or greater.

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

Dim success As Boolean
success = False

// This is the JavaScript function we'll call:

// function getSettings() {
//     return {
//         theme: "dark",
//         notifications: true,
//         version: 1.0
//     };
// }

Dim sbScript As New Chilkat.StringBuilder
success = sbScript.Append("function getSettings() {")
success = sbScript.Append("    return {")
success = sbScript.Append("        theme: ""dark"",")
success = sbScript.Append("        notifications: true,")
success = sbScript.Append("        version: 1.0")
success = sbScript.Append("    };")
success = sbScript.Append("}")

Dim js As New Chilkat.Js

Dim result As New Chilkat.JsonObject
result.EmitCompact = False

// Call Eval to add the function to the context's global object
success = js.Eval(sbScript,result)
If (success = False) Then
    // Examine the result for an exception.
    System.DebugLog(result.Emit())

    // Also examine the LastErrorText.
    System.DebugLog(js.LastErrorText)
    Return
End If

// ------------------------------------------------------------------------------
// Call the function getSettings()

Dim funcCall As New Chilkat.JsonObject

// Create JSON specifying the function name and arguments
// The function has no arguments, so we only specify the name.

// {
//   "name": "getSettings",
// }

success = funcCall.UpdateString("name","getSettings")

success = js.CallFunction(funcCall,result)
If (success = False) Then
    // Examine the result for an exception.
    System.DebugLog(result.Emit())

    // Also examine the LastErrorText.
    System.DebugLog(js.LastErrorText)
    Return
End If

System.DebugLog(result.Emit())

// Output:
// {
//   "type": "object",
//   "value": {
//     "theme": "dark",
//     "notifications": true,
//     "version": 1
//   }
// }

// Examine the object's members
System.DebugLog("theme: " + result.StringOf("value.theme"))
System.DebugLog("notifications: " + Str(result.BoolOf("value.notifications")))
System.DebugLog("version: " + Str(result.IntOf("value.version")))

// Output:
// theme: dark
// notifications: True
// version: 1