While testing my batch email job, I notice that the email is arriving in my Outlook 2003 SP1 with the text wrapped. Is there any way for me to control this in the VB module of Access or in Outlook? Thank you.
I am sending an email along with an attachment utilizing the "do command" method. How can I adjust the width of my email message? When I open the email in Outlook, it is all the way to the right and not extending as far as I would like to the left.
Help!
How do I add more than one attachment to the code below? Thank you.
Public Sub Command0_Click()
Dim otk As Outlook.Application
Dim eml As Outlook.MailItem
Dim rs As Recordset
' Open your table and build your distribution list
Set rs = New ADODB.Recordset
With rs...
Robert,
Thank you very much. I sent you a star... Can I add an id number that is already in the table in the subject line of the email?
ie. Test Message - id 1
Glen -
When I use your code, I get a compile error. Sub or function not defined. It seems to be the "set rs = OpenRecordset" line.
I apologize for any confusion. I did not mean a distribution list. I need to be able to send the same email body and attachment to many email addresses. I only...
Can I use the code below to send to a list of e-mail addresses? How do I augment what I already have? Thank you.
Public Sub Command0_Click()
Dim otk As Outlook.Application
Dim eml As Outlook.MailItem
Set otk = CreateObject("Outlook.Application")
Set eml =...
How can I get this code to send the attachment to all of the email addresses in the Table 1 field strEmail? Right now, it stops after the first address. Thank you.
Public Sub Command0_Click()
Dim otk As Outlook.Application
Dim eml As Outlook.MailItem
Set otk =...
Robert,
This code used to work when I had a report to send along with the email body. Now, all I need is to send the email body, and it is not working.
Thank you.
Please see below. How do augment the code? I need to send emails without reports. Thank you.
Private Sub cmdSend_Click()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim txtTO, txtCC, txtBCC, txtSubject, txtMessage As String
txtTO = ""
txtCC = ""
txtBCC = ""...
Is there any way to stop placing the report name on top of each email? Here is the code.
DoCmd.SendObject acSendReport, "Report Test", acFormatRTF, txtTO, txtCC, txtBCC, txtSubject & " " & " - " & rs![OrgKey], txtMessage, False
rs.MoveNext
Every time I send an...
Kyle,
Please see below. Thank you.
Private Sub cmdSend_Click()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim txtTO, txtCC, txtBCC, txtSubject, txtMessage As String
txtTO = ""
txtCC = ""
txtBCC = ""
txtSubject = "Request Now!"
txtMessage =...
I have automated the sending of email to many customers, and I need to put an id field in the subject line of each email. The id field is in the table and query I am running the function from. Please help. Thank you.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.