Back to Collection Items
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
Dim http As New ChilkatHttp
Dim success As Long
' Use this online tool to generate code from sample JSON: Generate Code to Create JSON
' The following JSON is sent in the request body.
' {
' "address": "<string>",
' "item": {
' "itemId": "<integer>",
' "name": "<string>",
' "price": "<integer>",
' "description": "<string>"
' }
' }
Dim json As New ChilkatJsonObject
success = json.UpdateString("address","<string>")
success = json.UpdateString("item.itemId","<integer>")
success = json.UpdateString("item.name","<string>")
success = json.UpdateString("item.price","<integer>")
success = json.UpdateString("item.description","<string>")
http.SetRequestHeader "Content-Type","application/json"
Dim resp As ChilkatHttpResponse
Set resp = http.PostJson3("https://api.simplekart.com/orders","application/json",json)
If (http.LastMethodSuccess = 0) Then
Debug.Print http.LastErrorText
Exit Sub
End If
Dim sbResponseBody As New ChilkatStringBuilder
success = resp.GetBodySb(sbResponseBody)
Dim jResp As New ChilkatJsonObject
success = jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = 0
Debug.Print "Response Body:"
Debug.Print jResp.Emit()
Dim respStatusCode As Long
respStatusCode = resp.StatusCode
Debug.Print "Response Status Code = " & respStatusCode
If (respStatusCode >= 400) Then
Debug.Print "Response Header:"
Debug.Print resp.Header
Debug.Print "Failed."
Exit Sub
End If
' Sample JSON response:
' (Sample code for parsing the JSON response is shown below)
' {
' "orderId": 674,
' "items": [
' {
' "itemId": 1657,
' "name": "Smart WiFi Router",
' "price": 2096,
' "description": "Wifi router/wireless router. One of routers for wireless internet, wireless routers for home. Dual band router and gigabit router. Ideal as internet router also gaming router. Long range coverage with high speed. Compatible with all 802.11ac devices and below. 5ghz router/5g router Frequency Range: 2.4GHz and 5GHz; Interface Available: 4 x 10/100/1000Mbps LAN Ports, 1 10/100/1000Mbps WAN Port, 1 USB 2.0 Ports; Protocols Supported: Supports IPv4 and IPv6; System Requirement: Microsoft Windows 98SE NT 2000 XP Vista, or Windows 7 Windows 8/8.1/10, MAC OS NetWare UNIX or Linux; Wireless Standards: IEEE 802.11ac/n/a 5GHz, IEEE 802.11b/g/n 2.4GH"
' }
' ],
' "arrivalDate": "2020-3-04T13:07:45.962Z",
' "orderDate": "2020-03-06T19:27:26.733Z",
' "orderTotal": 2096,
' "address": "95 Tarkiln Hill St.Laurel, MD 20707"
' }
' Sample code for parsing the JSON response...
' Use this online tool to generate parsing code from sample JSON: Generate JSON Parsing Code
Dim itemId As Long
Dim name As String
Dim price As Long
Dim description As String
Dim orderId As Long
orderId = jResp.IntOf("orderId")
Dim arrivalDate As String
arrivalDate = jResp.StringOf("arrivalDate")
Dim orderDate As String
orderDate = jResp.StringOf("orderDate")
Dim orderTotal As Long
orderTotal = jResp.IntOf("orderTotal")
Dim address As String
address = jResp.StringOf("address")
Dim i As Long
i = 0
Dim count_i As Long
count_i = jResp.SizeOfArray("items")
Do While i < count_i
jResp.I = i
itemId = jResp.IntOf("items[i].itemId")
name = jResp.StringOf("items[i].name")
price = jResp.IntOf("items[i].price")
description = jResp.StringOf("items[i].description")
i = i + 1
Loop
Curl Command
curl -X POST
-H "Content-Type: application/json"
-d '{
"address": "<string>",
"item": {
"itemId": "<integer>",
"name": "<string>",
"price": "<integer>",
"description": "<string>"
}
}'
https://api.simplekart.com/orders
Postman Collection Item JSON
{
"name": "Post order details to the database",
"request": {
"method": "POST",
"header": [
{
"key": "Content-Type",
"value": "application/json"
}
],
"body": {
"mode": "raw",
"raw": "{\n \"address\": \"<string>\",\n \"item\": {\n \"itemId\": \"<integer>\",\n \"name\": \"<string>\",\n \"price\": \"<integer>\",\n \"description\": \"<string>\"\n }\n}"
},
"url": {
"raw": "{{baseUrl}}/orders",
"host": [
"{{baseUrl}}"
],
"path": [
"orders"
]
},
"description": "Post item order to orders database"
},
"response": [
{
"name": "OK - Order created",
"originalRequest": {
"method": "POST",
"header": [
],
"body": {
"mode": "raw",
"raw": "{\n \"items\": [\n {\n \"itemId\": 1657,\n \"name\": \"Smart WiFi Router\",\n \"price\": 2096,\n \"description\": \"Wifi router/wireless router. One of routers for wireless internet, wireless routers for home. Dual band router and gigabit router. Ideal as internet router also gaming router. Long range coverage with high speed. Compatible with all 802.11ac devices and below. 5ghz router/5g router Frequency Range: 2.4GHz and 5GHz; Interface Available: 4 x 10/100/1000Mbps LAN Ports, 1 10/100/1000Mbps WAN Port, 1 USB 2.0 Ports; Protocols Supported: Supports IPv4 and IPv6; System Requirement: Microsoft Windows 98SE NT 2000 XP Vista, or Windows 7 Windows 8/8.1/10, MAC OS NetWare UNIX or Linux; Wireless Standards: IEEE 802.11ac/n/a 5GHz, IEEE 802.11b/g/n 2.4GH\"\n }\n ],\n \"address\": \"95 Tarkiln Hill St.Laurel, MD 20707\"\n}"
},
"url": {
"raw": "{{baseUrl}}/orders",
"host": [
"{{baseUrl}}"
],
"path": [
"orders"
]
}
},
"status": "Created",
"code": 201,
"_postman_previewlanguage": "json",
"header": [
{
"key": "Content-Type",
"value": "application/json"
}
],
"cookie": [
],
"body": "{\n \"orderId\": 674,\n \"items\": [\n {\n \"itemId\": 1657,\n \"name\": \"Smart WiFi Router\",\n \"price\": 2096,\n \"description\": \"Wifi router/wireless router. One of routers for wireless internet, wireless routers for home. Dual band router and gigabit router. Ideal as internet router also gaming router. Long range coverage with high speed. Compatible with all 802.11ac devices and below. 5ghz router/5g router Frequency Range: 2.4GHz and 5GHz; Interface Available: 4 x 10/100/1000Mbps LAN Ports, 1 10/100/1000Mbps WAN Port, 1 USB 2.0 Ports; Protocols Supported: Supports IPv4 and IPv6; System Requirement: Microsoft Windows 98SE NT 2000 XP Vista, or Windows 7 Windows 8/8.1/10, MAC OS NetWare UNIX or Linux; Wireless Standards: IEEE 802.11ac/n/a 5GHz, IEEE 802.11b/g/n 2.4GH\"\n }\n ],\n \"arrivalDate\": \"2020-3-04T13:07:45.962Z\",\n \"orderDate\": \"2020-03-06T19:27:26.733Z\",\n \"orderTotal\": 2096,\n \"address\": \"95 Tarkiln Hill St.Laurel, MD 20707\"\n}"
}
]
}
