Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

user defined fields in outlook

Status
Not open for further replies.

mgriffith

MIS
Jul 3, 2001
177
US
here is my code for changing fields in an outlook form through vb

Dim ol As Object
Set ol = CreateObject("Outlook.Application")
Set olns = ol.GetNamespace("MAPI")
Set objFolder = olns.Folders("Public Folders").Folders("All Public Folders").Folders("Edgetech").Folders("Customer Contact DB")
Set allContacts = objFolder.Items
Set newContact = allContacts.Add("IPM.Contact.Edge Cust Contact")
With newContact
.FullName = Text1.Text
.CompanyName = Text2.Text
.BusinessAddressStreet = Text3.Text
.BusinessAddressCity = Text5.Text
.BusinessAddressState = Text6.Text
.BusinessAddressPostalCode = Text7.Text
.BusinessTelephoneNumber = Text10.Text
.BusinessFaxNumber = Text12.Text
End With
newContact.Save
newContact.Display

This all works fine. My problem is that I cannot access my user defined fields for newContact. Does anyone know how i can do this? I have them all defined for the item and for the folder.

Thanks
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top