Member 13520667 Ответов: 1

Xml атрибут не работает должным образом как получить

dim objXMLElement1 As XmlNode
dim doc As XmlDocument
dim objXMLAttribute As XmlAttribute
dim objXMLElement As XmlNode

objXMLElement1 = doc.CreateElement("Country")
objXMLElement1.InnerText = "united kingdom"

objXMLAttribute = doc.CreateAttribute("Code")
objXMLAttribute.Value = "GBR"
objXMLElement1.Attributes.Append(objXMLAttribute)

objXMLElement.AppendChild(objXMLElement1)

objXMLElement1 = doc.CreateElement("Country")
objXMLElement1.InnerText = "united kingdom"

objXMLAttribute = doc.CreateAttribute("Code")
objXMLAttribute.Value = "GBR"
objXMLElement1.Attributes.Append(objXMLAttribute)

objXMLElement.AppendChild(objXMLElement1)


Выше представлен код

<Country code="GBR">united kingdom
<country>United kingdom

Мое требование
<Country Code="GBR">united kingdom

когда я удаляю вышеупомянутый элемент exces он не работает
как решить эту проблему,

заранее спасибо

Что я уже пробовал:

я пытаюсь выше код , но я не получаю мое требование, когда я удаляю лишний элемент, он не работает, как решить эту проблему

1 Ответов

Рейтинг:
0

Graeme_Grant

Ваш код не будет работать как есть - у вас есть ряд проблем и исключений. Это выглядит так, как будто вы скопировали и вставили неправильно откуда-то...

Как только код очищен, он выглядит нормально:

Dim objXMLElement1 As XmlNode
Dim doc As XmlDocument = New XmlDocument

Dim objXMLAttribute As XmlAttribute

objXMLElement1 = doc.CreateElement("Country")
objXMLElement1.InnerText = "united kingdom"

objXMLAttribute = doc.CreateAttribute("Code")
objXMLAttribute.Value = "GBR"
objXMLElement1.Attributes.Append(objXMLAttribute)

Console.WriteLine(objXMLElement1.OuterXml)

Который выводит:
<Country Code="GBR">united kingdom</Country>