複雑な名前空間xmlをvbaで書く

Question

他のxml名前空間の質問。私はここに

<?xml version="1.0" encoding="utf-8"?> 
<Datas xsi:schemaLocation="uri:rhubarb:pie RHUBARB%20PIE%202012.xsd" xmlns="uri:rhubarb:pie" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> 
<\Datas> 

とVBA

でこの名前空間を書きたいのは、これまで

Option Explicit 

Public Sub Create_Database() 

'Declare document objects 
Dim xDoc As MSXML2.DOMDocument60 
Dim xNode As IXMLDOMNode 
Dim xRoot As IXMLDOMElement 

'create new DOMDocument 
Set xDoc = New DOMDocument60 

'Create processing instructions 
Set xNode = xDoc.createProcessingInstruction("xml", "version='1.0' encoding= 'UTF-8'") 
Set xNode = xDoc.InsertBefore(xNode, xDoc.ChildNodes.Item(0)) 

'create root element 
Set xRoot = xDoc.createElement("Datas") 
xDoc.appendChild xRoot 
xDoc.DocumentElement.setAttribute "xsi:schemaLocation", "uri:rhubarb:pie RHUBARB%20PIE%202012.xsd" 
xDoc.DocumentElement.setAttribute "xmlns", "uri:rhubarb:pie" 
xDoc.DocumentElement.setAttribute "xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance" 

'save xml file 
xDoc.Save "C:\Users\danny\Desktop\xml\Database.xml" 
'clear xDoc from memory 
Set xDoc = Nothing 
End Sub 

私のコードです...しかし、私は、私はあまりにも多くの引数を持つ名前空間を書面で知っています。私はオンラインで見つけることができる唯一のことは、このように私の名前空間を記述するために、次のようになります。

xDoc.DocumentElement.setAttribute "xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance" 

私はあまりにも多くの引数に関するエラーを取得しておきます。私の質問：より複雑な名前空間を作成するにはどうすればよいですか？それともそれを書こうとする正しい方法さえありますか？

Answer 1

これはわかりません。他の誰かが同じものを探している場合にそれを編集してください！これに

xDoc.DocumentElement.setAttribute "xsi:schemaLocation", "uri:rhubarb:pie RHUBARB%20PIE%202012.xsd", "xmlns", "uri:rhubarb:pie", "xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance" 

：

xDoc.DocumentElement.setAttribute "xsi:schemaLocation", "uri:rhubarb:pie RHUBARB%20PIE%202012.xsd" 
xDoc.DocumentElement.setAttribute "xmlns", "uri:rhubarb:pie" 
xDoc.DocumentElement.setAttribute "xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance" 

は、私はこれを変更しました