B4X
B4X
MWS SubmitFeed (Amazon Marketplace Web Service)
See more HTTP Misc Examples
Uploads a feed for processing by Amazon MWS.See Amazon MWS SubmitFeed for the Amazon MWS SubmitFeed reference documentation.
Important: The Chilkat v9.5.0.75 release accidentally breaks Amazon MWS (not AWS) authentication. If you need MWS with 9.5.0.75, send email to support@chilkatsoft.com for a hotfix, or revert back to v9.5.0.73, or update to a version after 9.5.0.75.
Chilkat B4X Downloads
Dim success As Boolean = False
' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
' This example will send an XML file in the HTTP request body.
' First we'll construct the XML, then we'll compute the MD5 digest which needs to be added as a query param..
' Construct the following XML. (This is just a sample XML body..)
' <AmazonEnvelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
' xsi:noNamespaceSchemaLocation="amzn-envelope.xsd">
' <Header>
' <DocumentVersion>1.01</DocumentVersion>
' <MerchantIdentifier>M_EXAMPLE_123456</MerchantIdentifier>
' </Header>
' <MessageType>Product</MessageType>
' <PurgeAndReplace>false</PurgeAndReplace>
' <Message>
' <MessageID>1</MessageID>
' <OperationType>Update</OperationType>
' <Product>
' <SKU>56789</SKU>
' <StandardProductID>
' <Type>ASIN</Type>
' <Value>B0EXAMPLEG</Value>
' </StandardProductID>
' <ProductTaxCode>A_GEN_NOTAX</ProductTaxCode>
' <DescriptionData>
' <Title>Example Product Title</Title>
' <Brand>Example Product Brand</Brand>
' <Description>This is an example product description.</Description>
' <BulletPoint>Example Bullet Point 1</BulletPoint>
' <BulletPoint>Example Bullet Point 2</BulletPoint>
' <MSRP currency="USD">25.19</MSRP>
' <Manufacturer>Example Product Manufacturer</Manufacturer>
' <ItemType>example-item-type</ItemType>
' </DescriptionData>
' <ProductData>
' <Health>
' <ProductType>
' <HealthMisc>
' <Ingredients>Example Ingredients</Ingredients>
' <Directions>Example Directions</Directions>
' </HealthMisc>
' </ProductType>
' </Health>
' </ProductData>
' </Product>
' </Message>
' </AmazonEnvelope>
' This code was generated by pasting the above XML into the online tool at http://tools.chilkat.io/xmlCreate.cshtml
Dim xml As ChilkatXml
xml.Initialize
xml.Tag = "AmazonEnvelope"
xml.AddAttribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance")
xml.AddAttribute("xsi:noNamespaceSchemaLocation", "amzn-envelope.xsd")
xml.UpdateChildContent("Header|DocumentVersion", "1.01")
xml.UpdateChildContent("Header|MerchantIdentifier", "M_EXAMPLE_123456")
xml.UpdateChildContent("MessageType", "Product")
xml.UpdateChildContent("PurgeAndReplace", "false")
xml.UpdateChildContent("Message|MessageID", "1")
xml.UpdateChildContent("Message|OperationType", "Update")
xml.UpdateChildContent("Message|Product|SKU", "56789")
xml.UpdateChildContent("Message|Product|StandardProductID|Type", "ASIN")
xml.UpdateChildContent("Message|Product|StandardProductID|Value", "B0EXAMPLEG")
xml.UpdateChildContent("Message|Product|ProductTaxCode", "A_GEN_NOTAX")
xml.UpdateChildContent("Message|Product|DescriptionData|Title", "Example Product Title")
xml.UpdateChildContent("Message|Product|DescriptionData|Brand", "Example Product Brand")
xml.UpdateChildContent("Message|Product|DescriptionData|Description", "This is an example product description.")
xml.UpdateChildContent("Message|Product|DescriptionData|BulletPoint", "Example Bullet Point 1")
xml.UpdateChildContent("Message|Product|DescriptionData|BulletPoint[1]", "Example Bullet Point 2")
xml.UpdateAttrAt("Message|Product|DescriptionData|MSRP", True, "currency", "USD")
xml.UpdateChildContent("Message|Product|DescriptionData|MSRP", "25.19")
xml.UpdateChildContent("Message|Product|DescriptionData|Manufacturer", "Example Product Manufacturer")
xml.UpdateChildContent("Message|Product|DescriptionData|ItemType", "example-item-type")
xml.UpdateChildContent("Message|Product|ProductData|Health|ProductType|HealthMisc|Ingredients", "Example Ingredients")
xml.UpdateChildContent("Message|Product|ProductData|Health|ProductType|HealthMisc|Directions", "Example Directions")
' Get the XML in the most compact form for the feed submission.
Dim sbXml As ChilkatStringBuilder
sbXml.Initialize
xml.EmitCompact = True
xml.GetXmlSb(sbXml)
' Get the MD5 hash..
Dim crypt As ChilkatCrypt2
crypt.Initialize("crypt")
crypt.HashAlgorithm = "md5"
Dim contentMd5Value As String = crypt.HashStringENC(sbXml.GetAsString)
Dim rest As ChilkatRest
rest.Initialize("rest")
' Connect to the Amazon MWS REST server.
'
' Make sure to connect to the correct Amazon MWS Endpoing, otherwise
' you'll get an HTTP 401 response code.
'
' The possible servers are:
'
' North America (NA) https://mws.amazonservices.com
' Europe (EU) https://mws-eu.amazonservices.com
' India (IN) https://mws.amazonservices.in
' China (CN) https://mws.amazonservices.com.cn
' Japan (JP) https://mws.amazonservices.jp
'
Dim bTls As Boolean = True
Dim port As Int = 443
Dim bAutoReconnect As Boolean = True
success = rest.Connect("mws.amazonservices.com", port, bTls, bAutoReconnect)
rest.Host = "mws.amazonservices.com"
rest.AddQueryParam("AWSAccessKeyId", "0PB842ExampleN4ZTR2")
rest.AddQueryParam("Action", "SubmitFeed")
rest.AddQueryParam("FeedType", "_POST_PRODUCT_DATA_")
rest.AddQueryParam("MWSAuthToken", "amzn.mws.4ea38b7b-f563-7709-4bae-87aeaEXAMPLE")
rest.AddQueryParam("MarketplaceId.Id.1", "ATVExampleDER")
rest.AddQueryParam("SellerId", "A1XExample5E6")
rest.AddQueryParam("ContentMD5Value", contentMd5Value)
rest.AddQueryParam("SignatureMethod", "HmacSHA256")
rest.AddQueryParam("SignatureVersion", "2")
rest.AddQueryParam("Version", "2009-01-01")
' Add the MWS Signature param. (Also adds the Timestamp parameter using the curent system date/time.)
rest.AddMwsSignature("POST", "/Feeds/2009-01-01", "mws.amazonservices.com", "MWS_SECRET_ACCESS_KEY_ID")
rest.AddHeader("Content-Type", "text/xml")
Dim responseXml As String = rest.FullRequestString("POST", "/Feeds/2009-01-01", sbXml.GetAsString)
If rest.LastMethodSuccess <> True Then
Log(rest.LastErrorText)
Return
End If
If rest.ResponseStatusCode <> 200 Then
' Examine the request/response to see what happened.
Log("response status code = " & rest.ResponseStatusCode)
Log("response status text = " & rest.ResponseStatusText)
Log("response header: " & rest.ResponseHeader)
Log("response body: " & responseXml)
Log("---")
Log("LastRequestStartLine: " & rest.LastRequestStartLine)
Log("LastRequestHeader: " & rest.LastRequestHeader)
End If
' Examine the XML returned in the response body.
Log(responseXml)
Log("----")
Log("Success.")