Visual FoxPro

Eval JavaScript Returning String

See more JavaScript Examples

Demonstrates getting the completion value of a JavaScript that returns a string. Visual FoxPro

LOCAL lnSuccess
LOCAL loSbScript
LOCAL loJs
LOCAL loResult

lnSuccess = 0

*  This example demonstrates getting the completion value of a script,
*  where the last evaluated expression is a string.

*  The Javascript run in this example is shown below.

*  Load the JavaScript from a file.
loSbScript = CreateObject('Chilkat.StringBuilder')
lnSuccess = loSbScript.LoadFile("js_eval_return_string.js","utf-8")
IF (lnSuccess = 0) THEN
    ? loSbScript.LastErrorText
    RELEASE loSbScript
    CANCEL
ENDIF

loJs = CreateObject('Chilkat.Js')
loResult = CreateObject('Chilkat.JsonObject')

*  Run the JavaScript
*  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 a string.
lnSuccess = loJs.Eval(loSbScript,loResult)
IF (lnSuccess = 0) THEN
    ? loJs.LastErrorText
    RELEASE loSbScript
    RELEASE loJs
    RELEASE loResult
    CANCEL
ENDIF

loResult.EmitCompact = 0
? loResult.Emit()

*  Output:

*  {
*    "type": "string",
*    "value": "Ready for Chilkat.Js"
*  }

RELEASE loSbScript
RELEASE loJs
RELEASE loResult

JavaScript

var status = "Ready";
var system = "Chilkat.Js";

// The last statement is an expression
status + " for " + system;