[AccessD] Open an email (to send) in Access

Thanks Rocky.

John W. Colby
www.ColbyConsulting.com


Rocky Smolin wrote:
> John:
> 
> I use     
> 
> Dim myolApp As Outlook.Application
> Dim myItem As Outlook.MailItem
> 
>     Set myolApp = CreateObject("Outlook.Application")
> 
>     Set myItem = myolApp.CreateItem(olMailItem)
>     
>     myItem.To = Me.fldCustomerEmail
>     myItem.Display
>  
> HTH
> 
> Rocky
> 
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jwcolby
> Sent: Monday, September 28, 2009 5:55 PM
> To: Access Developers discussion and problem solving
> Subject: [AccessD] Open an email (to send) in Access
> 
> Does anyone have any code that will open outlook if it isn't already and
> then open an email for send, placing an email address in the To:
> 
> I have code for opening Outlook and automatically sending the email but not
> to open the email and allow the user to fill it in.  I can go figure it out
> but if you have it...
> 
> --
> John W. Colby
> www.ColbyConsulting.com
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>