Domino 9 und frühere Versionen > Entwicklung

Feldwerte im BackEnd ändern

(1/2) > >>

HJPSoft:
Hallo Forum,

bei dem Auftrag, einen Feldwert innerhalb vieler Dokumente permanent zu ändern erhalte ich den Fehler: Notes Error: Eintrag im Index nicht gefunden(Ansicht)
Der Code im Agent sieht so aus, der hervorgehobene Text löst den Fehler aus: ???

Sub Initialize
   Dim wert As String   
   Dim s As New NotesSession
   Dim db As NotesDatabase
   Set db = s.CurrentDatabase
   
   Dim v As NotesView
   Set v = db.GetView("Einsatz\Sitreps\ISAF")
   Dim doc As NotesDocument
   Set doc = v.GetFirstDocument()
   Do While Not (doc Is Nothing)
      
      Call doc.ReplaceItemValue("DokChar", "Sitreps Termez")
      Call doc.Save(True,True)
      Set doc = v.GetNextDocument(doc)
   Loop
   
   
End Sub

Wer kann helfen, oder liege ich völlig daneben?
Ersatzcode willkommen.

Danke

Hans

eknori:
Kann es sein, daß das geänderte Dokument nach der Aktualisierung aus der Ansicht herausfällt ??

Ansonsten ist der Code OK.

eknori

HJPSoft:
Danke Eknori,

in der Tat fällt das Dokument aus dieser Ansicht heraus. Ich nehme an, ich muss mir eine Ansicht erzeugen, aus der geänderte Dokumente nicht herausfallen.


Danke

Hans

eknori:
genau, sonst wuselt es dir den Index durcheinander mit dem bekannten Erfolg.

klaussal:
oder anstelle von "getnextdocument" wieder ein "getfirstdocument"

Navigation

[0] Themen-Index

[#] Nächste Seite