VB6 / ShipEngine Walkthrough / Create a label from scratch UPS Ground
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.
' {
' "shipment": {
' "service_code": "usps_priority_mail",
' "ship_from": {
' "name": "John Doe",
' "company_name": "Example Corp.",
' "address_line1": "4009 Marathon Blvd",
' "city_locality": "Austin",
' "state_province": "TX",
' "postal_code": "78756",
' "country_code": "US",
' "phone": "512-555-5555"
' },
' "ship_to": {
' "name": "Amanda Miller",
' "address_line1": "525 S Winchester Blvd",
' "city_locality": "San Jose",
' "state_province": "CA",
' "postal_code": "95128",
' "country_code": "US"
' },
' "packages": [
' {
' "weight": {
' "value": 17,
' "unit": "pound"
' },
' "dimensions": {
' "length": 36,
' "width": 12,
' "height": 24,
' "unit": "inch"
' }
' }
' ]
' }
' }
Dim json As New ChilkatJsonObject
success = json.UpdateString("shipment.service_code","usps_priority_mail")
success = json.UpdateString("shipment.ship_from.name","John Doe")
success = json.UpdateString("shipment.ship_from.company_name","Example Corp.")
success = json.UpdateString("shipment.ship_from.address_line1","4009 Marathon Blvd")
success = json.UpdateString("shipment.ship_from.city_locality","Austin")
success = json.UpdateString("shipment.ship_from.state_province","TX")
success = json.UpdateString("shipment.ship_from.postal_code","78756")
success = json.UpdateString("shipment.ship_from.country_code","US")
success = json.UpdateString("shipment.ship_from.phone","512-555-5555")
success = json.UpdateString("shipment.ship_to.name","Amanda Miller")
success = json.UpdateString("shipment.ship_to.address_line1","525 S Winchester Blvd")
success = json.UpdateString("shipment.ship_to.city_locality","San Jose")
success = json.UpdateString("shipment.ship_to.state_province","CA")
success = json.UpdateString("shipment.ship_to.postal_code","95128")
success = json.UpdateString("shipment.ship_to.country_code","US")
success = json.UpdateInt("shipment.packages[0].weight.value",17)
success = json.UpdateString("shipment.packages[0].weight.unit","pound")
success = json.UpdateInt("shipment.packages[0].dimensions.length",36)
success = json.UpdateInt("shipment.packages[0].dimensions.width",12)
success = json.UpdateInt("shipment.packages[0].dimensions.height",24)
success = json.UpdateString("shipment.packages[0].dimensions.unit","inch")
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/labels","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)
' {
' "label_id": "se-1375910",
' "status": "completed",
' "shipment_id": "se-4139930",
' "ship_date": "2019-09-17T00:00:00Z",
' "created_at": "2019-09-17T21:01:44.6228265Z",
' "shipment_cost": {
' "currency": "usd",
' "amount": 98.14
' },
' "insurance_cost": {
' "currency": "usd",
' "amount": 0
' },
' "tracking_number": "9405511899564298817982",
' "is_return_label": false,
' "rma_number": null,
' "is_international": false,
' "batch_id": "",
' "carrier_id": "se-121861",
' "service_code": "usps_priority_mail",
' "package_code": "package",
' "voided": false,
' "voided_at": null,
' "label_format": "pdf",
' "label_layout": "4x6",
' "trackable": true,
' "carrier_code": "stamps_com",
' "tracking_status": "in_transit",
' "label_download": {
' "pdf": "https://api.shipengine.com/v1/downloads/10/1VAXvK24_0qOSw0q8zQEJQ/label-1375910.pdf",
' "png": "https://api.shipengine.com/v1/downloads/10/1VAXvK24_0qOSw0q8zQEJQ/label-1375910.png",
' "zpl": "https://api.shipengine.com/v1/downloads/10/1VAXvK24_0qOSw0q8zQEJQ/label-1375910.zpl",
' "href": "https://api.shipengine.com/v1/downloads/10/1VAXvK24_0qOSw0q8zQEJQ/label-1375910.pdf"
' },
' "form_download": null,
' "insurance_claim": null,
' "packages": [
' {
' "package_code": "package",
' "weight": {
' "value": 17,
' "unit": "pound"
' },
' "dimensions": {
' "unit": "inch",
' "length": 36,
' "width": 12,
' "height": 24
' },
' "insured_value": {
' "currency": "usd",
' "amount": 0
' },
' "tracking_number": "9405511899564298817982",
' "label_messages": {
' "reference1": null,
' "reference2": null,
' "reference3": null
' },
' "external_package_id": null
' }
' ]
' }
' Sample code for parsing the JSON response...
' Use this online tool to generate parsing code from sample JSON: Generate JSON Parsing Code
Dim Value As Long
Dim Unit As String
Dim dimensionsUnit As String
Dim Length As Long
Dim Width As Long
Dim Height As Long
Dim insured_valueCurrency As String
Dim insured_valueAmount As Long
Dim Reference1 As String
Dim Reference2 As String
Dim Reference3 As String
Dim external_package_id As String
Dim label_id As String
label_id = jResp.StringOf("label_id")
Dim status As String
status = jResp.StringOf("status")
Dim shipment_id As String
shipment_id = jResp.StringOf("shipment_id")
Dim ship_date As String
ship_date = jResp.StringOf("ship_date")
Dim created_at As String
created_at = jResp.StringOf("created_at")
Dim v_Currency As String
v_Currency = jResp.StringOf("shipment_cost.currency")
Dim Amount As String
Amount = jResp.StringOf("shipment_cost.amount")
Dim insurance_costCurrency As String
insurance_costCurrency = jResp.StringOf("insurance_cost.currency")
Dim insurance_costAmount As Long
insurance_costAmount = jResp.IntOf("insurance_cost.amount")
Dim tracking_number As String
tracking_number = jResp.StringOf("tracking_number")
Dim is_return_label As Long
is_return_label = jResp.BoolOf("is_return_label")
Dim rma_number As String
rma_number = jResp.StringOf("rma_number")
Dim is_international As Long
is_international = jResp.BoolOf("is_international")
Dim batch_id As String
batch_id = jResp.StringOf("batch_id")
Dim carrier_id As String
carrier_id = jResp.StringOf("carrier_id")
Dim service_code As String
service_code = jResp.StringOf("service_code")
Dim package_code As String
package_code = jResp.StringOf("package_code")
Dim voided As Long
voided = jResp.BoolOf("voided")
Dim voided_at As String
voided_at = jResp.StringOf("voided_at")
Dim label_format As String
label_format = jResp.StringOf("label_format")
Dim label_layout As String
label_layout = jResp.StringOf("label_layout")
Dim trackable As Long
trackable = jResp.BoolOf("trackable")
Dim carrier_code As String
carrier_code = jResp.StringOf("carrier_code")
Dim tracking_status As String
tracking_status = jResp.StringOf("tracking_status")
Dim v_Pdf As String
v_Pdf = jResp.StringOf("label_download.pdf")
Dim Png As String
Png = jResp.StringOf("label_download.png")
Dim Zpl As String
Zpl = jResp.StringOf("label_download.zpl")
Dim Href As String
Href = jResp.StringOf("label_download.href")
Dim form_download As String
form_download = jResp.StringOf("form_download")
Dim insurance_claim As String
insurance_claim = jResp.StringOf("insurance_claim")
Dim i As Long
i = 0
Dim count_i As Long
count_i = jResp.SizeOfArray("packages")
Do While i < count_i
jResp.I = i
package_code = jResp.StringOf("packages[i].package_code")
Value = jResp.IntOf("packages[i].weight.value")
Unit = jResp.StringOf("packages[i].weight.unit")
dimensionsUnit = jResp.StringOf("packages[i].dimensions.unit")
Length = jResp.IntOf("packages[i].dimensions.length")
Width = jResp.IntOf("packages[i].dimensions.width")
Height = jResp.IntOf("packages[i].dimensions.height")
insured_valueCurrency = jResp.StringOf("packages[i].insured_value.currency")
insured_valueAmount = jResp.IntOf("packages[i].insured_value.amount")
tracking_number = jResp.StringOf("packages[i].tracking_number")
Reference1 = jResp.StringOf("packages[i].label_messages.reference1")
Reference2 = jResp.StringOf("packages[i].label_messages.reference2")
Reference3 = jResp.StringOf("packages[i].label_messages.reference3")
external_package_id = jResp.StringOf("packages[i].external_package_id")
i = i + 1
Loop
Curl Command
curl -X POST
-H "API-Key: {{API_KEY}}"
-H "Content-Type: application/json"
-d '{
"shipment": {
"service_code": "usps_priority_mail",
"ship_from": {
"name": "John Doe",
"company_name": "Example Corp.",
"address_line1": "4009 Marathon Blvd",
"city_locality": "Austin",
"state_province": "TX",
"postal_code": "78756",
"country_code": "US",
"phone": "512-555-5555"
},
"ship_to": {
"name": "Amanda Miller",
"address_line1": "525 S Winchester Blvd",
"city_locality": "San Jose",
"state_province": "CA",
"postal_code": "95128",
"country_code": "US"
},
"packages": [
{
"weight": {
"value": 17,
"unit": "pound"
},
"dimensions": {
"length": 36,
"width": 12,
"height": 24,
"unit": "inch"
}
}
]
}
}'
https://api.shipengine.com/v1/labels
Postman Collection Item JSON
{
"name": "Create a label from scratch UPS Ground",
"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\"shipment\": {\n\t\t\"service_code\": \"usps_priority_mail\",\n\t\t\"ship_from\": {\n\t\t\t\"name\": \"John Doe\",\n\t\t\t\"company_name\": \"Example Corp.\",\n\t\t\t\"address_line1\": \"4009 Marathon Blvd\",\n\t\t\t\"city_locality\": \"Austin\",\n\t\t\t\"state_province\": \"TX\",\n\t\t\t\"postal_code\": \"78756\",\n\t\t\t\"country_code\": \"US\",\n\t\t\t\"phone\": \"512-555-5555\"\n\t\t},\n\t\t\"ship_to\": {\n\t\t\t\"name\": \"Amanda Miller\",\n\t\t\t\"address_line1\": \"525 S Winchester Blvd\",\n\t\t\t\"city_locality\": \"San Jose\",\n\t\t\t\"state_province\": \"CA\",\n\t\t\t\"postal_code\": \"95128\",\n\t\t\t\"country_code\": \"US\"\n\t\t},\n\t\t\"packages\": [\n\t\t\t{\n\t\t\t\t\"weight\": {\n\t\t\t\t\t\"value\": 17,\n\t\t\t\t\t\"unit\": \"pound\"\n\t\t\t\t},\n\t\t\t\t\"dimensions\": {\n\t\t\t\t\t\"length\": 36,\n\t\t\t\t\t\"width\": 12,\n\t\t\t\t\t\"height\": 24,\n\t\t\t\t\t\"unit\": \"inch\"\n\t\t\t\t}\n\t\t\t}\n\t\t]\n\t}\n}"
},
"url": {
"raw": "https://api.shipengine.com/v1/labels",
"protocol": "https",
"host": [
"api",
"shipengine",
"com"
],
"path": [
"v1",
"labels"
]
},
"description": "This request shows how to create a label by specifying all the information in a single request. It's the easiest way to create a label if you already know exactly what you want..."
},
"response": [
{
"name": "Create a label from scratch",
"originalRequest": {
"method": "POST",
"header": [
{
"key": "Content-Type",
"name": "Content-Type",
"type": "text",
"value": "application/json"
}
],
"body": {
"mode": "raw",
"raw": "{\n\t\"shipment\": {\n\t\t\"service_code\": \"usps_priority_mail\",\n\t\t\"ship_from\": {\n\t\t\t\"name\": \"John Doe\",\n\t\t\t\"company_name\": \"Example Corp.\",\n\t\t\t\"address_line1\": \"4009 Marathon Blvd\",\n\t\t\t\"city_locality\": \"Austin\",\n\t\t\t\"state_province\": \"TX\",\n\t\t\t\"postal_code\": \"78756\",\n\t\t\t\"country_code\": \"US\",\n\t\t\t\"phone\": \"512-555-5555\"\n\t\t},\n\t\t\"ship_to\": {\n\t\t\t\"name\": \"Amanda Miller\",\n\t\t\t\"address_line1\": \"525 S Winchester Blvd\",\n\t\t\t\"city_locality\": \"San Jose\",\n\t\t\t\"state_province\": \"CA\",\n\t\t\t\"postal_code\": \"95128\",\n\t\t\t\"country_code\": \"US\"\n\t\t},\n\t\t\"packages\": [\n\t\t\t{\n\t\t\t\t\"weight\": {\n\t\t\t\t\t\"value\": 17,\n\t\t\t\t\t\"unit\": \"pound\"\n\t\t\t\t},\n\t\t\t\t\"dimensions\": {\n\t\t\t\t\t\"length\": 36,\n\t\t\t\t\t\"width\": 12,\n\t\t\t\t\t\"height\": 24,\n\t\t\t\t\t\"unit\": \"inch\"\n\t\t\t\t}\n\t\t\t}\n\t\t]\n\t}\n}",
"options": {
"raw": {
"language": "json"
}
}
},
"url": {
"raw": "https://api.shipengine.com/v1/labels",
"protocol": "https",
"host": [
"api",
"shipengine",
"com"
],
"path": [
"v1",
"labels"
]
}
},
"status": "OK",
"code": 200,
"_postman_previewlanguage": "json",
"header": [
{
"key": "Date",
"value": "Tue, 17 Sep 2019 21:01:45 GMT"
},
{
"key": "Content-Type",
"value": "application/json; charset=utf-8"
},
{
"key": "Content-Length",
"value": "1820"
},
{
"key": "Connection",
"value": "keep-alive"
},
{
"key": "Access-Control-Allow-Origin",
"value": "https://www.shipengine.com"
},
{
"key": "Vary",
"value": "Origin"
},
{
"key": "server",
"value": "Microsoft-IIS/8.0"
},
{
"key": "x-newrelic-app-data",
"value": "PxQGVFZXCgITVVZbAwMCV1YGFB9AMQYAZBBZDEtZV0ZaCldOZgRRIzR/GC0HAV1fQ0sxF0VSXwcXVHpSAAMPQBxSFlIUCRoABFwMWQFVBE5TBwVNRFF8dwVTUSMFAw4nJXd3d1JETwRRDksHZQ=="
},
{
"key": "x-powered-by",
"value": "ASP.NET"
},
{
"key": "x-shipengine-environment",
"value": "j"
},
{
"key": "x-shipengine-requestid",
"value": "2183cd26-587e-4a1d-a89c-e873abcd97ef"
},
{
"key": "x-shipengine-server",
"value": "SS-J-WEB03"
}
],
"cookie": [
],
"body": "{\n \"label_id\": \"se-1375910\",\n \"status\": \"completed\",\n \"shipment_id\": \"se-4139930\",\n \"ship_date\": \"2019-09-17T00:00:00Z\",\n \"created_at\": \"2019-09-17T21:01:44.6228265Z\",\n \"shipment_cost\": {\n \"currency\": \"usd\",\n \"amount\": 98.14\n },\n \"insurance_cost\": {\n \"currency\": \"usd\",\n \"amount\": 0\n },\n \"tracking_number\": \"9405511899564298817982\",\n \"is_return_label\": false,\n \"rma_number\": null,\n \"is_international\": false,\n \"batch_id\": \"\",\n \"carrier_id\": \"se-121861\",\n \"service_code\": \"usps_priority_mail\",\n \"package_code\": \"package\",\n \"voided\": false,\n \"voided_at\": null,\n \"label_format\": \"pdf\",\n \"label_layout\": \"4x6\",\n \"trackable\": true,\n \"carrier_code\": \"stamps_com\",\n \"tracking_status\": \"in_transit\",\n \"label_download\": {\n \"pdf\": \"https://api.shipengine.com/v1/downloads/10/1VAXvK24_0qOSw0q8zQEJQ/label-1375910.pdf\",\n \"png\": \"https://api.shipengine.com/v1/downloads/10/1VAXvK24_0qOSw0q8zQEJQ/label-1375910.png\",\n \"zpl\": \"https://api.shipengine.com/v1/downloads/10/1VAXvK24_0qOSw0q8zQEJQ/label-1375910.zpl\",\n \"href\": \"https://api.shipengine.com/v1/downloads/10/1VAXvK24_0qOSw0q8zQEJQ/label-1375910.pdf\"\n },\n \"form_download\": null,\n \"insurance_claim\": null,\n \"packages\": [\n {\n \"package_code\": \"package\",\n \"weight\": {\n \"value\": 17,\n \"unit\": \"pound\"\n },\n \"dimensions\": {\n \"unit\": \"inch\",\n \"length\": 36,\n \"width\": 12,\n \"height\": 24\n },\n \"insured_value\": {\n \"currency\": \"usd\",\n \"amount\": 0\n },\n \"tracking_number\": \"9405511899564298817982\",\n \"label_messages\": {\n \"reference1\": null,\n \"reference2\": null,\n \"reference3\": null\n },\n \"external_package_id\": null\n }\n ]\n}"
}
]
}
