Dobrý den, v projektu, na kterém pracuji mi zničehonic přestal fungovat kód který doteď fungoval, když sem z toho začal magořit, zkusil jsem ověřit funkci, kterou používám v novém projetku - leč ten fungoval opět fungoval chvíli - dokud jsem "projekt" neuzavřel a znovu neotevřel - teď už opět nefunguje. XML je následující (nemá žádný význam, jen pokus)
<?xml version="1.0" encoding="utf-8" ?>
<Jedna>
<Dva>
<Ctyri>
<Osm>
<Devet>
</Devet>
</Osm>
</Ctyri>
<Pet>56</Pet>
</Dva>
<Tri>
<Sest>6</Sest>
<Sedum>77</Sedum>
</Tri>
</Jedna>
Na formulář jsem přidal tlačítko, které dělá:
Dim TestXml As New XmlDocument()
TestXml.Load("Data.xml")
Dim Novy As XmlElement = TestXml.CreateElement("ahoj")
Novy.SetAttribute("ID", "24")
Dim Novy2 As XmlElement = TestXml.CreateElement("uzel")
Novy2.InnerText = "text"
Novy.AppendChild(TestXml.CreateElement("kája"))
Novy.AppendChild(Novy2)
Novy.AppendChild(TestXml.CreateElement("lojza"))
TestXml.DocumentElement.AppendChild(Novy)
'nebo toto (ani jedno nefunguje, ale fungovalo): doc.DocumentElement.SelectSingleNode("/Jedna/Dva/Ctyri/Osm/Devet").AppendChild(ahoj)
TestXml.Save("Data.xml")
Pokud by to nefungovalo (navíc ve dvou projektech) od začátku, asi bych víc hledal chybu u sebe :) , ale takhle mi to připadá jako nějaká blbost - vždy jsem kliknul na tlačítko, zkontroval přes mozillu, zda přibyl uzel i s childnody a fungovalo to i několikrát dokola, pořád přibývali, teď to nedělá nic, chybu to nehlásí a nic jsem v kódy neměnil... Díky za nakopnutí
|