Das Notes Forum

Domino 9 und frühere Versionen => ND8: Entwicklung => Thema gestartet von: Hedwig14 am 15.04.14 - 10:46:07

Titel: While not doc is nothing
Beitrag von: Hedwig14 am 15.04.14 - 10:46:07

Hallo ! Wie kann ich mir in diesem Fall helfen ?

Ich habe eine Ansicht mit allen Dokumenten im Status "10".
Mit einer "While not doc is nothing-Schleife"durchlaufe ich alle Dokumente und müßte auch das Feld Status teilweise anpassen. Dann stimmt aber der Index nicht mehr ! Was kann man in diesem Fall tun ?

Titel: Re: While not doc is nothing
Beitrag von: koehlerbv am 15.04.14 - 10:59:29

NotesView.AutoUpdate = False. Und am Ende des Codes und im ErrorHandling AutoUpdate wieder auf True setzen.

Titel: Re: While not doc is nothing
Beitrag von: Hedwig14 am 15.04.14 - 11:04:26

wie geil ! Das kannte ich noch gar nicht ! Danke !

Titel: Re: While not doc is nothing
Beitrag von: RunRevilo am 15.04.14 - 11:06:34

Hallo,
du könntest dir auch mit einem temporären Hilfsdokument behelfen, damit bleibt der Index erhalten.

Dim doc As NotesDocument
Dim tempdoc As notesdocument

Do Until doc Is Nothing
      Set tempdoc=doc    
      doc.Status(0)= .    ' Anpassung des Feldes Status
      Set doc = view.GetNextDocument(tempdoc)
Loop