I was able to resolve the issue (thanks to the experts here for the tips!).
This one runs from a Command button click event in Access VBA.
It reads the emails from the Inbox in WeeklyProceedings Mailbox and saves the XML attachments in C:\Users\Testing
Dim olApp As Object
Dim MYFOLDER As Object
Dim OlItems As Object
Dim OlMail As Object
Dim x As Integer
Dim strFile As String
Dim strFolderpath As String
Set olApp = GetObject(, "Outlook.Application")
If Err.Number = 429 Then
Set olApp = CreateObject("Outlook.Application")
End If
strFolderpath = "C:\Users\Testing"
'On Error Resume Next
' Set the Attachment folder.
strFolderpath = strFolderpath & "\Attachments\"
Set MYFOLDER = olApp.GetNamespace("MAPI").Folders("WeeklyProceedings Mailbox").Folders("Inbox")
Set OlItems = MYFOLDER.Items
For Each OlMail In OlItems
strFile = OlMail & ".XML"
strFile = strFolderpath & strFile
If OlMail.Attachments.Count > 0 Then
For x = 1 To OlMail.Attachments.Count
OlMail.Attachments.item(x).SaveAsFile strFile
Next x
End If
Next
Set MYFOLDER = Nothing
Set OlMail = Nothing
Set OlItems = Nothing
Set olApp = Nothing