Einen schönen Sonnigen allerseits!
Entweder ist mir zu warm, oder meiner Testbüchse. Jedenfalls klappt das DXLImportieren nicht
Code
f = Dir$(src, 0)
Do While f <> ""
fname = dest & Left(f, Len(f) - 3) & "nsf"
Dim stream As NotesStream
Set stream = se2.CreateStream
Set dbCopy = New NotesDatabase("", "")
Call dbCopy.Create("", fname, True)
Set importer = se2.CreateDXLImporter(stream, dbCopy)
Call importer.Process
f = Dir$()
Loop
Alles anzeigen
In 'src', 'dest' und 'fname' stehen die korrekten Pfade drin. Die DB 'dbCopy' legt er auch an, jedenfalls den Replikstumpf dazu, hört dann aber beim 'Process' auf mit der ebenso simplen, wie nichtssagenden Meldung
Zitat
20.06.2006 03:08:53 PM Agent Manager: Agent printing: Error 4522 in line 81 in DESIGN_XML2DB (DXL importer operation failed)
Den KB-Eintrag 1227806 habe ich mir schon zu Herzen genommen, bringt aber nichts...
Irgendeine Idee, an welcher Stelle ich zu blöd dazu bin?
thx in advance
RW