NotesDocumentCollection: Dokumentänderungen werden nicht übernommen

[sorosch]

Hallo,

ich füge zu einer NotesDocumentCollection ein NotesDocument hinzu. Beim NotesDocument wurde 1 Item geändert - jedoch nicht gespeichert.
Ziehe ich dieses NotesDocument wieder NotesDocumentCollection  heraus, so ist ist das Item jedoch nicht geändert:

Code

Dim doc As NotesDocument
Dim dcChange As NotesDocumentCollection
Dim docChange As NotesDocument	
...
'Item "optStatus" hat hier den Wert "Offen"
...
doc.optStatus = "Genehmigt"
doc.ComputeWithForm False, False
Call dcChange.AddDocument(doc)

Das Item "optStatus" hat den Wert "Genehmigt". Das sehe ich auch im Debugger.
Somit gehe ich davon aus, dass in der Cnllection dcChange das NotesDocument mit dem Wert "Genehmigt ist.

Jetzt hole ich mir das Dokument wieder aus der Collection:

Code

	If (dcChange.Count > 0) Then
		
		Set docChange = dcChange.GetFirstDocument

		'*** Bereits hier ist der Wert des Items optStatus wieder "Offen" ***

		While Not(docChange Is Nothing)	
			docChange.Save True, False	
			Set docChange = dcChange.GetNextDocument( docChange )				
		Wend
		
	End If

Hole ich mir das Dokument wieder aus der Collection, so ist das geänderte Item wieder auf den bisherigen Wert abgeändert bzw. wurde eben nicht geändert.

Wie kann das sein?
Oder holt er sich aus der Collection immer das ungeänderte Dokument solange es nicht gespeichert ist?

Wo liegt der (Denk-) Fehler?

Bin langsam am Verzweifeln....

Hat jemand bitte einen Denkanstoß?

Vielen Dank
Viele Grüße
George

[eknori]

Wie kann das sein?
Oder holt er sich aus der Collection immer das ungeänderte Dokument solange es nicht gespeichert ist?

Genau so ist es. Du musst das Dokument ( Deine Änderungen ) erst speichern.

[Werner Götz]

Wenn Du Dein gewünschtes Verhalten benötigst, könntest Du ggf. die NotesDocumentCollection durch eine "List As NotesDocument" ersetzen.

-Werner

[sorosch]

Guten Tag,

vielen Dank noch für die prompte Hilfe.

Wie von Werner Götz vorgeschlagen, habe ich die NotesDocumentCollection durch "List As NotesDocument" ersetzt. Die macht, was ich möchte.
Super Tipp.

Vielen Dank nochmals an euch.

Viele Grüße
George