Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(VB.NET UWP/WinRT) Shippo Create Shipment ObjectCreate a Shipment object to retrieve rates. It represents a request to ship a given package from the sender to the recipient address. For more information, see https://goshippo.com/docs/shipping-labels/
' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim http As New Chilkat.Http Dim success As Boolean ' Implements the following CURL command: ' curl https://api.goshippo.com/shipments/ \ ' -H "Authorization: ShippoToken <API_TOKEN>" \ ' -H "Content-Type: application/json" \ ' -d '{ ' "address_from":{ ' "name":"Mr. Hippo", ' "street1":"215 Clayton St.", ' "city":"San Francisco", ' "state":"CA", ' "zip":"94117", ' "country":"US" ' }, ' "address_to":{ ' "name":"Mrs. Hippo", ' "street1":"965 Mission St.", ' "city":"San Francisco", ' "state":"CA", ' "zip":"94105", ' "country":"US" ' }, ' "parcels":[{ ' "length":"5", ' "width":"5", ' "height":"5", ' "distance_unit":"in", ' "weight":"2", ' "mass_unit":"lb" ' }], ' "async": false ' }' ' 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_from": { ' "name": "Mr. Hippo", ' "street1": "215 Clayton St.", ' "city": "San Francisco", ' "state": "CA", ' "zip": "94117", ' "country": "US" ' }, ' "address_to": { ' "name": "Mrs. Hippo", ' "street1": "965 Mission St.", ' "city": "San Francisco", ' "state": "CA", ' "zip": "94105", ' "country": "US" ' }, ' "parcels": [ ' { ' "length": "5", ' "width": "5", ' "height": "5", ' "distance_unit": "in", ' "weight": "2", ' "mass_unit": "lb" ' } ' ], ' "async": false ' } Dim json As New Chilkat.JsonObject json.UpdateString("address_from.name","Mr. Hippo") json.UpdateString("address_from.street1","215 Clayton St.") json.UpdateString("address_from.city","San Francisco") json.UpdateString("address_from.state","CA") json.UpdateString("address_from.zip","94117") json.UpdateString("address_from.country","US") json.UpdateString("address_to.name","Mrs. Hippo") json.UpdateString("address_to.street1","965 Mission St.") json.UpdateString("address_to.city","San Francisco") json.UpdateString("address_to.state","CA") json.UpdateString("address_to.zip","94105") json.UpdateString("address_to.country","US") json.UpdateString("parcels[0].length","5") json.UpdateString("parcels[0].width","5") json.UpdateString("parcels[0].height","5") json.UpdateString("parcels[0].distance_unit","in") json.UpdateString("parcels[0].weight","2") json.UpdateString("parcels[0].mass_unit","lb") json.UpdateBool("async",False) http.SetRequestHeader("Authorization","ShippoToken <API_TOKEN>") http.SetRequestHeader("Content-Type","application/json") Dim resp As Chilkat.HttpResponse = Await http.PostJson3Async("https://api.goshippo.com/shipments/","application/json",json) If (http.LastMethodSuccess = False) Then Debug.WriteLine(http.LastErrorText) Exit Sub End If Dim sbResponseBody As New Chilkat.StringBuilder resp.GetBodySb(sbResponseBody) Dim jResp As New Chilkat.JsonObject jResp.LoadSb(sbResponseBody) jResp.EmitCompact = False Debug.WriteLine("Response Body:") Debug.WriteLine(jResp.Emit()) Dim respStatusCode As Integer = resp.StatusCode Debug.WriteLine("Response Status Code = " & respStatusCode) If (respStatusCode >= 400) Then Debug.WriteLine("Response Header:") Debug.WriteLine(resp.Header) Debug.WriteLine("Failed.") Exit Sub End If ' Sample JSON response: ' (Sample code for parsing the JSON response is shown below) ' { ' "carrier_accounts": [ ' ], ' "object_created": "2019-06-28T17:45:20.441Z", ' "object_updated": "2019-06-28T17:45:20.511Z", ' "object_id": "17b01795a4884d8a9002ccc17c9d09d1", ' "object_owner": "admin@chilkatsoft.com", ' "status": "SUCCESS", ' "address_from": { ' "object_id": "427489906b604f498f7bd2429ab7d9a1", ' "is_complete": true, ' "name": "Mr. Hippo", ' "company": "", ' "street_no": "", ' "street1": "215 Clayton St.", ' "validation_results": {}, ' "street2": "", ' "street3": "", ' "city": "San Francisco", ' "state": "CA", ' "zip": "94117", ' "country": "US", ' "phone": "", ' "email": "", ' "is_residential": null, ' "test": true ' }, ' "address_to": { ' "object_id": "3d7166269a2844b7842ef9ace942ec7c", ' "is_complete": true, ' "name": "Mrs. Hippo", ' "company": "", ' "street_no": "", ' "street1": "965 Mission St.", ' "validation_results": {}, ' "street2": "", ' "street3": "", ' "city": "San Francisco", ' "state": "CA", ' "zip": "94105", ' "country": "US", ' "phone": "", ' "email": "", ' "is_residential": null, ' "test": true ' }, ' "parcels": [ ' { ' "object_state": "VALID", ' "object_created": "2019-06-28T17:45:20.411Z", ' "object_updated": "2019-06-28T17:45:20.455Z", ' "object_id": "5af766ff15684a4186b0e3c833348fac", ' "object_owner": "admin@chilkatsoft.com", ' "template": null, ' "extra": {}, ' "length": "5.0000", ' "width": "5.0000", ' "height": "5.0000", ' "distance_unit": "in", ' "weight": "2.0000", ' "mass_unit": "lb", ' "value_amount": null, ' "value_currency": null, ' "metadata": "", ' "line_items": [ ' ], ' "test": true ' } ' ], ' "shipment_date": "2019-06-28T17:45:20.511Z", ' "address_return": { ' "object_id": "427489906b604f498f7bd2429ab7d9a1", ' "is_complete": true, ' "name": "Mr. Hippo", ' "company": "", ' "street_no": "", ' "street1": "215 Clayton St.", ' "validation_results": {}, ' "street2": "", ' "street3": "", ' "city": "San Francisco", ' "state": "CA", ' "zip": "94117", ' "country": "US", ' "phone": "", ' "email": "", ' "is_residential": null, ' "test": true ' }, ' "alternate_address_to": null, ' "customs_declaration": null, ' "extra": {}, ' "rates": [ ' { ' "object_created": "2019-06-28T17:45:20.789Z", ' "object_id": "dd7556c284e8444294d2ab7099e662d2", ' "object_owner": "admin@chilkatsoft.com", ' "shipment": "17b01795a4884d8a9002ccc17c9d09d1", ' "attributes": [ ' "FASTEST" ' ], ' "amount": "22.78", ' "currency": "USD", ' "amount_local": "22.78", ' "currency_local": "USD", ' "provider": "USPS", ' "provider_image_75": "https://shippo-static.s3.amazonaws.com/providers/75/USPS.png", ' "provider_image_200": "https://shippo-static.s3.amazonaws.com/providers/200/USPS.png", ' "servicelevel": { ' "name": "Priority Mail Express", ' "token": "usps_priority_express", ' "terms": "" ' }, ' "estimated_days": 2, ' "arrives_by": null, ' "duration_terms": "Overnight delivery to most U.S. locations.", ' "messages": [ ' ], ' "carrier_account": "1f3dc340ad6c4991ad61f14fa3e4b82e", ' "test": true, ' "zone": "1" ' }, ' { ' "object_created": "2019-06-28T17:45:20.786Z", ' "object_id": "ec11cc297e2f4583986097f6d409e5c6", ' "object_owner": "admin@chilkatsoft.com", ' "shipment": "17b01795a4884d8a9002ccc17c9d09d1", ' "attributes": [ ' "BESTVALUE", ' "CHEAPEST", ' "FASTEST" ' ], ' "amount": "6.95", ' "currency": "USD", ' "amount_local": "6.95", ' "currency_local": "USD", ' "provider": "USPS", ' "provider_image_75": "https://shippo-static.s3.amazonaws.com/providers/75/USPS.png", ' "provider_image_200": "https://shippo-static.s3.amazonaws.com/providers/200/USPS.png", ' "servicelevel": { ' "name": "Priority Mail", ' "token": "usps_priority", ' "terms": "" ' }, ' "estimated_days": 2, ' "arrives_by": null, ' "duration_terms": "Delivery within 1, 2, or 3 days based on where your package started and where it’s being sent.", ' "messages": [ ' ], ' "carrier_account": "1f3dc340ad6c4991ad61f14fa3e4b82e", ' "test": true, ' "zone": "1" ' }, ' { ' "object_created": "2019-06-28T17:45:20.785Z", ' "object_id": "d256586f539f4c93a2f02cc11f4942ac", ' "object_owner": "admin@chilkatsoft.com", ' "shipment": "17b01795a4884d8a9002ccc17c9d09d1", ' "attributes": [ ' ], ' "amount": "7.32", ' "currency": "USD", ' "amount_local": "7.32", ' "currency_local": "USD", ' "provider": "USPS", ' "provider_image_75": "https://shippo-static.s3.amazonaws.com/providers/75/USPS.png", ' "provider_image_200": "https://shippo-static.s3.amazonaws.com/providers/200/USPS.png", ' "servicelevel": { ' "name": "Parcel Select", ' "token": "usps_parcel_select", ' "terms": "" ' }, ' "estimated_days": 7, ' "arrives_by": null, ' "duration_terms": "Delivery in 2 to 8 days.", ' "messages": [ ' ], ' "carrier_account": "1f3dc340ad6c4991ad61f14fa3e4b82e", ' "test": true, ' "zone": "1" ' } ' ], ' "messages": [ ' { ' "source": "DHLExpress", ' "code": "", ' "text": "Shippo's DHL Express master account doesn't support shipments to inside of the US" ' } ' ], ' "metadata": "", ' "test": true, ' "order": null ' } ' Sample code for parsing the JSON response... ' Use the following online tool to generate parsing code from sample JSON: ' Generate Parsing Code from JSON Dim object_state As String Dim template As String Dim length As String Dim width As String Dim height As String Dim distance_unit As String Dim weight As String Dim mass_unit As String Dim value_amount As String Dim value_currency As String Dim j As Integer Dim count_j As Integer Dim shipment As String Dim amount As String Dim currency As String Dim amount_local As String Dim currency_local As String Dim provider As String Dim provider_image_75 As String Dim provider_image_200 As String Dim servicelevelName As String Dim servicelevelToken As String Dim servicelevelTerms As String Dim estimated_days As Integer Dim arrives_by As String Dim duration_terms As String Dim carrier_account As String Dim zone As String Dim strVal As String Dim source As String Dim code As String Dim text As String Dim object_created As String = jResp.StringOf("object_created") Dim object_updated As String = jResp.StringOf("object_updated") Dim object_id As String = jResp.StringOf("object_id") Dim object_owner As String = jResp.StringOf("object_owner") Dim status As String = jResp.StringOf("status") Dim address_fromObject_id As String = jResp.StringOf("address_from.object_id") Dim address_fromIs_complete As Boolean = jResp.BoolOf("address_from.is_complete") Dim address_fromName As String = jResp.StringOf("address_from.name") Dim address_fromCompany As String = jResp.StringOf("address_from.company") Dim address_fromStreet_no As String = jResp.StringOf("address_from.street_no") Dim address_fromStreet1 As String = jResp.StringOf("address_from.street1") Dim address_fromStreet2 As String = jResp.StringOf("address_from.street2") Dim address_fromStreet3 As String = jResp.StringOf("address_from.street3") Dim address_fromCity As String = jResp.StringOf("address_from.city") Dim address_fromState As String = jResp.StringOf("address_from.state") Dim address_fromZip As String = jResp.StringOf("address_from.zip") Dim address_fromCountry As String = jResp.StringOf("address_from.country") Dim address_fromPhone As String = jResp.StringOf("address_from.phone") Dim address_fromEmail As String = jResp.StringOf("address_from.email") Dim address_fromIs_residential As String = jResp.StringOf("address_from.is_residential") Dim address_fromTest As Boolean = jResp.BoolOf("address_from.test") Dim address_toObject_id As String = jResp.StringOf("address_to.object_id") Dim address_toIs_complete As Boolean = jResp.BoolOf("address_to.is_complete") Dim address_toName As String = jResp.StringOf("address_to.name") Dim address_toCompany As String = jResp.StringOf("address_to.company") Dim address_toStreet_no As String = jResp.StringOf("address_to.street_no") Dim address_toStreet1 As String = jResp.StringOf("address_to.street1") Dim address_toStreet2 As String = jResp.StringOf("address_to.street2") Dim address_toStreet3 As String = jResp.StringOf("address_to.street3") Dim address_toCity As String = jResp.StringOf("address_to.city") Dim address_toState As String = jResp.StringOf("address_to.state") Dim address_toZip As String = jResp.StringOf("address_to.zip") Dim address_toCountry As String = jResp.StringOf("address_to.country") Dim address_toPhone As String = jResp.StringOf("address_to.phone") Dim address_toEmail As String = jResp.StringOf("address_to.email") Dim address_toIs_residential As String = jResp.StringOf("address_to.is_residential") Dim address_toTest As Boolean = jResp.BoolOf("address_to.test") Dim shipment_date As String = jResp.StringOf("shipment_date") Dim address_returnObject_id As String = jResp.StringOf("address_return.object_id") Dim address_returnIs_complete As Boolean = jResp.BoolOf("address_return.is_complete") Dim address_returnName As String = jResp.StringOf("address_return.name") Dim address_returnCompany As String = jResp.StringOf("address_return.company") Dim address_returnStreet_no As String = jResp.StringOf("address_return.street_no") Dim address_returnStreet1 As String = jResp.StringOf("address_return.street1") Dim address_returnStreet2 As String = jResp.StringOf("address_return.street2") Dim address_returnStreet3 As String = jResp.StringOf("address_return.street3") Dim address_returnCity As String = jResp.StringOf("address_return.city") Dim address_returnState As String = jResp.StringOf("address_return.state") Dim address_returnZip As String = jResp.StringOf("address_return.zip") Dim address_returnCountry As String = jResp.StringOf("address_return.country") Dim address_returnPhone As String = jResp.StringOf("address_return.phone") Dim address_returnEmail As String = jResp.StringOf("address_return.email") Dim address_returnIs_residential As String = jResp.StringOf("address_return.is_residential") Dim address_returnTest As Boolean = jResp.BoolOf("address_return.test") Dim alternate_address_to As String = jResp.StringOf("alternate_address_to") Dim customs_declaration As String = jResp.StringOf("customs_declaration") Dim metadata As String = jResp.StringOf("metadata") Dim test As Boolean = jResp.BoolOf("test") Dim order As String = jResp.StringOf("order") Dim i As Integer = 0 Dim count_i As Integer = jResp.SizeOfArray("carrier_accounts") While i < count_i jResp.I = i i = i + 1 End While i = 0 count_i = jResp.SizeOfArray("parcels") While i < count_i jResp.I = i object_state = jResp.StringOf("parcels[i].object_state") object_created = jResp.StringOf("parcels[i].object_created") object_updated = jResp.StringOf("parcels[i].object_updated") object_id = jResp.StringOf("parcels[i].object_id") object_owner = jResp.StringOf("parcels[i].object_owner") template = jResp.StringOf("parcels[i].template") length = jResp.StringOf("parcels[i].length") width = jResp.StringOf("parcels[i].width") height = jResp.StringOf("parcels[i].height") distance_unit = jResp.StringOf("parcels[i].distance_unit") weight = jResp.StringOf("parcels[i].weight") mass_unit = jResp.StringOf("parcels[i].mass_unit") value_amount = jResp.StringOf("parcels[i].value_amount") value_currency = jResp.StringOf("parcels[i].value_currency") metadata = jResp.StringOf("parcels[i].metadata") test = jResp.BoolOf("parcels[i].test") j = 0 count_j = jResp.SizeOfArray("parcels[i].line_items") While j < count_j jResp.J = j j = j + 1 End While i = i + 1 End While i = 0 count_i = jResp.SizeOfArray("rates") While i < count_i jResp.I = i object_created = jResp.StringOf("rates[i].object_created") object_id = jResp.StringOf("rates[i].object_id") object_owner = jResp.StringOf("rates[i].object_owner") shipment = jResp.StringOf("rates[i].shipment") amount = jResp.StringOf("rates[i].amount") currency = jResp.StringOf("rates[i].currency") amount_local = jResp.StringOf("rates[i].amount_local") currency_local = jResp.StringOf("rates[i].currency_local") provider = jResp.StringOf("rates[i].provider") provider_image_75 = jResp.StringOf("rates[i].provider_image_75") provider_image_200 = jResp.StringOf("rates[i].provider_image_200") servicelevelName = jResp.StringOf("rates[i].servicelevel.name") servicelevelToken = jResp.StringOf("rates[i].servicelevel.token") servicelevelTerms = jResp.StringOf("rates[i].servicelevel.terms") estimated_days = jResp.IntOf("rates[i].estimated_days") arrives_by = jResp.StringOf("rates[i].arrives_by") duration_terms = jResp.StringOf("rates[i].duration_terms") carrier_account = jResp.StringOf("rates[i].carrier_account") test = jResp.BoolOf("rates[i].test") zone = jResp.StringOf("rates[i].zone") j = 0 count_j = jResp.SizeOfArray("rates[i].attributes") While j < count_j jResp.J = j strVal = jResp.StringOf("rates[i].attributes[j]") j = j + 1 End While j = 0 count_j = jResp.SizeOfArray("rates[i].messages") While j < count_j jResp.J = j j = j + 1 End While i = i + 1 End While i = 0 count_i = jResp.SizeOfArray("messages") While i < count_i jResp.I = i source = jResp.StringOf("messages[i].source") code = jResp.StringOf("messages[i].code") text = jResp.StringOf("messages[i].text") i = i + 1 End While |
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.