Move Lotus Notes mail to a folder in Lotus Notes through VBA

[Crocus Crow]

Try:

doc.Save True, False

before the PutInFolder, to commit changes to the document.