Modtage data fra XML webservice

Jeg sidder og skal hente noget data fra en webservice, som skal gemmes ned i tabel i Access 2003.

Lige nu har jeg gennem "web service references" oprettet forbindelse med webservicen, som automatisk opretter en class modul med de funktioner som jeg skal bruge for at hente data.

Jeg har lavet følgende script:

Dim hentRykker As clsws_BCWS
Dim doc As MSXML2.DOMDocument
Dim nodes As IXMLDOMNodeList
Dim i As Integer


Set hentRykker = New clsws_BCWS
Set doc = CreateObject("msxml2.DOMDocument")


    doc.async = False
    doc.Load hentRykker.wsm_BS("XX", "XXXXX")

    Set nodes = doc.selectNodes("//invoice")

    Debug.Print nodes.length 'Number of nodes, with base = 0

    For i = 0 To nodes.length - 1

        Debug.Print nodes(i).Attributes.getNamedItem("date").Text

        Debug.Print nodes(i).childNodes(0).Text

        Debug.Print nodes(i).childNodes(1).Text

        Debug.Print nodes(i).childNodes(2).Text

        Debug.Print nodes(i).childNodes(3).Text

        Debug.Print nodes(i).childNodes(4).Text

    Next i




Men jeg får en fejl "Run-time error 5, Invalid procedure call or argument"

Det er denne linie som får fejlen: 
doc.Load hentRykker.wsm_BS("XX", "XXXXX")

Public Function wsm_BS(ByVal str_username As String, ByVal str_password As String) As MSXML2.IXMLDOMNodeList
    '*****************************************************************
    'Proxy function created from http://212.xx.xxx....
    '
    '"wsm_BS" is defined as XML. See Complex Types: XML Variables in
    'Microsoft Office 2003 Web Services Toolkit Help for details on implementing XML variables.
    '*****************************************************************

    'Error Trap
    On Error GoTo wsm_BSTrap

    Set wsm_BS = sc_BCWS.BS(str_username, str_password)

Exit Function
wsm_BSTrap:
    BCWSErrorHandler "wsm_BS"
End Function



Nogen som kan fortælle mig hvad der går galt?? og er der en nem måde at hente XML format fra en webservice ned til en tabel??