Creating XML Document using UFT ( 2 different ways )

Option 1:


Set xmlDoc = CreateObject("Microsoft.XMLDOM")

Set objRoot = xmlDoc.createElement("ParentNode")  
xmlDoc.appendChild objRoot  

Set objRecord = xmlDoc.createElement("ChildNode") 
objRoot.appendChild objRecord 

Set objDate = xmlDoc.createElement("AddChildData")  
objDate.Text = Date  
objRecord.appendChild objDate  

Set objIntro = xmlDoc.createProcessingInstruction("xml","version='1.0'")  
xmlDoc.insertBefore objIntro,xmlDoc.childNodes(0)  

xmlDoc.Save "C:\Data\Rec\Audits.xml" 


Option 2:


set xmlDoc = createObject("MSXML2.DOMDocument.3.0")

Set objRoot = xmlDoc.createElement("ParentNode")  
xmlDoc.appendChild objRoot  

Set objRecord = xmlDoc.createElement("ChildNode") 
objRoot.appendChild objRecord 

Set objDate = xmlDoc.createElement("AddChildData")  
objDate.Text = Date  
objRecord.appendChild objDate  

Set objIntro = xmlDoc.createProcessingInstruction("xml","version='1.0'")  
xmlDoc.insertBefore objIntro,xmlDoc.childNodes(0)  

xmlDoc.Save "C:\Data\Rec\Audits.xml" 


.....