Dim XmlDoc As New System.Xml.XmlDocument 'Write down the XML declaration Dim XmlDeclaration As System.Xml.XmlDeclaration = XmlDoc.CreateXmlDeclaration("1.0", "UTF-8", Nothing) 'Create the root element Dim RootNode As System.Xml.XmlElement = XmlDoc.CreateElement("config") XmlDoc.InsertBefore(XmlDeclaration, XmlDoc.DocumentElement) XmlDoc.AppendChild(RootNode) Dim LOG_FilePath As System.Xml.XmlElement = XmlDoc.CreateElement("LOG_FilePath") Dim LOG_FilePathTextElement As System.Xml.XmlText = XmlDoc.CreateTextNode("Meassures.log") RootNode.AppendChild(LOG_FilePath) LOG_FilePath.AppendChild(LOG_FilePathTextElement) Try XmlDoc.Save(sSettingsfile) Catch ex As Exception End Try