Chilkat Online Tools

VB6 / ShipEngine Walkthrough / Already-known fields

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.

' {
'   "text": "I need to send a package to my friend Amanda Miller’s house at 525 Winchester Blvd in San Jose (that's california, obviously). The zip code there is 95128.",
'   "address": {
'     "country_code": "US"
'   }
' }

Dim json As New ChilkatJsonObject
success = json.UpdateString("text","I need to send a package to my friend Amanda Miller’s house at 525 Winchester Blvd in San Jose (that's california, obviously). The zip code there is 95128.")
success = json.UpdateString("address.country_code","US")

http.SetRequestHeader "API-Key","{{API_KEY}}"
http.SetRequestHeader "Content-Type","application/json"

Dim resp As ChilkatHttpResponse
Set resp = http.PostJson3("https://api.shipengine.com/v1/addresses/recognize","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)

' {
'   "score": 0.9710697187242877,
'   "address": {
'     "name": "Amanda Miller",
'     "address_line1": "525 Winchester Blvd",
'     "city_locality": "San Jose",
'     "state_province": "CA",
'     "postal_code": "95128",
'     "country_code": "US",
'     "address_residential_indicator": "yes"
'   },
'   "entities": [
'     {
'       "type": "person",
'       "score": 0.9519646137063122,
'       "text": "Amanda Miller",
'       "start_index": 38,
'       "end_index": 50,
'       "result": {
'         "value": "Amanda Miller"
'       }
'     },
'     {
'       "type": "residential_indicator",
'       "score": 0.9519646137063122,
'       "text": "house",
'       "start_index": 54,
'       "end_index": 58,
'       "result": {
'         "value": "yes"
'       }
'     },
'     {
'       "type": "address_line",
'       "score": 0.9805313966503588,
'       "text": "525 Winchester Blvd",
'       "start_index": 63,
'       "end_index": 81,
'       "result": {
'         "line": 1,
'         "value": "525 Winchester Blvd"
'       }
'     },
'     {
'       "type": "number",
'       "score": 0.9805313966503588,
'       "text": "525",
'       "start_index": 63,
'       "end_index": 65,
'       "result": {
'         "type": "cardinal",
'         "value": 525
'       }
'     },
'     {
'       "type": "city_locality",
'       "score": 0.9805313966503588,
'       "text": "San Jose",
'       "start_index": 86,
'       "end_index": 93,
'       "result": {
'         "value": "San Jose"
'       }
'     },
'     {
'       "type": "state_province",
'       "score": 0.9805313966503588,
'       "text": "california",
'       "start_index": 103,
'       "end_index": 112,
'       "result": {
'         "name": "California",
'         "value": "CA"
'       }
'     },
'     {
'       "type": "postal_code",
'       "score": 0.9519646137063122,
'       "text": "95128",
'       "start_index": 149,
'       "end_index": 153,
'       "result": {
'         "value": "95128"
'       }
'     }
'   ]
' }

' Sample code for parsing the JSON response...
' Use this online tool to generate parsing code from sample JSON: Generate JSON Parsing Code

Dim v_type As String
Dim text As String
Dim start_index As Long
Dim end_index As Long
Dim Value As String
Dim Line As Long
Dim v_Type As String
Dim resultName As String

Dim score As String
score = jResp.StringOf("score")
Dim Name As String
Name = jResp.StringOf("address.name")
Dim Address_line1 As String
Address_line1 = jResp.StringOf("address.address_line1")
Dim City_locality As String
City_locality = jResp.StringOf("address.city_locality")
Dim State_province As String
State_province = jResp.StringOf("address.state_province")
Dim Postal_code As String
Postal_code = jResp.StringOf("address.postal_code")
Dim Country_code As String
Country_code = jResp.StringOf("address.country_code")
Dim Address_residential_indicator As String
Address_residential_indicator = jResp.StringOf("address.address_residential_indicator")
Dim i As Long
i = 0
Dim count_i As Long
count_i = jResp.SizeOfArray("entities")
Do While i < count_i
    jResp.I = i
    v_type = jResp.StringOf("entities[i].type")
    score = jResp.StringOf("entities[i].score")
    text = jResp.StringOf("entities[i].text")
    start_index = jResp.IntOf("entities[i].start_index")
    end_index = jResp.IntOf("entities[i].end_index")
    Value = jResp.StringOf("entities[i].result.value")
    Line = jResp.IntOf("entities[i].result.line")
    v_Type = jResp.StringOf("entities[i].result.type")
    resultName = jResp.StringOf("entities[i].result.name")
    i = i + 1
Loop

Curl Command

curl -X POST
	-H "API-Key: {{API_KEY}}"
	-H "Content-Type: application/json"
	-d '{
	"text": "I need to send a package to my friend Amanda Miller’s house at 525 Winchester Blvd in San Jose (that\'s california, obviously). The zip code there is 95128.",
	"address": {
		"country_code": "US"
	}
}'
https://api.shipengine.com/v1/addresses/recognize

Postman Collection Item JSON

