Reports :: Automated Sending Report By Email
Jan 8, 2015
Every month I have to make a report about registration of hours of a group of employees. (These employees have a deal with direction about travel hours vs. working hours).This report has to be send to the group members but only the data which is valid for the group member in it. There are 11 persons in this group so I have to send 11 reports.
I made a query with the hours registered from this group. I couldn't export it because it was read-only. That was because the query contains joins to the employee table. After that I tried it with a report. That nearly went well but it contained all data and not the seperated info.What I need to know:What is easier/better: use a query or use a report?Is there code which looks in my query or the report and makes it into seperated reports?I've tried the code of Tony Hine but I can't make it work.After that I need to do a mail-merge. But first of all do I need to make the seperated reports to work.
View Replies
ADVERTISEMENT
Jul 16, 2015
Is there a way to have my database see that its a new month and then run a report that could be automatically emailed?
View 6 Replies
View Related
Mar 6, 2012
I have inheirited an access database which used to mail out an attachment automatically but for some reason has stopped sending.
View 1 Replies
View Related
Nov 12, 2013
I am trying to send an Email from a report . Using this code
Code:
On Local Error GoTo Some_Err
Dim MyDB As Database, RS As Recordset
Dim strBody As String, lngCount As Long, lngRSCount As Long
DoCmd.RunCommand acCmdSaveRecord
Set MyDB = DBEngine.Workspaces(0).Databases(0)
[code]....
I am getting an error on lblStatus.Caption.
View 5 Replies
View Related
Mar 24, 2006
I have set up a process to automatically email reports from MS Access 2006. Everything would would perfectly except that when the process runs, a messagbox pops up stating that 'an unknown prgram is trying to send an email on your behalf'. Before the email is sent you have to click on the button to allow sending. I need this program to run very early in the morning when no one is around to click the button.
I have tried several things to get a round this by digitally signing my Access project and setting up certificates in outlook but nothing has worked.
Is there any way around this without lowering my security level, my antivirus or antispyware software?
Thanks
GEM1204
View 4 Replies
View Related
Nov 20, 2014
I need to send different reports to a bunch of different persons every hour... I had several macros that did it for me, But Then they wanted me to include a e-mail body that was more than 255chars, so i had to go VBA and i have this (for every set of persons and Reports):
Private Sub Command38_Click()
On Error GoTo ErrorHandler
DoCmd.SendObject acReport, "REPORT NAME", "Extension", "EMAILS", "", "SUBJECT", "EMAIL BODY", True, ""
ExitHandler:
Set rs = Nothing
Set db = Nothing
Exit Sub
ErrorHandler:
[code]....
so everything is good, but NOW they want the body of the email to contain another paragraph totally separated from the first one and they want it highlited and also in Red, How can i add Html to this or do i have to use another method?
I have tried this:
Public Sub TestEmail()
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Set appOutLook = CreateObject("Outlook.Application")
[code]...
But it keeps on giving me errors, about objects not being defined.
View 14 Replies
View Related
May 13, 2015
I am trying to send a report to a list of employees. I have a query that generates the report into the layout I want and includes the e-mail address of who the recipient should be. The report looks something like this:
--Employee Name--
--E-mail address---
-Hire Date----Tenure-
-Attendance-
-Quality Score-
...etc...
I need to send, for each row in the query, this report based on the results of that particular row. How would I go about making a e-mail template that would be used, or at least sending the report as a PDF attachment? I've seen the sendObject method.
View 1 Replies
View Related
Oct 15, 2013
I have this code below its giving me the RUntime 2295 error. Unknown message recipients. I have check all email addresses and they are fine. Everything else works except when it gets to Outlook and do not send email. I did a Debug Print but didnt understand how to do it.
Private Sub Command9_Click()
Dim rst As DAO.Recordset
Dim strEmailAddress
Set rst = CurrentDb.OpenRecordset("T_Inspectors")
Do Until rst.EOF
[Code] ....
View 2 Replies
View Related
Aug 3, 2015
I have an automated email system (Lotus Notes) in a Access database I have created and am looking for the code needed to add up to 3 c.c addresses into an email prior to sending automatically.
The code I have to send the email to the To: individual is all working but what code I need to add and where for the c.c addresses of which there could be 1, 2 or 3. The control for To address is EmailTo = CustCopyEmail The controls for the 3 c.c emails are cc_EmailAddress, cc_EmailAddress1 and cc_EmailAddress2.
Here's the code I have:
Private Sub SEND_CC_Click()
' Set up the objects required for Automation into Lotus Notes.
Dim Maildb As Object 'The mail database.
Dim Session As Object 'The Lotus Notes session.
Dim MailDoc As Object 'The mail document itself.
Dim UserName As String 'The current users Lotus Notes name.
[code]....
View 8 Replies
View Related
Jan 19, 2015
I am currently using vb code to send an email in Access on the click of a button. I want the database user to be able to enter the recipient in a text box [ToEmail] which is on form [GroupStockProfiler]. However, I'm unsure how to put this into my code. I currently have the following which doesn't work (unless I put a specific email after 'To'):
Private Sub Command414_Click()
Const cdoSendUsingPickup = 1
Const cdoSendUsingPort = 2
Const cdoAnonymous = 0
[code]...
View 1 Replies
View Related
Jan 14, 2015
Is there a way to send a standard ready made email to a set email address when a check box or selection from a combo box is selected.
What Im hoping to have is an action and if a user select a specific action it sends out an email without having to do this repeatedly and manually.
View 2 Replies
View Related
Dec 7, 2011
How can I send an automated email notification everytime a new record is created. I have a macro set up with the send object completed, I just can't figure out how to tweak the logic so it will do it everytime a new record is created.
View 5 Replies
View Related
Sep 30, 2013
I want to automate a task in access....
I have a query that may have 6 - 7 different records for example each record contains a different email address, i need to get the first email then send and email to that address then go to the next record get that email address send an email to that email address until its gone through all the records...
I use this code to send an email, dont know how to loop through records and get the email...
Code:
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Dim strPath As String
Dim strFileName As String
Set appOutLook = CreateObject("Outlook.Application")
[Code] .....
View 1 Replies
View Related
Jan 20, 2015
I found the vba to generate multiple pdf's from a single report which is working well (see below).
The script below generates about 15 pdf files and stores them in the specified directory
I'd like to be able to now email these to the individual users (SCNAME) but cannot work out where to start, i've tried a lot of things from the research on emailing, just not working.
All the information I need is in one table which includes the users email address field (SCemail).
I've also created an update query which generates a unique file name into the field (SCInstallDate) (currently not using this field data)
Code:
Private Sub cmdSC2PDF_Click()
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("SELECT DISTINCT [SCNAME] FROM [Schedule];", dbOpenSnapshot)
Do While Not rst.EOF
strRptFilter = "[SCName] = " & Chr(34) & rst![SCNAME] & Chr(34)
[Code] .....
View 14 Replies
View Related
Apr 3, 2014
I want to be able to email a report to several individuals and have only the data that pertains to that person attached in the email? Is this possible?
View 1 Replies
View Related
Apr 14, 2014
I have a report that creates purchase orders, this could be many suppliers these suppliers have e-mail addresses.
is it possible to get the report to look at the supplier name , find the e-mail for that supplier and send it to them.
View 1 Replies
View Related
Jun 10, 2014
I am using vista and access 2010, what I want is to be able to email a report from access that was created by a form with DoCmd.OpenReport "ReportOrder", acViewReport. I have a button that when i click it it will send the report via email, but the email address has to be a variable so when the report is created i can use the email that is attached to the report data.
View 3 Replies
View Related
Jan 20, 2014
I'm struggling to produce a report that pulls out pre defined fields from the active record displayed on a form and attach / embed to an email.
View 1 Replies
View Related
Nov 30, 2005
I am useing DoCmd.SendObject to send emails - however I get outlook opening an email with my To, BCC fields filled in , however I am stuck in the new email screen - ie can't get to a previuos email to copy and paste text - like it is dialog?
Is there any way around this.
Thanks Paul
View 4 Replies
View Related
Jul 14, 2005
Hi!
I got a question about emailing.... I don't think this is possible but I thought why not ask....
Is it possible to have a button on a form, that when it's pushed, it sends an email with a report included to a certain email adress?
thanks!
-jake
View 11 Replies
View Related
Apr 27, 2006
I have been able to create a form that will send an email automatically when the form is opened. Tha problem is, the email will not actually send until I open Outlook. Any ideas?
Thanks in advance.
View 14 Replies
View Related
Feb 8, 2007
I am looking to write some code that "OnSave" in a form will run some code
No worries about writing the code on an event, I will figure that out...
What I want to do is:
If txt box A is not null then send an email to some recipient.
QUESTION:
Does anyone have an example of code that will send an email to someone from Inside Access.
View 3 Replies
View Related
Sep 2, 2005
Hi,
After much frustration and hair pulling I have managed to get the code below to work.. It prints out reports from access one at a time cycling through the list of schools in our county. My question is that I would like to save each report with a filename eg KS1_3000_version1.pdf where 3000 is the unique school ID.
So my question is how can I get the code/acrobat to save my file in a desired location with a pre-specified filename?
this would make the whole process a real click of a button! I know it is possible because we have a national database that does the same thing.. but I cannot crack the backend to see the code
bah!
thanks in advance
john
***********
Option Compare Database
Private Sub Command1_Click()
Dim repQuery As QueryDef
Dim dBase As Database
Dim rsRep As DAO.Recordset
Dim strrep As String
Dim data1 As String
Set dBase = CurrentDb()
Set repQuery = dBase.QueryDefs("john_test_ks1")
Set rsRep = CurrentDb.OpenRecordset("2_KS1_Performance_review_report")
Do While Not rsRep.EOF
data1 = rsRep.Fields("ESTAB_FK").Value
repQuery.sql = "SELECT SCHOOL_BASE_DATA_SCHOOL_BASIC_DATA.DFES, * FROM 2_KS1_Performance_review_report INNER JOIN SCHOOL_BASE_DATA_SCHOOL_BASIC_DATA ON [2_KS1_Performance_review_report].ESTAB_FK = SCHOOL_BASE_DATA_SCHOOL_BASIC_DATA.DFES WHERE ((([2_KS1_Performance_review_report].ESTAB_FK)= " & data1 & "));"
repQuery.Close
DoCmd.OpenReport "john_test_KS1_report"
DoCmd.Close acReport, "john_test_KS1_report"
MsgBox "done"
rsRep.MoveNext
Loop
Set rsRep = Nothing
Exit_Command1_Click:
Exit Sub
Err_Command1_Click:
MsgBox Err.Description
Resume Exit_Command1_Click
End Sub
View 7 Replies
View Related
Apr 25, 2005
Hi guys,
i want to send an email to several people when someone else enters a complaint in my database.
I have a form which displays the complaint with a reference number, recordsource is "tblKlachten". i have query that is set to return only those emails i want it to send to called "qerMailBeheerder". In there is a field called "email".
Now, whenever i a user closes the form after adding a complaint, i want at the same time a mail sent to those ppl in the query with the subject the reference number of the complaint (field called "Referentienummer") and in the body other information from the fields on the form. Like the field "complaintdecription" and "clientname".
Now, i know about the sendobject thing, but i have tried alot and non would do what i want. Can anybody help me with the code.
Many thanks
View 8 Replies
View Related
Nov 1, 2007
Hello,
I am a little lost here. My prorgam has a form where I added a button. When clicking on the button, it is supposed to use some fields from the form and add them to an email with additional info which is added when the email opens up and is about to be sent. My boss uses Mozilla for his email account. What would be the code on the Onclick event be and do I have to set up anything else??
So far I have this code but it is for Microsoft Office Outlook not for Mozilla:
Set objOutlook = CreateObject("Outlook.Application")
Set ObjOutlookMsg = objOutlook.CreateItem(olMailItem)
With ObjOutlookMsg
.To = str_Recipient 'str_Recipient is obtained before this code
.Subject = str_Subject 'str_Subject is obtained before this code
.Body = str_Body 'str_Body is obtained before this code
.readreceiptrequested = lb_ReadReceipt
.Display 'to display the message instead of sending it
End With
Thank you very much
View 3 Replies
View Related
Jul 19, 2005
I'm sending an email from a form to Outlook express. But before it opens Outlook I get a question that states "a program is trying to access email address you have stored in Outlook" I then have to click ok and then another window opens and askes the same question. How can I eliminate these warning messages??
Thank You
View 4 Replies
View Related
