Darren Dick
D.Dick at uws.edu.au
Tue Jun 14 23:31:11 CDT 2005
Never Mind Updated to latest MDAC and that sorted it See ya DD -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren Dick Sent: Tuesday, June 14, 2005 12:28 PM To: accessd at databaseadvisors.com Subject: [AccessD] A2003:Connection Method failing Hello all (Cross Posted to Sue and Dmitri's list) The code below used to work - now it doesn't Our enterprise has moved to Exchange - does that matter? The error is ERR.Number = -2147024769 ERR.Description = Method 'Connection' of object '_CurrentProject' failed Any suggestions? Code snip below Dim rs As Object Dim con As Object Dim objOutlook As Outlook.Application Dim objAppt As Outlook.AppointmentItem Dim objRecurPattern As Outlook.RecurrencePattern Set objOutlook = CreateObject("Outlook.Application") Set objAppt = objOutlook.CreateItem(olAppointmentItem) Set rs = CreateObject("ADODB.Recordset") Set con = Application.CurrentProject.Connection '<=============Error here -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com