|
Díval, ale nečetl celé. Je toho hodně. První řádek tam být nemusí, pokud je soubor v UTF-8. Pokud není, dát ho tam musíte. Aby to bylo validní XML, musíte zavírat značky img. Takže buď dáte: nebo 1 | <img src="něco.jpg"></img>
|
Pak to teprve bude validní XML. Validní XML musí splňovat tyto pravidla: - vše musí být uvnitř kořenové značky (to máte správně). - každá značka musí být uzavřena, značky se nesmí křižit. - záleží na velikosti písmen (<b> a </B> k sobě nepatří!) - všechny hodnoty atributů musí být v úvozovkách (<a href=str> nejde, musí být <a href="str"> atd. Pak je možné takovýto dokument jednoduše načíst a zpracovat: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | Public Sub Nacist()
Dim doc As New Xml.XmlDocument()
doc.Load("d:\weby\classportal\app_Data\lunchlist.xml")
VytvorPolozky(doc.ChildNodes, TreeView1.Nodes)
doc = Nothing
End Sub
Private Sub VytvorPolozky(ByVal xmlNodes As Xml.XmlNodeList, ByVal treeNodes As TreeNodeCollection)
For Each n As Xml.XmlNode In xmlNodes
If n.NodeType = Xml.XmlNodeType.Element Then
Dim t As TreeNode = treeNodes.Add(n.Name)
If n.HasChildNodes Then
VytvorPolozky(n.ChildNodes, t.Nodes)
End If
End If
Next
End Sub
|
O XML bych chtěl také v nejbližší době napsat seriál, ale nemám moc času. Anglicky je toho dost, česky ne.
|