I have a large report that generates information specific to a large list of contacts. I would like to email each contact a .pdf of their part of the report. If possible, I'd like access to run a loop and do this in one button click. I'm not even sure to begin with this.
View RepliesI 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] ....
I run a end of day report of daily sales by territory in NA. Currently I run a query to list the territories with sales then run a report for each territory listed showing their unique sales.I would like to create a macro that reviews the list of territories and then emails the report for each territory.Each territory has a macro with the report and email address loaded I just need something to execute the list.It is important that a report is not sent to territories with zero sales so just sending a report to everyone will not work.
View 4 Replies View RelatedI have many reports that are structured differently, many are grouped by semester.
What I do now, is put a button on each grouping of the report I want to email from and use the current semester (Sem) which is also a query parameter to filter the report.
Here is my current code which works fine:
Sub EmailFromReport(rpt As Report, Optional Sem As Variant)
Dim db As Database
Dim qry As QueryDef
Dim rs As Recordset
Dim Bcc As String
Dim Subject As String
Set db = CurrentDb
Set qry = CurrentDb.QueryDefs(rpt.RecordSource)
'set query parameters
[code]....
The problem is, I need to be able to filter these queries on other criteria besides the semester.
My first idea was to use if statements to skip the records I don't want. This is messy and the report structures are different so I run into issues when using optional parameters because not all the reports are structured the same.
The best solution I have come up with so far is using a wherefilter parameter, stripping the semi colon off the querydef sql and surrounding the sql with a qrydef.SQL = "SELECT Email1, Email2 FROM (" qrydef.SQL ") WHERE " & wherefilter.
The problem is this, changes the original query, and I can't figure out how to copy a query with db.CreateQueryDef If i do db.CreateQueryDef("tempqry",qrydefSQL), I lose the query parameters.
Is there a better way to do this? If this is the best way, how do you take an existing query and make a copy of it?
I have a database that is strictly for generating and printing work orders. Our supervisors use it to print new work orders on the fly. normally that is fine. I have the Vb to print that specific work order
what I need to create is a VB that would allow other people to create a work order that would email it to the those supervisors. email addresses will always be the same. I just dont want to send the entire report.
My database is stores information about students such as name, student number, programme, email, etc. I have a STUDENT form with this information visible.
I also have a another table and MARKS sub form that contains the details of courses completed by the student and results. I have placed the sub form in the STUDENT form and can see each student's details and a list of their courses.
I want to be able to send this information to the relevant student via email. The student should only receive his information and no one else's.
Can this be done? Do I need to create a report first? Should I be using WORD to produce the emails?
Hi,
I'm not sure which Form topic this post should go under ...
I have an Access Database which contains contact information including email addresses in a number of tables. Each table is a reference group of individuals interested in a particular topic and has three fields (contactID, name and Email). All tables relate back to a master address list.
This allows me to have different (or multiple) people from within the same master address as contact persons for different reference groups. When I am doing labels, or printed reports for labelling I simply combine the address from the master list with the conact from the reference group list.
I would like to be able to replicate this approach for e-mail messages.
Ideally the databse would create distribution lists and export these to outlook global address list where they would be available to all users.
Alternately, I would write a module that automatically generates a new email message with all the Email Address entries from a user selected table in the To: field. The user would then edit the email message and press send.
It seems to me that eitehr way I will need to somehow concatenate all emails addresses in a table into a list separated by semi-colons.
How do I add multiple recipients to the '.To' line in the code below?
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
With MailOutLook
.BodyFormat = olFormatRichText
If Me.txtDepartment = "IT" Then
.To = "my email"
End If
.Subject = "hi"
.HTMLBody = "hi"
.send
End With
What is the best way to send a single email to multiple recipients?
View 14 Replies View RelatedI'm working on a project where I must send roughly a thousand individual reports to a thousand different email recipients with .pdf attachment.I know I'll need to add a table that designates the email address by SHIP_TO_CODE. Then create a form with the email subject, body, etc.. I don't neccessarily have to have the reports saved to a folder; I really just need them emailed to each account.
I was thinking I could modify the code some to accomplish my goal, but I'm not sure what to put. Maybe add a SendObject in there somewhere.CODE that I have now that saves the report to a folder. (I want to modify some to send email attachement instead)
''Module CODE:
Private Sub Form_Current()
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("SELECT DISTINCT [SHIP_TO_CODE] FROM [qryWty&PendingData];", dbOpenSnapshot)
Do While Not rst.EOF
strRptFilter = "[SHIP_TO_CODE] = " & Chr(34) & rst![SHIP_TO_CODE] & Chr(34)
DoCmd.OutputTo acOutputReport, "rptDraft", acFormatPDF, "C:UsersmrutherfordDesktopASC Daily Reports" & "" & rst![SHIP_TO_CODE] & ".pdf"
[code]....
In a form I have a button which creates (in preview) an outlook message with a pdf report. It opens and displays just as I want it to, but if I chose to save that message in outlook and either send or cancel (i.e. allowing user to save to drafts and send later) then MS Access crashes.To ensure this wasn't to do with any compile / corruption within my full application I mirrored the process in a very simple 1 table / 1 form / 1 report db and still the same - access crashes after saving the outlook message and either sending the message or cancelling out the message.
Form code is as follows;Private Sub Command0_Click()
On Error Resume Next
DoCmd.SendObject acSendReport, "Table1", acFormatPDF, "someemaddress", , , , "REQUEST FOR INFORMATION"
DoEvents
On Error GoTo 0
End Sub
In my main application this process is embedded within a loop to send various filters of the report to different recipients, which works fine if 'save' is not used within Outlook..
I have been an MS Excel man all along my career and I am a novice in MS Access.I have created a table, [Initial Customer Approval] which records data from a Form, [Initial Customer Approval]. Once the data is entered in the Form, I need to do some calculations based on the data entered in some of the fields in the form.I created 6 different queries for the six possible values in those fields. now for each of those queries I created respective reports.I placed a Print command button in the Form.
1. When I press the Print button it should open the report for the current record in the Form. (Currently It Opens all the reports simulatneously, with only one relevant report containing the current record; other opened reports being blank.)
2. If user presses the Print button before pressing Save button then system should prompt user.
Here is the code (Please note [reference number] is the unique ID generated for each record entered in the tabe through form):
Private bSaveClicked As Boolean
Private Sub Form_BeforeUpdate(Cancel As Integer)
If Not bSaveClicked Then
MsgBox "You are trying to navigate away from the active record. Please either save your changes, or press ESC to cancel your changes.", vbOKOnly + vbInformation
Cancel = True
[code]...
hi!
I'm a student It's just my first time to program in MS access and my project requires to automatically send email reports from MS Access...how can i do it??
I apologies for this thread, I was desperately attempting to avoid the need to post for help, especially as this is a much discussed subject. However, after three days of reading hundreds of threads and searching the web (not to mention winding the wife up) I am more confused than ever.
So, please bear with me, I have tried but everything I've attempted so far has failed.
My query centres around multiple e-mailing. I have a table from which a query runs. The query is called QryAddressBookEmail. The query will bring back anywhere from ten to thirty plus results, dependant upon the search parameters entered. From the query results I would like to e-mail each record. The email address is contained in the query field Email.
I'll be using Outlook Express for the emailing.
Rather than sending each e-mail separately I would prefer if they went as one, (IE Pete@..... , Joh@.... etc) thus avoiding the 'silent email warning - confirm to send' that appears to accompany each e-mail
For the subject and body of the e-mail, if possible, I would like two fields on the form that are populated by the user. These are named 'Subject' and 'Body'.
Again, if possible, the email is to be sent by clicking a command button.
So.. in theory, the user will select their search parameters which brings them back a list of hits. They then enter their subject line and the body of the e-mail directly onto the form and then hit the command button which will send a single e-mail to all those identified.
Also........ Whilst its not essential, anticipating future developments and other peoples wants, could an option be added for the user to attach a document by providing a path for it via a field on the form?
And..... if possible and time permits. Again, anticipating other peoples questions and problems, could an alternative be provided that e-mails each record seperately.
As you've probably already guessed, my VB is limited but I will give it my best shot.
Thanks in anticipation to anyone that can help. It is appreciated the time it takes to answer SFQ's from people like me.
I have set up a database that holds wedding list details for our shop. The product images are not held in the database itself - I have linked to them using VBA as outlined in the microsoft access help pages.
Now I can print a report absoluely fine, but I can't capture the report to send as an email to wedding guests. A snapshot isn't good enough as I don't want our customers having to download software. I thought maybe I could export the report to Word and then email that as an attachment. However, when I export the report, there are no images in the resulting Word document.
Does anyone have any ideas? I primarily need ease of use for the customers picking up the email at the other end.
Hope someone can help!
I am using Access 2000, Windows XP and Groupwise 6.5. I am trying to email an employee leave report using the SendObject method. I would like to use the SnapShot format. Must I save the report before I send it? I tried acFormatSNP with no success. Thanks for all your help.
View 1 Replies View RelatedHi all,
Access 2000
Wondering if there is anyway to setup a report to automatically run and e-mail out at a certain time each day? I currently have a button on a form, based on a macro, that when clicked, will e-mail the report to a certain user. Just wondering if there is anyway to set it to send at a certain time, without having to open the database and manually run it.
Thanks in advance.
J
I have a button on a form to email a report.This is the code:
Private Sub EmailSfRpt_Click()
Dim strWhere As String
strWhere = "[Property Number] = " & Me.[Property Number]
DoCmd.OpenReport "SQ FT/LN FT ITEMS REPORT REV", acPreview, , strWhere
DoCmd.SendObject acSendReport, "SQ FT/LN FT ITEMS REPORT REV", acFormatPDF
End Sub
What is the code to close the report after the report is sent?
I've created an accounts package for my business using access 2003 and I'm just thinking of some time saving features.
We need to email our invoices to our clients.
Normally we print out an invoice, scan it back into the computer, save as a PDF and attach to an email manually one by one.
My package can now print to PDF (saving one step), but what I would like is to be able to print to PDF and attach to a new email (with the email address coming from the customer table) and possibly attach more than one PDF to a single email.
I know you can use
Code:
DoCmd.SendObject acReport, stDocName
to send a report but I would like it as a PDF as my formatiing is lost using that code and we normally send PDFs to our clients.
Well im close to putting my DB into action, but I'd like to have a form that will show a list of queries and reports where they can be selected and emailed. I would like to be able to choose one or many files. I have created the email module and its working fine, I just thought I could make it a bit easier to send multipule reports with the click of a button. I just can't find a way to list all my queries/reports in a dropdown list. Can someone send me a suggestion on how to do this if posible.. Thanks in advance.
Scott
I have a blank report and dragged two queries to it so that they are displayed on it. Both queries prompt for a Customer code. How do I get it that I only have to type it in once rather than for each query prompt?
View 3 Replies View RelatedI can't seem to find a way to SUM two seperate columns on my report. I've attached an example of what I am talking about. I was able to add the SUM feature to the 'Estimate' column, but it doesn't allow me to add that to the 'Plan' column too. The only options available are Count Records or Count Value.how I can have these both SUM seperately within their columns?
View 5 Replies View RelatedWe have a database that has around 30 queries that are ran on a monthly basis. They all have unique criteria (but there is a crossover of fields that are used), and are all set up so they show only the previous month's data (the date is taken from one date field for some queries, and another date field for others).
We run the queries, and only need the 'count' of number of records that fit the query each month.I was wondering if it is possible to create a report that will run the queries simultaneously, and show the 'count' of the query results in predetermined fields.
I have a table, each row contains information that I want email out as a pdf.
I've created a report, and at the moment I've created a button embedded with the onscreen report which emails the report I'm actually looking at onscreen (as an attachment), all the button is doing is event-on click running this VBA code...
Code:
DoCmd.SendObject acSendReport, "rptSalesReceiptMain_UK", acFormatPDF, DLookup("[Email]", "[Sales]", "[PrintInvoice]=True"), , , "VAT Receipt for your order", "As requested, please find your VAT sales receipt attached"
...it all works, but it's very manual....because I have to open up each report manually, & then click the button manually to create the email
Since I have the main 'chunky' parts done (i.e. creating the report & the code that emails it when I click a button), I'm now turning my attention to automating.
I'd like to add a new true/false column to my table "Receipt Emailed" (or similar) & have a bit of VBA hunt down the column, then it comes across a false condition, it runs the report & emails it.
Therefore rather than me opening the report & clicking on the button (which runs vba code), how do I get this done automatically?
I have limited access knowledge and everything I learned about access was from youtube videos and reading online. I have only used the features that do not require coding/programming (tables/queries/reports).
this is my problem. I am the secretary of a social boat club (about 300 members) in charge of producing invoices. I created a my member table with general data, applied a query to create a Dues&Fees Table and then I created an Invoice report from this table..etc. Right now I have a final report, with 300 invoices that i could easily print and mail. However, people are asking to have their invoice emailed and I was wondering if there is a way to mass email each individual invoice to each individual member of the club.
I am using access 2010...and i have a form with a combobox on it...and in that combobox shows a list of employees names. When i currently select the name of the person that i want, it creates their own individual report of their workload.What I want to do is to be able to select that person and it generates their individual report and then attaches it in an email to that individual.
View 9 Replies View Related