PC Review Forums Newsgroups Microsoft Outlook Microsoft Outlook VBA Programming Custom Form Help

Reply

Custom Form Help

 
Thread Tools Rate Thread
Old 02-03-2005, 08:07 PM   #1
pkruti@hotmail.com
Guest
 
Posts: n/a
Default Custom Form Help


Okay i am lost and needs some help :-( i am trying to create a task and
send then task to whomever it needs to be sent to. I created a new form
and added the fields address and community and i published the form in
the "Organizational Forms Library" and i changed the Properties for the
Task folder so that it see the new custom form created. And now i am
VBA and have the code below but when i send the task the new custom
form doesnt show up......its the deafult one. any ideas on waht i may
be doing wrong??? i dont get any error messages but when i send this
task it doesnt use the custom form i created called "taskdesign"


Set task = outsess.CreateItem(olTaskItem)
task.Recipients.Add test
Set olns = outsess.GetNamespace("mapi")
Set myfolder = olns.GetDefaultFolder(olFolderTasks)
Set myitem = myfolder.Items.Add("IPM.task.taskdesign")


task.Subject = "Job Number: " & worksheets("Brick").Range("jobno") & "
Brick Selection Sheet has been approved"
task.Attachments.Add amessage, 1, , "Brick Spec Selection Approved"


task.UserProperties("Address") = worksheets("Brick").Range("address")
task.UserProperties("community") =
worksheets("Brick").Range("community")


task.Categories = ("Brick Spec Selection")
task.Assign
task.Send
amessage.Delete

  Reply With Quote
Reply



Thread Tools
Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off