G
Guest
Hi All
I am using the code fragment below (courtesy of Tom Wickerath) to send an
e-mail via Outlook 2003 (from Access 2000). The problem is that, unlike the
DoCmd.SendObject function, Outlook does not display on screen. Is there any
way to display Outlook so that the user can see the e-mail and add any
comments. With Word the command :-
myObject.Visible = True
works but this line errors out in Outlook.
'---------------------
Dim myObject As Object, myItem As Object
Dim vCount As Long
Dim vArray() As String
On Error GoTo ProcError
Set myObject = CreateObject("Outlook.Application")
Set myItem = myObject.CreateItem(0)
.... etc
'-------------------------
I am using the code fragment below (courtesy of Tom Wickerath) to send an
e-mail via Outlook 2003 (from Access 2000). The problem is that, unlike the
DoCmd.SendObject function, Outlook does not display on screen. Is there any
way to display Outlook so that the user can see the e-mail and add any
comments. With Word the command :-
myObject.Visible = True
works but this line errors out in Outlook.
'---------------------
Dim myObject As Object, myItem As Object
Dim vCount As Long
Dim vArray() As String
On Error GoTo ProcError
Set myObject = CreateObject("Outlook.Application")
Set myItem = myObject.CreateItem(0)
.... etc
'-------------------------