oSendDoc = CreateObject("Msxml2.FreeThreadedDOMDocument.4.0") oSendDoc.SetProperty("SelectionLanguage" , "XPath") oRootElement = oSendDoc.createElement("xml") oRoot = oRootElement oSendDoc.appendChild(oRoot) oXmlPI = oSendDoc.createProcessingInstruction("xml", "version='1.0'") oSendDoc.insertBefore(oXmlPI, oSendDoc.childNodes(0)) oEnvElement = oSendDoc.createElement("envelope") oEnvElement.DataType = "bin.base64" oEnvElement.NodeTypedValue = FileToStr("c:\winnt\media\notify.wav") oRoot.appendChild( oEnvElement ) oSendDoc.Save("it.xml")