Ms access 使用MSXML在Access VBA中自动关闭XML标记
我一直在尝试在Access VBA中使用Microsoft XML,v6.0。我的问题是,在编写VBA来创建XML输出时,是否存在这样的情况,即输出具有自动关闭标记 与下面的代码一样,当创建字段时,它会将文本放在两个标记之间Ms access 使用MSXML在Access VBA中自动关闭XML标记,ms-access,vba,msxml,msxml6,Ms Access,Vba,Msxml,Msxml6,我一直在尝试在Access VBA中使用Microsoft XML,v6.0。我的问题是,在编写VBA来创建XML输出时,是否存在这样的情况,即输出具有自动关闭标记 与下面的代码一样,当创建字段时,它会将文本放在两个标记之间 我想它有一个自动关闭标签的文本 name='Unit'value='TEST'是如何导出的 是我希望它的导出方式 Set objMemberName = objDom.createElement("field") objMemberElem.appendChild
我想它有一个自动关闭标签的文本
name='Unit'value='TEST'
是如何导出的
是我希望它的导出方式
Set objMemberName = objDom.createElement("field")
objMemberElem.appendChild objMemberName
objMemberName.Text = "name='UNIT' value='TEST'"
以下代码似乎可以满足您的要求:
选项比较数据库
选项显式
公共子测试()
Dim objDom为MSXML2.DOMDocument,OBJEElement为MSXML2.IXMLDOMENT
Set objDom=New MSXML2.DOMDocument
Set objeelement=objDom.createElement(“字段”)
objElement.setAttribute“名称”、“单位”
objElement.setAttribute“值”、“测试”
objDom.appendChild对象元素
保存“C:\Users\Gord\Desktop\test.xml”
设置对象=无
设置objDom=Nothing
端接头
当我打开“test.xml”时,我看到
@thedanmal565不客气。(请注意阅读。)