I export the design of a database with NotesDXLExporter.When I then reimport the design via NotesDXLImporter I can not open the agents anymore, I get the message “Document is not signed”
The code I use to export :
Dim s As New notessession
Dim db As notesdatabase
Set db = s.currentdatabase
Dim exporter As NotesDXLExporter
Dim stream As notesstream
Set exporter = s.CreateDXLExporter
exporter.OutputDOCTYPE=False
exporter.ForceNoteFormat = False
Set stream = s.CreateStream
Call exporter.SetInput(db)
Call exporter.SetOutput(stream)
Call exporter.Process
Dim outFile As String
Dim out%
outfile = "c:\database.xml"
out% = Freefile()
Open outFile$ For Output As #out%
Print #out%, stream.ReadText()
Close out%
End
err1:
Print "You reached in error"
Resume
And the code I use to import
Dim stream As NotesStream
Dim session As New NotesSession
Dim db As NotesDatabase
Set db = session.CurrentDatabase
Set db = New NotesDatabase("","Test agents import.nsf")
Set stream = session.CreateStream
Call stream.Open("c:\database.xml")
Dim importer As NotesDXLImporter
Set importer = session.CreateDXLImporter(stream, db)
importer.DocumentImportOption = DXLIMPORTOPTION_IGNORE
importer.DesignImportOption = DXLIMPORTOPTION_REPLACE_ELSE_CREATE
importer.ReplicaRequiredForReplaceOrUpdate = False
Call importer.Process