Here is my code. When I run the form, I get an error saying "Could not
complete the operation. One or more parameter values are not valid.
Line No:11"
Sub Item_PropertyChange(ByVal Name)
Select Case Name
Case "Status"
if Item.Status = 2 then '2 = Completed
Set NewItem = Application.CreateItem(0)
NewItem.To = "(E-Mail Removed)"
NewItem.CC = "(E-Mail Removed)"
NewItem.Recipients.ResolveAll
NewItem.Subject = "Team Meeting - Ops. 2 Dept. 3 Team 304"
NewItem.Body = "Attached is the agenda for Team 304's Team Meeting to be
held next Monday."
NewItem.Attachments.Add Source = "C:\Agenda.doc"
NewItem.Display
End IF
End Select
End Sub
*** Sent via Developersdex
http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!