Trash Folder

Is there a way of Preventing an item from being dragged to the Trash folder from my costomized folder named “RECORDS” in my template?

I wrote an event handler for the “RECORDS” folder’s QueryAddtofolder event and wrote the code

Sub Queryaddtofolder(Source As Notesuiview, Target As Variant, Continue As Variant)

Print "Target ="  & Target & "!"

End Sub

So when I drag a document from “RECORDS” folder to Trash it should print Target= Trash!. But It doesn’t. In fact nothing is printed. Why not?

Subject: your code should work

I created a new folder called “Test” and added your code Print "Target = " + Target + “!” to its QueryAddToFolder event. It worked without any problem, to add the statement to the Status bar.