Импорт XML в таблицу из RESTful Web API

Question

После полудня,

Я пытаюсь импортировать XML данные в MS Access, используя VBA для создания таблицы. Я получил код от разработчика, которому я следую на YouTube, и его зовут Стивен Бишоп. Не пытаясь взять кредит на его работу, и вот ссылка на видео: https://www.youtube.com/watch?v=k8TXif1j82Q

Так что сказал, что я новичок в XML. Я должен получить имена сотрудников и их коды организации через запрос XML, и эта часть кода работает. Когда мой код терпит неудачу, это когда я пытаюсь сохранить DOMDocument, я получаю ошибку во время выполнения, которая говорит, что разрешение отклонено. Я разговаривал с одним из наших администраторов, так что я знаю, что мои разрешения правильные. Я даже пытался использовать флэш-накопитель, чтобы сохранить файл XML, чтобы затем создать таблицу оттуда.

    Dim reader As New XMLHTTP60

    Dim doc As DOMDocument60


    reader.Open "GET", "URL Goes here", False
    reader.setRequestHeader "Accept", "application/xml"
    reader.send

    Do Until reader.ReadyState = 4
        DoEvents
    Loop

    If reader.status = 200 Then
        Set doc = reader.responseXML
        doc.Save "C:\XMLTest"

        Application.ImportXML "C:\Desktop\XML Test\tblTest.xml", acStructureAndData

    Else

        MsgBox "Unable to Import Data"

    End If

End Sub

Any ideas on why I am getting this error?

Answer 1

Попробуйте изменить строку сохранения, используя расширение файла, например:

doc.Save "C:\XMLTest.txt"