Soap web services (1 Viewer)

irade92

Registered User.
Local time
Today, 23:49
Joined
Dec 26, 2010
Messages
229
I am trying to solve this:
Dim xml As String
Dim req As New XMLHTTP60
Dim resp As New DOMDocument60

xml = "<?xml version='1.0' encoding='UTF-8' ?>" & vbNewLine _
& "<root>" & vbNewLine _
& "<SecurityKey>633862AD-22B0-4813-93A0-
555DA24659DD</SecurityKey>" & vbNewLine _
& "<Username>" & "MY_WORKSHOP" & "</Username>" & vbNewLine _
& "<Password>" & "MY_PASS11" & "</Password>" & vbNewLine _
& "<InvoiceNumber>" & "40197" & "</InvoiceNumber>" & vbNewLine _
& "<InvoiceYear>" & "2017" & "</InvoiceYear>" & vbNewLine _
& "<InvoiceMag>" & "01" & "</InvoiceMag>" & vbNewLine _
& "</root>" & vbNewLine
req.Open "POST", "http://eurolek.is-very-nice.org/WebService.asmx/DownloadInvoice" & "(" & xml & ")", False



req.setRequestHeader "Content-Type", "application/xml"
req.send

resp.loadXML req.responseText
resp.Save ("C:/ANY_FOLDER/ANY.XML")

I want to get some info from a web service and save it to c:/

Any help!!
 

Users who are viewing this thread

Top Bottom