I currently use code to send data to my clients and would like to include more detailed summaries by sending them some data from the subform I have. I am pretty familiar with how all this works so I just need a small line or advbice to get me started. Thanks in advance for any help.
here is the current code i use just to send the email.
I cleaned up the code to make it look simple. But basically inside of the .body i would like to be able to include subform "a" fields.
Once again thanks in advance for any help.
Matthew Trant,
My Shops Unlimited, LLC
here is the current code i use just to send the email.
Code:
Private Sub Command25_Click()
Dim olLook As Object 'Start MS Outlook
Dim olNewEmail As Object 'New email in Outlook
Dim strContactEmail As String 'Contact email address
Dim strCarrier As String 'Shipping Carrier
Dim strShipDate As String 'Ship Date
Set olLook = CreateObject("Outlook.Application")
Set olNewEmail = olLook.createitem(0)
strorderid = orderid
strEmailText = fname
strContactEmail = email
With olNewEmail
.To = strContactEmail
.BCC = "matthew@myshopsunlimited.com"
.body = "Your order details from My Shops Unlimited, LLC. " & strEmailText & strorderid & "."
.subject = "Your recent service from My Shops Unlimited, LLC"
.display
End With
End Sub
Once again thanks in advance for any help.
Matthew Trant,
My Shops Unlimited, LLC