Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Send an Email from Access 2003 Form

Status
Not open for further replies.
Aug 10, 2001
15
0
0
AT
In Access 2000 (Windows) I had a code which enabled me to open an Email Form of Outlook by (double)klicking on the Email Address written in the Access form.
It went:

Private Sub Email_Adresse_DblClick(Cancel As Integer)
On Error Resume Next
DoCmd.SendObject acSendNoObject, , acFormatRTF, Me!, , , , , -1
End Sub

Now that I have Windows XP and Access 2003 this code does not work anymore. Anyone knowing the code I should use now?

Thanks
 
this is code that was recomended to me... it is in an button click but could be adapted for your dbl.click
I use it in access 2000 not 2003 though
Code:
Private Sub emailcontact_Click()
Dim hlk As Hyperlink
Set hlk = emailcontact.Hyperlink
hlk.Address = "MailTo:" & Me.contactemail & "?subject=Number" & Forms!job_form.number
MsgBox "This will create an email and put " & Me.contactemail & "in the" & vbCrLf & " TO: box YOU must open Outlook and Send Mail or your " & vbCrLf & " email may get placed in your Outbox and not get sent.", vbOKOnly, "Send E-mail TO: " & Me.contactemail
End Sub
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top