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

Stuart McLachlan stuart at lexacorp.com.pg
Mon Sep 28 23:09:49 CDT 2009


Something like

Private Sub txtEmail_Click()
DoCmd.SendObject , , , txtEmail, , , , , True
End Sub

-- 
Stuart

On 28 Sep 2009 at 21:53, jwcolby wrote:

> Well...
> 
> On that note, can I make the email address a hyperlink in a normal text box and use this somehow? 
> They really want the email to just be a hyperlink which when they click on it causes the email 
> client to open with that email in the To:
> 
> John W. Colby
> www.ColbyConsulting.com
> 
> 
> Darren - Active Billing wrote:
> > Hi John
> > 
> > There are heaps of ways to do this
> > I like using Mailto: when there is not need to get fancy
> > Using Mailto: and shelling to it does a lot of the basics and will open the
> > 'default' email client for that pewta
> > 
> > EG try this in START|RUN of XP
> > 
> > 	mailto:jw at someServer.com?subject=testing
> > 
> > And then try this in a VBA module
> > ````````````````````````````````````````````````````````````````````````
> > Private Sub cmd_SendSimpleMailtoEmail_Click()
> > 
> > Dim strRecipient As String
> > Dim strSubject As String
> > Dim strFullStringToPass As String
> > 
> > 
> > strRecipient = "jw at someServer.com"
> > strSubject = "Just testing"
> > strFullStringToPass = "mailto:" & strRecipient & "?subject=" & strSubject
> > 
> > Debug.Print strFullStringToPass
> > 
> > Call ShellExecute(hwnd, "open", strFullStringToPass, vbNullString, vbNullString,
> > SW_SHOWNORMAL)
> > 
> > End Sub
> > ````````````````````````````````````````````````````````````````````````
> > Hope this helps
> > 
> > Darren
> > 
> > 
> > -----Original Message-----
> > From: accessd-bounces at databaseadvisors.com
> > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jwcolby
> > Sent: Tuesday, 29 September 2009 10:55 AM
> > 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...
> > 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com





More information about the AccessD mailing list