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 IamaSherpa on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. adubberke

    Need help with code to send Outlook Email from Access

    Well, I don't know what happened, but those have gone away. And this really is my whole code. I have this tied to a command button on a form to execute on click. The "description" is a field on the form. Really appreciate all of your help!
  2. adubberke

    Need help with code to send Outlook Email from Access

    Sure. I'm pretty much using what you sent, but replaced the .Body, .Subject,and .To portions. Private Sub SendEmail_Click() Dim oApp As New Outlook.Application Dim oMail As MailItem Set oMail = oApp.CreateItem(olMailItem) With oMail .Body = IIf(IsNull(Description), "", Description)...
  3. adubberke

    Need help with code to send Outlook Email from Access

    IT WORKED!!! Thank you, thank you, thank you! Ok, one last question... I want the body of the email to reference a specific field. However, when it does, I get this: <div>XXX</div> If I don't want the "<div>" and the "</div>", how do I refer the field in the code to only get the text...
  4. adubberke

    Need help with code to send Outlook Email from Access

    I'm trying to create an email in outlook and show it to the user without sending it to the recipient.
  5. adubberke

    Need help with code to send Outlook Email from Access

    Hi Andy, First, thanks for your help. Second, is there a reason why, when I click the command button on my form, nothing happens? Shouldn't an Outlook mail form pop up? Thanks! Aubrey
  6. adubberke

    Need help with code to send Outlook Email from Access

    I've seen several discussions on this topic that I've tried to utilize, but whenever I attempt to initiate the "click" nothing happens. Can someone give me some direction on what I might be doing wrong? Sub Sendmail() Dim StrEmail, StrBody As String Dim objOutlook As Object Dim objEmail As...

Part and Inventory Search

Back
Top