XML基础知识 - 增加价值和发布

时间:2017-07-17 21:34:29

标签: xml vba web-services

编辑,因为这变得混乱并且偏离主题。

我有一个WSDL URL,显示了用于提交测试数据的XML代码。我没有使用XML的经验,打算使用Excel VBA编辑它,添加值。

我的第一个问题是如何向字段输入值。我试图手动更改元素文本。

e.g。对于name元素,我最后在name中添加了一个值。

<element name="name" minOccurs="1" maxOccurs="1">
<simpleType>
<restriction base="string">
<maxLength value="47"/>
</restriction>
</simpleType>
</element>

我将第一行更改为

<element name="name" minOccurs="1" maxOccurs="1" value="Name is required">

Tim指出,这不是正确的做法。 在我提交的代码中,该行应为

<name>Name is required</name>

在VBA中,我一直在使用此代码发布修改后的xml文件,但我仍然不确定这是否正确。

Sub SendXMLtoTEST()
    Dim myHTTP As New MSXML2.XMLHTTP60
    Dim myDom As New MSXML2.DOMDocument60
    Dim myXML As String
    'Set myHTTP = CreateObject("msxml2.xmlhttp")
    'Set myDom = CreateObject("MSXML2.DOMDocument")
    'myDom.async = False      '"?API=Verify&XML=" &

    'myDom.LoadXML (myXML)
    myDom.Load "C:\Users\me\Desktop\test.xml"
    myHTTP.Open "post", SAAserver, False
    'myHTTP.setRequestHeader "Content-Type", "text/xml" '"application/x-www-form-urlencoded"
    myHTTP.send (myDom.XML)
    MsgBox myHTTP.responseText
End Sub

我下载了SoapUI 5.3,并从WSDL URL中的XML代码创建了一个新的SOAP项目。 右键单击Project并选择New SOAP mockservice 右键单击mockservice并选择New mockoperation 这给了我肥皂信封,头和身体。然后我修改了我需要的字段的正文代码(删除任何&符号!!)。我将其复制并放入请求编辑器中提交。

这似乎可以从SoapUI中运行,但是从VBA发帖时我似乎无法正常工作(至少我看不出如何测试它是否有效)。

我将开始一个新的线程,因为我已经回答了添加值的原始查询。

0 个答案:

没有答案