Domino 9 und frühere Versionen > ND7: Entwicklung

Dokumente kopieren

<< < (2/3) > >>

inu:
Danke für eure Hilfe, ich werde versuchen, dass ganze umzusetzen. Deinen Hinweis versuche ich zukünftig zu berücksichtigen.

inu:
so, ich habe mal folgendes probiert:


   Dim session As New NotesSession
   Dim db      As NotesDatabase
   Dim db2     As NotesDatabase
   Dim doc     As NotesDocument
   Dim dc      As NotesDocumentCollection
   
   Set db  = session.CurrentDatabase
   Set db2 = New NotesDatabase (db.Server, "zieldb.nsf")
   
   Set dc = db.UnprocessedDocuments
   Set doc = dc.GetFirstDocument()
   While Not(doc Is Nothing)
      ergebnis =  doc.Document.CopyToDatabase(db2)
      Set doc = dc.GetNextDocument(doc)      
   Wend

Schade nur, dass die Zeile "ergebnis =  doc.Document.CopyToDatabase(db2)" diesen Fehler hier bringt:

Object variable not set

SD:
Wie kommst du denn auch auf doc.Document?

inu:
Ach Mensch ja, das bezog sich auf ein NotesUIDocument. Ist aber ein NotesDOcument. Danke für den Hinweis. Jetzt geht es.

inu:
So, jetzt habe ich nur noch das Problem, dass ich beim Übertragen keine zusätzlichen Felder einfügen kann...

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete