Send Object Macro Via Outlook
Dec 23, 2005
Hoping someone can help - need to know if there is a way to use a Outlook message other than the blank one that is used with the send object macro.
Maybe a normal message with a signature, template or something - when the macro is run, no formatting is included with the e-mail message, and the body of the message is limited to 255 charaacters.
Would like to use a customized message, and I need the send object macro to place the object in that message format.
If anyone can help, I would greatly appreciate it...thanks.
View Replies
ADVERTISEMENT
Oct 4, 2006
Is there a way to tie a send object to a combo box on a form? I know I can write a query to pull information from a selection in a combo box using the [form][formname]thing. What I'm trying to do is I've created a database that allows many users to enter a request in a form. then when the form is complete they need to E-mail the form to their respective manager. I want them to choose from a combo box, then click on a button and the form is e-mailed to their manager for approval. I've gotten everything else to work accept for being able to choose the manager. I know I could also leave that blank and it will ask for them to enter the recipients name. If that's my only option I'm ok with that.
Thanks
PS If this issue has already been addressed I couldn't find it.
View 1 Replies
View Related
Jul 13, 2013
A client wants to e-mail newsletters using a non-default Outlook account. The code below does everything the client needs except setting the SendUsingAccount. In debug I can see that the correct account is assigned, yet all of my testing results in e-mails where the From line is the default account. The test setup uses my own isolated SMTP server, so when I look at the e-mails sent the sender is the default account. The default account's Sent folder shows the sent mail, which is not what we want.
Code:
Sub prepEmail()
Dim frm As Form, startDate As Date, endDate As Date
Dim rs As DAO.Recordset, strSQL As String, intNewsLetter As Integer
Dim rsEmail As DAO.Recordset, rsNewsletters As DAO.Recordset
Dim OlApp As Object, ol As Object
Dim olMail As Object, olAcct, olAcctTemp
[code]...
View 3 Replies
View Related
Jul 28, 2005
Hey there, folks,
Got one I need some help on. Perhaps one of you has tried something like this before...
I need to create a tool that will allow me to do the following:
1. Search an Outlook email box for all emails that have a keyword in the subject line that I have chosen from a drop list
2. Open all qualifying emails
3. Print all of them, including all attachments associated with them
4. Close the emails, and move them all to a folder
I've got the email box linked to Access (we've got 2003 running here), and I have no problem accessing the emails and even deleting them, etc. I can see if they have an attachment, but am unable to discern where it is or how to get to it to open it. I also cannot get the emails to show as "read" when I open them using the db. There is a col for "contents unread," but it is a number variable (I cannot change this since it's a linked table), and all rows are blank anyway.
It is important that I am able to print them including the attachments and move them out when done.
Whaddya think?? I'm open to any and all suggestions!
Thanks in advance,
Ceejay
View 2 Replies
View Related
Mar 13, 2013
I am trying to modify the following code to send an automated e-mail using Microsoft Outlook instead of Lotus Notes. We recently switched e-mail clients and now the older code does not work. I have tried to comment in all areas to indicate where the new Outlook code has been inserted.
Private Sub SendEmail(ByVal Subject As String, ByVal Body As String)
'The bulk of this code for Lotus Notes comes from this website:
Dim copy(100) As Variant
Dim strSQL As String
Dim rsTemp As Recordset
Dim Maildb As Object 'The mail database
Dim UserName As String 'The current users notes name
[code]....
View 10 Replies
View Related
Feb 3, 2014
I'd like a command button to open Outlook and create a new email message with the To and Subject fields already populated with what I want, is there anyway to do this?
View 1 Replies
View Related
Oct 30, 2014
I have a VBA module in my Access 2010 database that will send a report as a PDF via email to a predetermined email address. the only problem using the docmd.sendobject method is i keep getting a pop up that says "A program is trying to send an e-mail on your behalf. If this is unexpected, click Deny and verify your antivirus software is up-to-date."
I have a windows task set up at the same time each day to open this database which runs an autoexec that creates this report and using my VBA module sends the email. i want it to just send the email without any imput from me. I want automation.
Here is my code that i am using to create and send the email
"Private Sub Report_Activate()
filename = "Name of file" & Format(Me.Date_time_returned "MMDDYY") & ".pdf"
DoCmd.SetWarnings False
DoCmd.SendObject acSendReport, "Name of file", acFormatPDF, "the destination email address goes here",,, "Request completed and sent " & Format(Me.Date_time_returned, "MMDDYY"), "Subject of email goes here", False
DoCmd.SetWarnings True
End Sub"
View 4 Replies
View Related
Nov 3, 2005
i have a form, every post on this form is connected to a deliverer in a table, every deliverer has a faxnr.
I want to be able to push a button on a form and it will fax the form to that deliverer, how woud this be done?
Ive checked that microsoft page about send object and stuff but i dont get much and it doesnt seem to be what i want to do.
Is this thing even possible in access?
When i try a sendobject command, i get "coudnt start the mail software, check that the software works" translated from swedish.@@1@@1
View 1 Replies
View Related
Nov 14, 2005
Hi ,
In MS Access,
I used sendobject to send the object via Lotus Notes, but I want to skip to click the Send button from the Lotus Notes, everytime, when I sent, it goes to the Lotus Notes, then I need to click the send button again on the Lotus Notes for confirmation to send the mail. How can I skip it?
sendobject ........................, False
I used False or True, it still cannot be solved.
Please let me know, thanks.
Thanks.
View 1 Replies
View Related
Nov 23, 2012
I am using a command button to email an invoice to a customer using the sendobject function, whilst this almost works correctly it is adding an additional mailto:address along with the correct email address.
Example: CorrectEmailAddress and then#mailto:CorrectEmailAddress
The code I am using is:
On Error Resume Next
Dim Cusemail As String
Cusemail = Nz(DLookup("Email", "invoiceemailQ", "orderID=" & OrderID), "")
If Cusemail = "" Then
MsgBox "No email Address"
Exit Sub
[code]....
View 6 Replies
View Related
Sep 26, 2013
I want to sent out my report as a pdf file with my macro.. I've been trying to use the VBA
Code:
Option Compare Database
Sub Fix1()
DoCmd.SendObject acSendReport, "MarketRiskControl_HighestDiffs_AsOfCurrentDate", "PDFFormat(*.pdf)", "my mail@mail", "cc", , "SD Counterparty Report as of Current Date", "Regards, Trading Risk Control", False
End Sub
But this doesn't work, get run-time error 2282..
I am using access 02.
View 1 Replies
View Related
Oct 13, 2014
I want to send an e-mail with a report as attachment.On the internet i have found two options, and both are not the best solutions.
1. option
Code:
DoCmd.SendObject acSendReport, sReport, acFormatPDF, sMailAdres
With this construction I don't have enough control over the mail, and worse, I get an Outlook message when the mail is sending which I have to answer.
2. option
Code:
Dim oMail As MailItem
Dim oAtt As Attachment
Set oApp = CreateObject("Outlook.application")
Set oMail = oApp.CreateItem(olMailItem)
DoCmd.OpenReport ReportName:=sReport, View:=acViewPreview, WindowMode:=acHidden
Set rpt = Reports(sReport)
[code]...
with this construction I have to enter an existing report.pdf on my filesystem (bold line), but I want to pass the rpt object straight to the mail as an attachment.
View 2 Replies
View Related
Nov 14, 2012
Must Outlook be installed for Access to send emails?
Can I send emails from the Run-Time version of Access? (with and without outlook)
View 1 Replies
View Related
Dec 18, 2013
I have a contact form on our website which sends an email to the business dev team saying that the user has requested to be sent product sheets. The email contains the users name, email, phone number, and a few other fields. Is there a way I can send the details of these emails to my access database automatically?
View 9 Replies
View Related
Sep 18, 2006
ok, i have been searching on google and the forums for sending forms/reports as outlook atachments.
all the examples i have seen are more complicated than my one.. i have one form.. and i just want to email those details.. in the form are the fields, one textbox where you put the email address, and one send email form button..
i got it working using a long module, that i didnt understand..and then i was told about the DoCmd.SendObject method which looks a lot easier..
i have one request, in the simple database i have uploaded, will someone show me where to put the code.. the db is VERY simple, and quick (one form with a send email button).. and if anyone can spare a few minutes to get this one working i will be very grateful..
View 3 Replies
View Related
Jan 4, 2014
Is there a way of doing the above? I have several distribution lists (some >100 recipients) defined in Outlook, and would like to use the Docmd. Send Object command to send messages to one or several of them. I cannot find a way of defining a distribution list as any of the To, Cc or Bcc parameters.
View 2 Replies
View Related
Nov 11, 2014
I'm trying to use Access to send an automatic email reply upon receiving a request from a customer/employee, telling them that their request has been received and this is the tracking number and the due date of service completion. How can I do that? And I want it using Outlook because all the contacts are saved in Outlook and all emails sent and received through Outlook. And the version is Access 2010.
View 3 Replies
View Related
Apr 3, 2007
I have a query that runs based on a parameter a user selects on a form.
I want to dynamically create the sendobject file name based on the parameter the user selects.
Example:
My form has a parameter named medicine. When the user checks the checkbox next to medicine it runs a query for records labeled as medicine but sends the e-mail output as the query name. I want something like medicine.txt etcc...
thanks
:confused:
View 1 Replies
View Related
Aug 27, 2014
I have a data base in access 2007, and I'm trying to add into my code one option that includes in the CC: field contacts that I already have in my DB.
This is my code:
Dim rs As Recordset
Dim vRecipientList As String
Dim vMsg As String
Dim vSubject As String
[Code] ......
View 7 Replies
View Related
Apr 25, 2014
When using SendObject to send an e-mail, is there code to turn on the following?
- encrypt,
- digital signature and
- read receipt
Or must the user activate these when the e-mail is generated?
View 2 Replies
View Related
Feb 3, 2014
I have a report that I run manually from my computer every day.
This report is created by a macro in microsoft access, then it runs a VBA macro to send it out..
Is there a way that I can add this as a scheduled task since I usually forget to send it out?
View 3 Replies
View Related
Jul 13, 2013
I have the code below which takes information from a form on access and sends it over to the correct place on an excel spreadsheet template. This works fine but I then need it to save and send on outlook.
The issue I am having is that the saved document is not attaching to the e-mail. The subject etc all work fine but the excel spreadsheet just doesn't attach. When I go into the folder I have specified for the document to be saved in it isn't there either. :0(
The code for the e-mail "callmail" function works perfectly for word documents but I don't know if it is different for an excel file.
Code:
Private Sub Command154_Click()
On Error Resume Next
Dim appExcel As Excel.Application
Dim wbook As Excel.Workbook
Dim wsheet As Excel.Worksheet
Set appExcel = New Excel.Application
[Code] .....
View 4 Replies
View Related
Jun 26, 2014
Can I use html to format the message body in send object method ? If I can, how to do that.
View 5 Replies
View Related
Sep 15, 2014
I have a strange behaviour on a module which reference to Microsoft Outlook Object Library 14.0. The below code got an error 461 on the folderoutlook.display code,i.e. the method is not found. The funny thing is that the same code gives no problem in another accdb file, exactly same code with same reference on same machine.
Set appOutlook = GetObject(, "Outlook.Application")
Set appOutlook = New Outlook.Application
Set namespaceOutlook = appOutlook.GetNamespace("MAPI")
Dim folderOutlook As Folder
Set folderOutlook = namespaceOutlook.GetDefaultFolder(olFolderInbox)
FolderOutlook.Display
View 4 Replies
View Related
Mar 24, 2014
I'm trying to have a command button send info on the form straight to Outlook as a meeting. So far, the code below works apart from the address bit. I need the code to automatically add the same 2 email addresses as recepients everytime.
Error message highlights the red line below with the following message:
Runtime error '438'
Object doesn't support this property or method
I'm new to VBA, so don't understand what is wrong here. The reference is set, I've tried different permutations of the "To:" & "Recipients.Add" for the email address with no joy.
Code:
Private Sub cmdSend_Click()
Dim outApp As Object
Set outApp = CreateObject("Outlook.application")
Set outmail = outApp.CreateItem(olappointmentitem)
[Code] .....
View 10 Replies
View Related
Sep 15, 2014
I've setup a selection form that returns a specific list of email addresses in a query.
What I can't work out is how to press a button and have the email addresses populate the To: field in a blank Outlook email - I don't need any bells or whistles.
View 8 Replies
View Related
