EMAIL - a single record

[Rpettis31]

Is there some tweak to the access settings so that I can send in an email a
form??
I am able to print the single record in the form but I would like to know
how I could email that as well?

Thanks
Robert

 

[Arvin Meyer [MVP]]

Use something like (untested):


Public Function SendEMail() As Boolean
' Add an error handler

Dim strTo As String
Dim strSubject As String
Dim strText As String

strTo = Me.txtEmailAddress

strSubject = "Quote"

strText = "User " & Me.UserName & vbCrLf
strText = strText & "On " & Format(Date, "Long Date")
strText = strText & vbCrLf
strText = strText & vbCrLf & vbTab & Me.txtDescription
strText = strText & vbCrLf & vbTab & "As Requested By: " &
Me.cboCustomerName
strText = strText & vbCrLf & vbTab & "Estimate To Complete = " &
Me.txtAmount

'DoCmd.SendObject acSendNoObject, , , strTo _
, , , strSubject, strText, True

End Function

 

[Tony Toews [MVP]]

Is there some tweak to the access settings so that I can send in an email a
form??
I am able to print the single record in the form but I would like to know
how I could email that as well?

Microsoft Access Email FAQ
http://www.granite.ab.ca/access/email.htm

Tony
--
Tony Toews, Microsoft Access MVP
Please respond only in the newsgroups so that others can
read the entire thread of messages.
Microsoft Access Links, Hints, Tips & Accounting Systems at
http://www.granite.ab.ca/accsmstr.htm
Tony's Microsoft Access Blog - http://msmvps.com/blogs/access/