{
  "name": "Already-known fields",
  "event": [
    {
      "listen": "test",
      "script": {
        "exec": [
          ""
        ],
        "type": "text/javascript"
      }
    }
  ],
  "request": {
    "method": "POST",
    "header": [
      {
        "key": "Content-Type",
        "name": "Content-Type",
        "type": "text",
        "value": "application/json"
      }
    ],
    "body": {
      "mode": "raw",
      "raw": "{\n\t\"text\": \"I need to send a package to my friend Amanda Miller’s house at 525 Winchester Blvd in San Jose (that's california, obviously). The zip code there is 95128.\",\n\t\"address\": {\n\t\t\"country_code\": \"US\"\n\t}\n}"
    },
    "url": {
      "raw": "https://api.shipengine.com/v1/addresses/recognize",
      "protocol": "https",
      "host": [
        "api",
        "shipengine",
        "com"
      ],
      "path": [
        "v1",
        "addresses",
        "recognize"
      ]
    },
    "description": "If you already know some parts of the address, you can provide them to ShipEngine, and we'll use those values. These values can also help us recognize other parts of the address."
  },
  "response": [
    {
      "name": "Already-known fields",
      "originalRequest": {
        "method": "POST",
        "header": [
          {
            "key": "Content-Type",
            "name": "Content-Type",
            "type": "text",
            "value": "application/json"
          }
        ],
        "body": {
          "mode": "raw",
          "raw": "{\n\t\"text\": \"I need to send a package to my friend Amanda Miller’s house at 525 Winchester Blvd in San Jose (that's california, obviously). The zip code there is 95128.\",\n\t\"address\": {\n\t\t\"country_code\": \"US\"\n\t}\n}",
          "options": {
            "raw": {
              "language": "json"
            }
          }
        },
        "url": {
          "raw": "https://api.shipengine.com/v1/addresses/recognize",
          "protocol": "https",
          "host": [
            "api",
            "shipengine",
            "com"
          ],
          "path": [
            "v1",
            "addresses",
            "recognize"
          ]
        }
      },
      "status": "OK",
      "code": 200,
      "_postman_previewlanguage": "json",
      "header": [
        {
          "key": "Date",
          "value": "Wed, 18 Sep 2019 16:21:30 GMT"
        },
        {
          "key": "Content-Type",
          "value": "application/json; charset=utf-8"
        },
        {
          "key": "Transfer-Encoding",
          "value": "chunked"
        },
        {
          "key": "Connection",
          "value": "keep-alive"
        },
        {
          "key": "Access-Control-Allow-Origin",
          "value": "https://www.shipengine.com"
        },
        {
          "key": "Vary",
          "value": "Origin"
        },
        {
          "key": "content-encoding",
          "value": "gzip"
        }
      ],
      "cookie": [
      ],
      "body": "{\n    \"score\": 0.9710697187242877,\n    \"address\": {\n        \"name\": \"Amanda Miller\",\n        \"address_line1\": \"525 Winchester Blvd\",\n        \"city_locality\": \"San Jose\",\n        \"state_province\": \"CA\",\n        \"postal_code\": \"95128\",\n        \"country_code\": \"US\",\n        \"address_residential_indicator\": \"yes\"\n    },\n    \"entities\": [\n        {\n            \"type\": \"person\",\n            \"score\": 0.9519646137063122,\n            \"text\": \"Amanda Miller\",\n            \"start_index\": 38,\n            \"end_index\": 50,\n            \"result\": {\n                \"value\": \"Amanda Miller\"\n            }\n        },\n        {\n            \"type\": \"residential_indicator\",\n            \"score\": 0.9519646137063122,\n            \"text\": \"house\",\n            \"start_index\": 54,\n            \"end_index\": 58,\n            \"result\": {\n                \"value\": \"yes\"\n            }\n        },\n        {\n            \"type\": \"address_line\",\n            \"score\": 0.9805313966503588,\n            \"text\": \"525 Winchester Blvd\",\n            \"start_index\": 63,\n            \"end_index\": 81,\n            \"result\": {\n                \"line\": 1,\n                \"value\": \"525 Winchester Blvd\"\n            }\n        },\n        {\n            \"type\": \"number\",\n            \"score\": 0.9805313966503588,\n            \"text\": \"525\",\n            \"start_index\": 63,\n            \"end_index\": 65,\n            \"result\": {\n                \"type\": \"cardinal\",\n                \"value\": 525\n            }\n        },\n        {\n            \"type\": \"city_locality\",\n            \"score\": 0.9805313966503588,\n            \"text\": \"San Jose\",\n            \"start_index\": 86,\n            \"end_index\": 93,\n            \"result\": {\n                \"value\": \"San Jose\"\n            }\n        },\n        {\n            \"type\": \"state_province\",\n            \"score\": 0.9805313966503588,\n            \"text\": \"california\",\n            \"start_index\": 103,\n            \"end_index\": 112,\n            \"result\": {\n                \"name\": \"California\",\n                \"value\": \"CA\"\n            }\n        },\n        {\n            \"type\": \"postal_code\",\n            \"score\": 0.9519646137063122,\n            \"text\": \"95128\",\n            \"start_index\": 149,\n            \"end_index\": 153,\n            \"result\": {\n                \"value\": \"95128\"\n            }\n        }\n    ]\n}"
    }
  ]
}