[dba-Tech] Access to Outlook question

Should be IPM.Contact

Michael R. Mattys
MapPoint & Access Dev
www.mattysconsulting.com

----- Original Message ----- 
From: "Susan Harkins" <ssharkins at gmail.com>
To: "DBA Tech List" <dba-tech at databaseadvisors.com>
Sent: Sunday, November 11, 2007 6:41 PM
Subject: [dba-Tech] Access to Outlook question


> In the following code, the Set itm = itms.Add("IMP.Contact") statement 
> returns an object variable not set error. The Outlook library is 
> referenced. Any help?
>
> Susan H.
>
>
>
>  Dim itms As Outlook.Items
>  Dim itm As Outlook.ContactItem
>  Set cnn = CurrentProject.Connection
>  rst.Open "tblContacts", cnn
>
>  Set itm = itms.Add("IMP.Contact")
>
>  With itm
>    .CustomerID = Nz(rst!CustomerID)
>    .FirstName = Nz(rst!FirstName)
>    .LastName = Nz(rst!LastName)
>    .Department = Nz(rst!Department)
>    .Birthday = Nz(rst!Department)
>  End With
> _______________________________________________
> dba-Tech mailing list
> dba-Tech at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/dba-tech
> Website: http://www.databaseadvisors.com