Domino 9 und frühere Versionen > Entwicklung

Dokumente aus Ordner entfernen

<< < (2/2)

skywook:
Habe jetzt den Code geändert. Aber gleiche Meldung.
Was mache ich falsch?

If uidoc.fieldGetText("DSuche") = "Kunden-Nr.(alt)" Then
   Dim vs As notesviewentrycollection
   Dim folderview As notesview
   Set folderview = db.GetView("Suche")
   Set vc = folderview.AllEntries
   Call vs.RemoveAllFromFolder( "Suche" )   => hier meckert der Debugger

Axel:
Hi,

du hast vs deklariert und verwendest auch vs zum entfernen der Dokumente aus dem Ordner. Gefüllt wird aber die Variable vc, dass kann nicht funktionieren.

Da müsste so aussehen:

If uidoc.fieldGetText("DSuche") = "Kunden-Nr.(alt)" Then
   Dim vs As notesviewentrycollection
   Dim folderview As notesview
   Set folderview = db.GetView("Suche")
   Set vs = folderview.AllEntries
   Call vs.RemoveAllFromFolder( "Suche" )


Axel

koehlerbv:
Du hast kein Option Declare gesetzt - schreibe nie eine Zeile Code ohne diese Option.
Du deklarierst vs, instantiierst es aber nicht, sondern statt dessen vc.

HTH,
Bernhard

Navigation

[0] Themen-Index

[*] Vorherige Sete