I send a report in an email in rich text format and it works. But when you open the report there is no image, lines or rectangles. The format is ok but image on top of the report and lines are missing which I used for column captions. If anyone know how to handle this problem, I will really appreciate.
I am working on Access2007. I designed a report that I need to email every night automatically to my client. The report resides in the Access database. I currently use a macro to auto email this report for me but it still requires me to double click the macro to make it run. I actually want the report to be email at night without having me running the macro manually. Is there any way to make this happen?
i have VBA code to create an email and attach an excel file, what i would like is code to add a report called REPORTMISSINGDATES to the body of the email.
this is the code i have so far, which works and adds everythng i wqant except the main body of the email.
Private Sub Command31_Click() On Error GoTo Command31_Click_Err Dim Email As String Dim name As Variant Dim EMPloy As Variant Dim month As Variant month = MonthName([Forms]![STAFFATTENDANCEMenu]![StaffMonth]) EMPloy = Forms!staffattendancezone!Staff name = DLookup("[STAFFNAME]", "[QRYSTAFFNAME]", "[ASA] = Forms!staffattendancezone!Staff") Email = (Forms!STAFFATTENDANCEAdjust!Email) DoCmd.SendObject acQuery, "STAFFATTENDANCEZONECheckEmployee", "ExcelWorkbook(*.xlsx)", [email], "", "", "" & "Attendance Errors", "THIS IS WHERE I WANT THE REPORT TO GO" _ End Sub
Microsoft Access 2007.Background: I have a query that received work orders from out client system and runs them through access. Once in Access, an employee goes through the query output and organizes the records (mentally) by product_code. There can be be 1 or more records of a certain product_code and there are 129 total different product_codes. Say, a typical time the employee runs this query they might see 25 different records consisting of 6 different product_codes.Each product_code designates who (an email address) should be sent the work orders to approve.
The employee currently copy/paste the relevant records in an Outlook 2010 email body and uses an external excel sheet with the email addresses to see who it should be sent to. I'm automating this whole process.I've gotten an email to generate in vba, and to send an 1 email to each person who has one of their product_codes in the query output.
My problem is that I'm having trouble figuring out how to filter the emails so that instead of seeing all 25 records (from above example) they only see the records with their product_code.Another thing to mention is that as of now, I have a script that converts the report to HTML and sticks it in the body of the email. So I'm not sure how to edit that script to allow to filter the report or if that's even where I need to do the filtering (another procedure maybe?)
This is my html conversion script
'product_code = Mfg_Cd in this scriptFunction exporthtml(str_Sender As String, str_DataMsg As String) Dim strlin As String, strHTML As StringDim objOutlook As Outlook.ApplicationDim objOutlookMsg As Outlook.MailItem Dim objOutlookRecip As Outlook.RecipientDim varX As Variant Dim RS As Recordset Set RS = Me.Recordset Set objOutlook = Outlook.Application Set objOutlookMsg = Outlook.Application.CreateItem(olMailItem)
I have a subroutine that works well for sending emails. A need has arisen to, in some cases, send an Access report as a PDF attachment. I know how to do this using the SendObject method, but that won't work in this app. I also don't want to have to first save the report as a pdf file. I think I'm close, but I don't know the syntax for passing the report name as the Source parameter in the Attachments.Add method.
Code: If strEmailAddress = "jsmith" Then .Attachments.Add source:=MyReportName, type:=acFormatPDF End If On Error GoTo SendErr .Send On Error GoTo 0
I have a form with a subform. The form is the date field. The subform are all the stores delivered to on that date. I need to have a command button to open an email with the current date showing and list all the stores with their delivery numbers next to it inside the email.
Is is feasable to output a report with variable data to html/email. I would like to be able to send my quotations and invoices via email to my customers as many are now requesting I use email. At present I have to print it as PDF then open Outlook, then attach the PDF document etc etc.......
Any assistance or suggestions greatfully welcomed.
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?
After filling in a form which includes both text and a photograph (in a bound object frame -- different photograph (OLE object) for every form -- photographs embedded and pulled from a separate photograph file external to MS Access) I email the corresponding report successfully as a .snp file attachment. The problem is that the recipient needs either MS Access or Snapshot Viewer installed in order to view the photograph field (ie. the OLE object in the bound object frame). If I try to format the report according to any other format (html, rtf, etc.) the text shows up okay but the photograph doesn't appear in the bound object frame. I also tried to create a data access page but the OLE 'photograph' field is not even an allowed selection. Any ideas on how I can get around this problem (ie. email the report to a client who doesn't have MS Access or Snapshot Viewer installed on their computer)?
I have my email code working great, but I am trying to find a way to add a report as an attactment on the email.
I am using the following and it works fine. Code:Set objMessage = CreateObject("CDO.Message")objMessage.Subject = EmailSubjectobjMessage.FROM = UserEmailobjMessage.To = EmailToobjMessage.TextBody = EmailBodyobjMessage.AddAttachment "c: emp eadme.txt"objMessage.Send
How can I go about having that AddAttachment run and attach a report in the same database? I tried a few different ways of putting the report on that line but nothing seems to be working. Do I have to first have code run the report and export it or save it off as something to a temp file then attach it? If so how would I go about doing that. : )
Few things I tried and didnt work.. objMessage.AddAttachment Reports.rpt_01 objMessage.AddAttachment Docmd.OpenReport ("rpt_01")
Any help, ideas, or direction would be great! Thanks!
For MOST of the people who use the database, this works fine, and they send the email with the RTF attachment which all the recipients can open - but for some users, it generates a .tmp file which if you 'Open' it is just a load of gobbledegook, but it you 'View' it looks ok - but is truncating the report.what could be causing Access 2007 to create .tmp files rather than .rtf?
I am trying to email a report and rename the report after the referenced NCR# currently selected on my form. My codes works for putting the referenced NCR# in my email subject, but I am having issues renaming the report and the error is with the SetProperty line bolded below. When I click my email button, I get Run-time error 32004: The control name "Supplier Chargebacks" is misspelled or refers to a control that doesn't exists.
Private Sub Command587_Click() Dim stReport As String Dim stWhere As String Dim stSubject As String Dim NCRNum As String NCRNum = Forms![NCR Input Form]![NCR #]
Im new to access and i have a problem!! I have a report that i need to be sent out monthly to 3 people. The problem is i dont know where to start. I have been looking through the forum, but nothing that i can get my head around, so there anyone out there who can help???????
Is there a way to have access remember a certain time like 2:00 pm and generate a report and send it to a specific person. I know how to make an attachment for sending someone a report but how do I get access to do it on a certain time lets say 2:00 PM?
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)
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?
I have a button setup to email a Proposal Report to specific people. Works fine. I now need the ability to email the Proposal Report (without an addendum) OR email the Proposal Report with an addendum. There are additional fields on the report with an addendum. I have tried the on format event of the Proposal Report to make the addendum fields invisible using this if statement:
Code: if Forms![CurrentJobs]![Addendums].Form![AddendumNum] Is Null Then Me.AddendumNum.Visible = False Me.Label324.Visible = False Me.Label325.Visible = False Me.AddendumDrawings.Visible = False Me.AddendumDrawingsDate.Visible = False Me.Label326.Visible = False Me.AddendumFloors.Visible = False Me.Label327.Visible = False End If
But I keep getting an "object required" error. how I can run the Proposal Report with or without addendum information depending on the job?
From advice I have read on here I have worked out how to create a button on a form which opens a report to show the values which match the record open on the form. It then attaches that page as a txt file to an email. Which is great.
What I would like it to do though is insert into the body text of the email the text from the report. Have looked as much as I can at the properties of DoCmd.SendObject acSendReport but cannot achieve this myself.
What I have is pretty much this: Code:DoCmd.SendObject acSendReport, "Your matching details this week", acFormatTXT, Me!PersonEmail, , , "Details this week " & Date, "Please see the attached text file for details this week which match your selection criteria.", False
How can I make the text appear within the email body?
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.
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.
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)
I like this form I have that allows me to send attachment when email is entered.However, I would like to have a list box of Name and Email Address. when selected the email address is now set (same as before but just as a drop down) I type my message etc...But the attachment part I would like to send a specific report (that connects to that email address) so that it will only send jobs connected to that person.
Here is the code below:
Private Sub Email_Output_Click() ' ' Email API Outlook example programming code ' Send email from to Outlook ' Select Case Me.Email_Output_Option
