OL97: How to Set a Form's From Field Using VBScript (168022)

MORE INFORMATION

Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft Support professionals can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific needs. If you have limited programming experience, you may want to contact the Microsoft fee-based consulting line at (800) 936-5200. For more information about the support options available from Microsoft, please see the following page on the World Wide Web: You can use Microsoft Visual Basic Scripting Edition (VBScript) or Automation to populate various fields on a form. When you create a mail message (MailItem) form to send to someone, the "To" "CC" and "BCC" fields are set by using the Recipients collection.

The following sample code modified from the "Recipients Collection Object" topic in the Vbaoutl.hlp Help file demonstrates how to create a new Mail item and populate the CC: line.

Note: This code illustrates use of Automation from another program.

   'Create an Outlook application object
   Set myOlApp = CreateObject("Outlook.Application")
   'Creates a new MailItem form
   Set myItem = myOlApp.CreateItem(olMailItem)
   'Add Jon Grande to the Recipients collection
   Set myRecipient = myItem.Recipients.Add("Jon Grande")
   'Set the CC field to the Recipients collection defined above
   myRecipient.Type = olCC
				

You can use the constants olTo, olCC, and olBCC to set the "To", "CC", and "BBC" address fields of the MailItem. However, olOriginator does not set the "From" field.

For security purposed, the From field is read-only. You cannot send mail directly specify someone else's name. However, if someone else has given you delegate permissions, you can use the SentOnBehalfOfName property to populate the From field of a mail message form.

The following example demonstrates the use of the SentOnBehalfOfName property:

   'Create an Outlook application object
   Set myOlApp = CreateObject("Outlook.Application")
   'Creates a new MailItem form
   Set myItem = myOlApp.CreateItem(olMailItem)
   'Set the "From" field
   myItem.SentOnBehalfOfName = "Jon Grande"