VB6 XML encoding fehlt

[bagira]

hallo,

ich habe ein Problem mit VB6 und XML2. Wenn ich das XML aufbaue, und an den Kopf der Datei <?xml version="1.0" encoding="ISO-8859-1" standalone="yes"?> einstelle, ist das encoding="ISO-8859-1" nicht mehr da.

folgenden code nutze ich:
Dim x1 As IXMLDOMProcessingInstruction
Set xdoc = New DOMDocument
Const strISO As String = " encoding=""iso-8859-1"" standalone=""yes"""
Set x1 = xdoc.createProcessingInstruction("xml", "version=""1.0""" & strISO)
Call xdoc.appendChild(x1)

im xdoc.xml ist, wie gesagt, das encoding nicht mehr vorhanden.

ist dies problem schon mal irgendwo aufgetreten ?

 

[DiableNoir]

Hmmm...kann es sein, dass VB6 da mit deinen Anführungszeichen durcheinander kommt?

Schreibe statt einem " einfach ein & CHR(34) &

 

[bagira]

hab ich schon versucht, das ergebnis ist dal gleiche, das encoding verschwindet im xml file oder string.

 

[DiableNoir]

Brauchst du unbedingt ISO? Sonst kannst du es mal mit "utf-8" versuchen. Zumindest mit ein paar Codierungen hat der XML-Prozessor von M$ anscheinend Probleme.

 

[bagira]

es ist egal was ich dort rein schreibe, das encoding ist immer weg. auch egal mit wecher msxml version. von 2 bis 6 alle durch. immer das gleiche.

 

[h3r3tic]

Ich kenn das XML Framework von VG6 nicht aber gibt es keine setter Methode für das Encoding des XML Dokumentes ?

Sowas ala xdoc.setEncoding("STRING"); ???

 

[bagira]

leider nein. ab vb.net gibts das. das kann ich leider nicht benutzen, da es eine alte anwendung ist, die nur ein wenig erweitert werden soll.

 

[h3r3tic]

Gugg mal hier http://support.microsoft.com/kb/254388/de die machen das mit einfachen ' Anführungsstrichen vielleicht klappt das. Vielleicht ist das mit den Processinginstructions gar nicht möglich etwas anderes zu setzten?!

P.S. http://www.stylusstudio.com/xmldev/200108/post41210.html hier ist es auch mit einfachen ' und dort scheint es zu funktionieren.