HCL Notes / Domino / Diverses > Entwicklung

NotesDocumentCollection: Dokumentänderungen werden nicht übernommen

(1/1)

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)

--- Ende Code ---

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

--- Ende Code ---

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 (retired):

--- Zitat ---Wie kann das sein?
Oder holt er sich aus der Collection immer das ungeänderte Dokument solange es nicht gespeichert ist?
--- Ende Zitat ---
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

Navigation

[0] Themen-Index