Is there a way to put in the script so it only sends an email when the item
Yes, but you're in danger of actually learning something about Outlook programming. Are you sure you want to do that? <g>
When a new item is created, it has a Size = 0. That means you can check the value of the Size property and act accordingly:
Function Item_Write()
If Item.Size = 0 Then
Set newItem = Application.CreateItem(0)
With newItem
.To = "(e-mail address removed)"
.Subject = "New contact"
.Body = "There is a new contact."
.Send
End With
End If
End Function
Also is there a way to program in the VB Script to note which contact the
addition is for within the email message so they know which one is new?
Yes, but it's time for you to do some homework of your own. All the pieces you need to do that are in the code above, except a couple that I'll give you. Here are the pieces you need to find and then put together to add your own code:
1) Outlook coding works largely with objects and properties of objects. There are many examples in the code above, where you read the property of one object and set the properties of another. Which object represents the current contact item?
2) Which object represents the new message to be sent?
3) Which property contains the name of the item? (HINT: It's the same for all types of items.)
4) Which property do you want to use to show the recipient the name of the new contact?
5) How do you put two pieces of text together?
I'll answer the last one for you -- with the ampersand & character, e.g. "red " & "balloon" would give you the string "red balloon."
See if you can figure it out, and then pat yourself on the back for learning something more than cut-and-paste about Outlook form scripting. Holler if you get stumped.
--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003
and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
