Domino 9 und frühere Versionen > ND6: Entwicklung

Wie leert man einen Ordner

(1/2) > >>

Don Pasquale:
Es gehört thematisch zu einem anderen Thread, ist
aber etwas eigenes :

Ich will einen existierenden Ordner leeren.

Ich will folgenden Code ersetzen, er funktioniert nur unter Lotus 5 einwandfrei.

   Set view = db.GetView(ORDNER_EIGENE_DOKUMENTE)
   Set vc = view.AllEntries
   Call vc.RemoveAllFromFolder(ORDNER_EIGENE_DOKUMENTE)


Gibt es eine andere Möglichkeit, einen Ordner zu leeren,
Die Dokumente sollen nicht (!) gelöscht werden.

Vielen Dank für Eure Antworten

Ciao
Don Pasquale

Glombi:
Hi,
unter R6 geht das nicht???

Evtl. so:

dim doc as NotesDocument
dim nextdoc as NotesDocument

Set view = db.GetView(ORDNER_EIGENE_DOKUMENTE)
set doc = view.GetFirstDocument

while not (doc is nothing)
 set nextdoc = view.GetNextDocument(doc)
 call doc.RemoveFromFolder(ORDNER_EIGENE_DOKUMENTE)
 set doc = nextdoc
wend

Andreas

Scorp:
Hi! Unter R6 mach ichs auch immer so ähnlich

dim doc as notesdocument
dim view as notesview

set view = db.getview("zzz")
set doc = view.getfirstdocument

while not (doc is nothing)
  call doc.remove(true)
  set doc.getfirstdocument
wend

Don Pasquale:
@Glombi
Der Code scheint buggy unter R6 zu sein.

@Scorp

Oh, so schnell, Herzlichen Dank Ihr beiden !

Don Pasquale:
dim doc as notesdocument
dim view as notesview

set view = db.getview("zzz")
>set doc = view.getfirstdocument

while not (doc is nothing)
  call doc.remove(true)
  set doc.getfirstdocument
wend

Genau hier bekomme ich wieder diesen Fehler,
was bedeutet der denn überhaupt :

Index IS not be generated on server

Ich werd noch wahnsinnig

Ciao
Don Pasquale

Navigation

[0] Themen-Index

[#] Nächste Seite