vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 SEPA-Dateien erstellen inkl. IBAN-, BLZ-/Kontonummernprüfung  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Ein- und Umsteiger
XML neue Elemente zufügen 
Autor: JacoPas
Datum: 03.03.07 03:34
Hallo,

ich habe ein kleines Problem mit XML Datei erstellen. Ich erstelle die mit XmlTextWriter und die sieht so aus.

<?xml version="1.0"?>
<!--TestFilm-->
<Index ID="TestFilm">
<Document NR="0001" Date="20070303 3:18:01">
<Image>0001.TIF</Image>
<Barcode>1234Barcode5671</Barcode>
</Document>
</Index>

Ich die. Wenn ich jedes mal die Funktion wieder aufrufe, müssen die neue Elemente zu diese XML Datei zugefügt werden. z.B. wie unten

<?xml version="1.0"?>
<!--TestFilm-->
<Index ID="TestFilm">
<Document NR="0001" Date="20070303 2:54:03">
<Image>0001.TIF</Image>
<Barcode>1234Barcode5671</Barcode>
<Image>0002.TIF</Image>
<Barcode></Barcode>
</Document>
<Document NR="0002" Date="20070303 2:54:03">
<Image>0003.TIF</Image>
<Barcode>1234Barcode5672</Barcode>
<Image>0004.TIF</Image>
<Barcode></Barcode>
</Document>
..... usw.
</Index>

Dafür habe ich so codiert. 
If ObjXMLV.XMLWriteNewDocument = False Then 'wenn's noch unter identischem _
  Document ist
 
                objXMLElement = XMLDoc.DocumentElement("Document", _
                  ObjXMLV.XMLActaulDocNr.ToString.PadLeft(4, "0"))
 
                objXMLElementSubImage = XMLDoc.CreateElement("Image")
                objXMLText = XMLDoc.CreateTextNode(ObjXMLV.XMLImageName)
 
                objXMLElementSubImage.AppendChild(objXMLText)
                objXMLElement.AppendChild(objXMLElementSubImage)
 
                objXMLElementSubBarcode = XMLDoc.CreateElement("Barcode")
                objXMLText = XMLDoc.CreateTextNode(ObjXMLV.XMLBarcode)
 
                objXMLElementSubBarcode.AppendChild(objXMLText)
                objXMLElement.AppendChild(objXMLElementSubImage)
 
                XMLDoc.DocumentElement.AppendChild(objXMLElement)
 
            Else    'Neue Documente erstellen
 
                objXMLElement = XMLDoc.CreateElement("Document")
                objXMLElement.SetAttributeNode("NR", _
                  ObjXMLV.XMLActaulDocNr.ToString.PadLeft(4, "0"))
                objXMLElement.SetAttributeNode("Date", ObjXMLV.XMLDateTime)
 
                objXMLElementSubImage = XMLDoc.CreateElement("Image")
                objXMLElementSubBarcode = XMLDoc.CreateElement("Barcode")
 
                objXMLText = XMLDoc.CreateTextNode(ObjXMLV.XMLImageName)
                objXMLElementSubImage.AppendChild(objXMLText)
 
                objXMLText = XMLDoc.CreateTextNode(ObjXMLV.XMLBarcode)
                objXMLElementSubBarcode.AppendChild(objXMLText)
 
                objXMLElement.AppendChild(objXMLElementSubImage)
                objXMLElement.AppendChild(objXMLElementSubBarcode)
 
                XMLDoc.DocumentElement.AppendChild(objXMLElement)
            End If
 
            XMLDoc.Save(ObjXMLV.XMLActualFilePath)
Danke.
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
XML neue Elemente zufügen783JacoPas03.03.07 03:34
Re: XML neue Elemente zufügen524ModeratorDaveS03.03.07 12:56
Re: XML neue Elemente zufügen562JacoPas03.03.07 14:07
gelöst!558JacoPas03.03.07 16:23
Re: XML neue Elemente zufügen689ModeratorDaveS03.03.07 17:03

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel