| |
VB.NET - Ein- und UmsteigerXML funktioniert wird aber nicht von Access akzeptiert | | | Autor: Tommi467 | Datum: 24.01.17 14:27 |
| Hallo zusammen,
Vorgabe ist es, Daten via XML-Datei zu übertragen.
Auf der Empfängerseite sollen diese Datensätze dann
sowohl in eine Excel, als auch in eine Access-Datei
importiert werden.
Nun habe ich aus der MS-Hilfe einen XML-Writer, der
'eigentlich' auch seinen Job macht. (siehe Source unten)
Die hiermit generierte XML kann ich ohne Probleme in
Excel einlesen. Aber nicht in Access. Was mache ich
falsch?
Für entsprechende Hilfe wäre ich sehr dankbar !!!
Aus dem XML-Writer kommt:
<?xml version="1.0" encoding="UTF-16"?>
<Personen>
<Person Vorname="Hans" Name="Meyer" Titel="Dr."/>
<Person Vorname="Carlos" Name="Schmidt" Titel=""/>
</Personen> in Access kann ich es nur so importieren:
<?xml version="1.0" encoding="UTF-16"?>
<Person>
<Vorname>Hans</Vorname>
<Name>Meyer</Name>
<Titel>Dr.</Titel>
<Vorname>"Carlos" Name="Schmidt" Titel=""/>
</Person>
<Person>
<Vorname>Carlos</Vorname>
<Name>Schmidt</Name>
<Titel></Titel>
</Person> Das ist der Source:
Private Sub XMLWriter()
' Auswahl einer Kodierungsart für die Zeichenablage
Dim enc As New System.Text.UnicodeEncoding
' XmlTextWriter-Objekt für unsere Ausgabedatei erzeugen:
Dim XMLobj As Xml.XmlTextWriter _
= New Xml.XmlTextWriter("c:\temp\quickie.xml", enc)
With XMLobj
' Formatierung: 4er-Einzüge verwenden
.Formatting = Xml.Formatting.Indented
.Indentation = 4
' Dann fangen wir mal an:
.WriteStartDocument()
' Beginn eines Elements "Personen". Darin werden wir mehrere
' Elemente "Person" unterbringen.
.WriteStartElement("Personen")
' Hier kommt das erste Element "Person". Eine Person hat
' in unserem einfachen Beispiel einen Titel, einen Nach-
' namen und einen Vornamen. Als Demo soll uns das genügen.
.WriteStartElement("Person") ' <Person
.WriteAttributeString("Titel", "Dr.")
.WriteAttributeString("Name", "Meyer")
.WriteAttributeString("Vorname", "Hans")
.WriteEndElement() ' Person />
' Hier kommt (noch immer im Element "Personen" das zweite
' Element "Person".
.WriteStartElement("Person") ' <Person
.WriteAttributeString("Titel", "")
.WriteAttributeString("Name", "Schmidt")
.WriteAttributeString("Vorname", "Carlos")
.WriteEndElement() ' Person />
' Nachdem das Element "Personen" zwei Elemente "Person"
' erhalten hat, beenden wir die Ausgabe für "Personen"...
.WriteEndElement() ' </Personen>
' ... und schließen das XML-Dokument (und die Datei)
.Close() ' Document
End With
End Sub | |
Re: XML funktioniert wird aber nicht von Access akzeptiert | | | Autor: effeff | Datum: 24.01.17 15:53 |
| Die zweite Version ist richtig in Bezug auf Datenbanken. Du hast gelernt, dass XML nicht XML ist, sondern es darauf ankommt, was damit beschrieben wird.
Wenn Du XML zum Import in Access erstellen möchtest, kannst Du das über eine DataTable aber einfacher haben:
Dim dt As New DataTable
With dt
.TableName = "Adressen"
.Columns.Add("Nachname")
.Columns.Add("Vorname")
.Columns.Add("Titel")
.Rows.Add("Meyer", "Hans", "Dr.")
.Rows.Add("Schmidt", "Carlos", "")
.Rows.Add("Niemand", "Noone", "Prof. Dr.")
.Rows.Add("Niegesehn", "Niklaas", "Dr. Dipl.-Ing.")
End With
dt.WriteXml("d:\Adressen.xml") Hierbei wird eine DataTable erstellt. Es werden drei Spalten (Columns) erstellt und danach werden vier Zeilen eingefügt. Zum Schluss wird die XML-Datei erstellt. Und die sieht dann genauso aus wie Du sie für Access benötigst.
EALA FREYA FRESENA | |
Re: XML funktioniert wird aber nicht von Access akzeptiert | | | Autor: Tommi467 | Datum: 24.01.17 15:56 |
| SUPER !!! Vielen Dank, das bekomm ich hin.
Werde ich morgen mal testen. | |
Re: XML funktioniert wird aber nicht von Access akzeptiert | | | Autor: Tommi467 | Datum: 25.01.17 15:14 |
| Hallo Effeff,
hat sofort funktioniert. Super. Ist so auch viel einfacher,
zumal die Daten auch aus einem GridView kommen.
Eine Frage habe ich aber noch:
Kannst du oder jemand anders erklären, was es mit den beiden
XML-Versionen auf sich hat. Wie werden sie genannt, damit ich
sie zukünftig auseinander halten kann.
Lösung wäre toll.
Gruß Tommi | |
Re: XML funktioniert wird aber nicht von Access akzeptiert | | | Autor: Tommi467 | Datum: 26.01.17 10:37 |
| Tja, das Problem ist nur, das ich diesen Source direkt von der MS - Seite habe
auf der ich nach Hilfe gesucht habe. Ich war davon ausgegangen das das richtig
ist was da steht...
Mich würde jetzt interessieren, wo eine solche XML-Variante eingesetzt wird.
Denn wenn sie soooo falsch wäre, wäre sie sicher nicht dort publiziert. | |
Re: XML funktioniert wird aber nicht von Access akzeptiert | | | Autor: Kuno60 | Datum: 28.01.17 22:35 |
| Tommi467 schrieb:
Zitat: | | Tja, das Problem ist nur, das ich diesen Source direkt von
der MS - Seite habe
auf der ich nach Hilfe gesucht habe. Ich war davon
ausgegangen das das richtig
ist was da steht...
Mich würde jetzt interessieren, wo eine solche XML-Variante
eingesetzt wird.
Denn wenn sie soooo falsch wäre, wäre sie sicher nicht dort
publiziert. | |
Falsch ist diese Variante nicht und man braucht diese auch öfters.
Dein Fehler war:
Du hast die Werte nicht direkt, sondern als Attribute geschrieben. | |
| 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 |
|
|
sevGraph (VB/VBA)
Grafische Auswertungen
Präsentieren Sie Ihre Daten mit wenig Aufwand in grafischer Form. sevGraph unterstützt hierbei Balken-, Linien- und Stapel-Diagramme (Stacked Bars), sowie 2D- und 3D-Tortendiagramme und arbeitet vollständig datenbankunabhängig! Weitere InfosTipp des Monats Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|