Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: Detlef am 13.07.04 - 11:43:47

Titel: Mails per Script in einen Ordner verschieben.
Beitrag von: Detlef am 13.07.04 - 11:43:47

Hallo,

kann mir jemand sagen, wie ich ein Dokument per Script in einen Ordner verschiebe?

Genauer gesagt, sollen alle eingehenden Mails aus dem Posteingang in bestimmte Ordner verschoben werden. Ich kann die Dokumente wohl in einem Odner hinzufügen nur leider nicht verschieben:

Das ganze in einem Agent für eingehende Mails

   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim doc As NotesDocument
   Dim coll As NotesDocumentCollection
   Set db = session.CurrentDatabase
   Set coll = db.UnprocessedDocuments
   Set doc = coll.GetFirstDocument
   While Not(doc Is Nothing)
      Call doc.PutInFolder("Kunden",True)
      Set doc = coll.GetNextDocument(doc)
   Wend

Danke für Tips!

Detlef

Titel: Re:Mails per Script in einen Ordner verschieben.
Beitrag von: koehlerbv am 13.07.04 - 11:50:19

Gib NotesDocument.RemoveFromFolder eine Chance  ;)

Bernhard

Titel: Re:Mails per Script in einen Ordner verschieben.
Beitrag von: Detlef am 13.07.04 - 11:56:40

Bin ich denn so blind  8) ???


Danke!

Detlef