Search results

  1. R

    Adding a signature to email

    Below is all the code: Option Compare Database Sub ReportOutlookBody() Dim db As DAO.Database Dim rst As DAO.Recordset Set db = CurrentDb Dim BodyText As String Dim strTableBeg As String Dim strTableBody As String Dim strTableEnd As String Dim strFntNormal As...
  2. R

    Adding a signature to email

    Yes, the bit in red is correct.
  3. R

    Adding a signature to email

    That part of the code works but when I add the below code, it ignores the signature. With OutMail .To = Forms!Main!TxtEmailTo .CC = Forms!Main!txtCCTo .BCC = Forms!Main!txtBCCTo .Subject = txtSubjectHeading .HTMLBody = strFntNormal & BodyText & strTableBody &...
  4. R

    Adding a signature to email

    Yes, I can get the body text with the code I have. I have my default signature set but it does not want to add the signature with the code. Not sure what I am doing wrong.
  5. R

    Adding a signature to email

    I don't get an error but it does not add the signature.
  6. R

    Adding a signature to email

    That code just brings back a blank e-mail.
  7. R

    Adding a signature to email

    The BodyText is working fine. When I put a period I get the error that it is unqualified. That part of the code worked before I stared trying to code the signature. For some reason I can not get the signature code to work.
  8. R

    Adding a signature to email

    No, I got the same error. Am I missing something in the code?
  9. R

    Adding a signature to email

    I split the code into 2 functions as below. I am not sure how to call the first part in the second part. Oh, and BodyText is actually a string. Thanks for your help. Function ReportOutlookBody() Dim db As DAO.Database Dim rst As DAO.Recordset Set db = CurrentDb Dim BodyText...
  10. R

    Adding a signature to email

    Ok, I will try that. Thanks!
  11. R

    Adding a signature to email

    If you put a path to the signature file...the name of the file will change on different users computers. Is there a way to have it work to pull the default signature, no matter who is using the application?
  12. R

    Adding a signature to email

    Sub ReportOutlookBody() Dim db As DAO.Database Dim rst As DAO.Recordset Set db = CurrentDb Dim strBodyText As String Dim OlApp As Outlook.Application Dim ObjMail As Outlook.MailItem Dim strTableBeg As String Dim strTableBody As String Dim strTableEnd...
  13. R

    Adding a signature to email

    strFntNormal = "<font color=black face=" & Chr(34) & "Arial" & Chr(34) & " size=2>" BodyText = Text want in the body strTableBody= the table that I have in the email
  14. R

    Adding a signature to email

    It highlights the code: .HTMLBody = strFntNormal & BodyText & strTableBody & "<br>" & .HTMLBody
  15. R

    Adding a signature to email

    I am still getting error 287: Application-defined or object-defined error and the it does not show the body of the email.
  16. R

    Adding a signature to email

    I am trying to add a signature to an outgoing outlook message through access. I am using the below code which only adds the signature to the email and does not include the body of the email. I also get the run-time error 287: Application-defined or object-defined error. This application will...
  17. R

    Referring to a listbox from Main form in a module

    That works! Thanks so much for your help!
  18. R

    Referring to a listbox from Main form in a module

    Actually, It will work but if I select only 1 record to e-mail, it will automatically populate with all the records that have the same ID whether or not I selected it. How do I get it to send the records that I have selected in the listbox?
  19. R

    Referring to a listbox from Main form in a module

    I ended up getting it to work. Thanks!
  20. R

    Referring to a listbox from Main form in a module

    I am able to get strSQL = "SELECT * FROM tblTrucks WHERE [ID] = " & Forms!Main.lstorders.Column(0) to work but I can only send one record at a time. I'm not able to send 2 records at a time. Do you know what I need to do to get this part to work?
Back
Top Bottom