Dim myHTTP As New MSXML2.XMLHTTP30 Set myHTTP = CreateObject("msxml2.xmlhttp") 'create dom document variable 'stores the xml to send Dim myDom As New MSXML2.DOMDocument30 'Create the DomDocument Object Set myDom = CreateObject("MSXML2.DOMDocument") 'Load entire Document before moving on myDom.async = False 'xml string variable 'replace with location if sending from file or URL myDom.Load ("C:\Users\br1d\OneDriveinc\Desktop\RedBook Escalation\Skusubmission.xml") 'loads the xml 'change to .Load for file or url myDom.Load (myDom.XML) 'open the connection myHTTP.Open "POST", "https://xxxx01.dev-sap.gr.com:41111/sap/commerce/esrprice?sap-client=220", False, "xxxxx", "xxxxx"", False" 'send the XML myHTTP.Send (myDom.XML) 'Display the response MsgBox myHTTP.responseText
Experts Exchange always has the answer, or at the least points me in the correct direction! It is like having another employee that is extremely experienced.
When asked, what has been your best career decision?
Deciding to stick with EE.
Being involved with EE helped me to grow personally and professionally.
Connect with Certified Experts to gain insight and support on specific technology challenges including:
We've partnered with two important charities to provide clean water and computer science education to those who need it most. READ MORE