VBA Script to parse XML and create records in two tables

The script in the attached [login to view URL] is used in Microsoft Access 365. It monitors the folder C:\123 for new files every 60 seconds. When a new file is created there it displays a message box.

I need code to that instead of displaying a message box will:

- Load XML from an xml file created in that folder (ignore if file is not .xml)

- Create a record in the table "ListOrdersResponse" with using the xml file name as ListOrdersResponseId and populate any of the other fields where the corresponding elements have attributes in that file.

- For each "AmazonOrderId" in the xml file, create a record in the table "Order" and populate any of the other fields where the corresponding elements have attributes in that file, again using the using the xml file name as ListOrdersResponseId

Note regarding naming in tables:

You can change these if you wish. Currently, fields are named the same as the corresponding elements. Where there are child nodes they are named ParentNode_ChildNode_ChildNode. The exceptions are the 2 "PaymentExecutionDetails" nodes due to length - these are shortened to PaymentED_PaymentExecutionDetailItem_Payment_CurrencyCode and PaymentED_PaymentExecutionDetailItem_Payment_Amount.

Please see attached files. [login to view URL] is a sample. [login to view URL] contains (edited) real information. Please note that they use the same element names, but they are in a different order, some are not included in each and example456 contains more than one order.

[login to view URL]

[login to view URL]

[login to view URL]

[login to view URL]

[login to view URL]

Visual Basic za aplikacije

ID projekta: #17754353

Več o projektu