How to create a XML like the following structure if the XML does not exist?

<?xml version="1.0" standalone="yes"?>
<MsgList>
  <Msg>
    <Sender>02SAS10775</Sender>
    <Date></Date>
    <Title></Title>
    <Content></Content>
    <Status></Status>
  </Msg>
</MsgList>

Thank you. :)

How about this:

Dim objMsgList, objMsg, objNode As System.Xml.XmlNode

objMsgList = objXML.CreateNode(System.Xml.XmlNodeType.Element, "MsgList", String.Empty)
objXML.AppendChild(objMsgList)
objMsg = objXML.CreateNode(System.Xml.XmlNodeType.Element, "Msg", String.Empty)
objMsgList.AppendChild(objMsg)
objNode = objXML.CreateNode(System.Xml.XmlNodeType.Element, "Sender", String.Empty)
objNode.InnerText = "02SAS10775"
objMsg.AppendChild(objNode)
objNode = objXML.CreateNode(System.Xml.XmlNodeType.Element, "Date", String.Empty)
objMsg.AppendChild(objNode)
objNode = objXML.CreateNode(System.Xml.XmlNodeType.Element, "Title", String.Empty)
objMsg.AppendChild(objNode)
objNode = objXML.CreateNode(System.Xml.XmlNodeType.Element, "Content", String.Empty)
objMsg.AppendChild(objNode)
objNode = objXML.CreateNode(System.Xml.XmlNodeType.Element, "Status", String.Empty)
objMsg.AppendChild(objNode)

Peter