Assigned task are in my sent Items

T

Tony

I am having a major problem with my form. Does anybody know of a
reason why my form when it generates an assigned task and the task is
sent it gets stored in the Sent Items folder. The check boxes for
"Keep an updated copy of this task on my task list" and "Send me a
status report when this task is complete" are both checked. I don't
understand why it is doing this. The task does notify you when it is
updated and when it is complete but for somereason goes to the the
wrong folder.

Here is the routine I am using to generate this assigned task.
The button is also on a task form.

Sub Assign2_Click

set ProtoItem = application.activeinspector.currentitem
ProtoItem.Save

set RequestItem = Application.CreateItem(3)
RequestItem.Assign
RequestItem.Recipients.Add(PersonAssigned)
RequestItem.Subject = PersonAssigned & " - " & CustomerName & " - #"
& ProtoNumber
RequestItem.Body = chr(13) & chr(10) & PersonAssigned & " here is
Document #" & DocNumber & ". Please complete the Form as soon as
you can. After completion please set the status on this task to
complete." & chr(13)
RequestItem.DueDate = Now() + 21
RequestItem.Categories = "Department"
RequestItem.Attachments.Add ProtoItem, 4, 1, "Yarn Coating"
RequestItem.Attachments.Add "\\PHIFERUTILITY\Public\Word.doc", 1
RequestItem.Save

ProtoItem.Body = chr(13) & chr(10) & ProtoItem.Body & chr(13) &
chr(10) & Now() & chr(13) & chr(10) & "Task assigned to " &
PersonAssigned & "." & chr(13) & chr(10) & chr(13) & chr(10)
ProtoItem.Attachments.Add RequestItem, 4
ProtoItem.Save

RequestItem.Display

Set ProtoItem = Nothing
Set RequestItem = Nothing

End Sub

Please help.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top