Doc.putinfolder question

HCL Domino Domino Forum
1

…taking this little blurb…

Set db = s.Currentdatabase

Set dc = db.Ftsearch( query, 0, FT_DATE_ASC )

If dc.Count = 0 Then Exit sub

set doc = dc.Getfirstdocument()

While Not (doc Is Nothing)

Call doc.putinFolder ( yearString, False)

Set doc = dc.Getnextdocument( doc )

Wend

The doc collection is from the inbox in a mail file.

when I run this, it appears to not move or copy the memo document from inbox to the %year%folder. but it appears to link them.

After this is run, it appears that the desired docs is in the folder, but a duplicate still exist in inbox. If I delete the one from inbox… the one in the folder disappears also…and visa versa…

Can anyone please tell me what I’m missing?

~Brett

2

Subject: A folder is not really a container for documents

It’s actually an index of documents. A single document can be in multiple folders. If you delete it once, you delete it everywhere. iNotes tends to duplicate documents when you move them between folders, but that’s a bug.

If you wish to move a document from one folder to another you must also explicitly remove it from the source folder.

3

Subject: I understand…

Thanks…I used a :

Call doc.Removefromfolder( “($Inbox)” )

in my while loop and that took care of it…

Thanks again!

~Brett