Notes/Domino 6 and 7 Forum : DXL-Import

Hi!

I have an simple Agent(I write only for this Problem)
I have an exportet document from Notes (with DXLExporter), this document is the input for an Notesdomparser, after Notesdomparser.serialize()
the DXL file is not well formed! Why???

the Agent:

Sub Initialize
Dim ostream As NotesStream
Dim stream As NotesStream
Dim domparser As NotesDOMParser
Dim db As NotesDatabase
Dim s As New notessession

Set stream = s.CreateStream
If Not stream.Open("c:\xml\inputversuch.xml", "utf-8") Then
Messagebox "Cannot open " & filename,, "Error"
Exit Sub
End If
If stream.Bytes = 0 Then
Messagebox "File did not exist or was empty",, filename
Exit Sub
End If

Set ostream = s.CreateStream
If Not ostream.Open("c:\xml\output.xml", "utf-8") Then
Messagebox "Cannot open " & filename,, "Error"
Exit Sub
End If
Call ostream.Truncate

Set domparser = s.CreateDOMParser(stream,ostream)
DOMParser.InputValidationOption = VALIDATE_NEVER

Call domparser.process

Msgbox domparser.log

' Call domparser.Serialize

Msgbox domparser.log

Call stream.Close
Call ostream.Close
End Sub