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