VBScript
VBScript
Viewing a Simple Three-Step Execution Plan
See more CURL Examples
This example demonstrates a straightforward, valid dependency chain that results in a three-step execution plan. The goal is not to execute the requests, but to inspect how the plan is constructed using ExaminePlan.
The target curl command requires {{order_id}}. A helper function is defined to produce order_id, but it depends on customer_id. Another helper function produces customer_id, which depends on account_name.
Because account_name is provided as a known input, the dependency chain can be fully resolved:
customer_idis obtained fromaccount_nameorder_idis obtained fromcustomer_id- The target
curlcommand usesorder_id
When ExaminePlan is called, it builds and returns a three-step execution plan showing the order in which each function would be executed.
Chilkat VBScript Downloads
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
set httpCurl = CreateObject("Chilkat.HttpCurl")
' The target curl command requires {{order_id}}.
targetCurl = "curl -X GET https://api.example.com/orders/{{order_id}}"
' Define a helper function that produces order_id from customer_id.
fnName = "getOrderId"
success = httpCurl.AddFunction(fnName,"curl -X GET https://api.example.com/order-id?customer={{customer_id}}")
success = httpCurl.AddOutput(fnName,"order.id","order_id")
' Define a helper function that produces customer_id from account_name.
fnName = "getCustomerId"
success = httpCurl.AddFunction(fnName,"curl -X GET https://api.example.com/customer-id?account={{account_name}}")
success = httpCurl.AddOutput(fnName,"customer.id","customer_id")
' Provide the starting known input.
httpCurl.SetVar "account_name","acme"
' Examine the execution plan without running any requests.
set planJson = CreateObject("Chilkat.JsonObject")
planJson.EmitCompact = 0
success = httpCurl.ExaminePlan(targetCurl,planJson)
' Success is expected to be 1.
outFile.WriteLine("success = " & success)
outFile.WriteLine(planJson.Emit())
' Expected result:
'
' {
' "plan": [{
' "function": "getCustomerId",
' "inputs": ["account_name"],
' "outputs": ["customer_id"]
' },{
' "function": "getOrderId",
' "inputs": ["customer_id"],
' "outputs": ["order_id"]
' },{
' "function": "targetCurl",
' "inputs": ["order_id"],
' "outputs": []
' }]
' }
outFile.Close