Curently run a Send.Object function on a form to retrieve a unique record via a query. I'd like to be able to send a particular field returned by the query to use as the subject title in the email that is auto-created.
The query will only ever be returning a single record but that single record will change each time it is run.
Does anyone know how to put in a file reference number automatically into the subject bar of an email?
This is the code that i am currently using:
On Error GoTo Err_Handler MsgBox "THIS FEATURE WILL ONLY EXPORT FILES WITH TODAYS REFDATE" If [CboExport] = "Today" Then Dim rst As Recordset Dim db As Database Set db = CurrentDb 'Create Recordset Set rst = db.OpenRecordset("SELECT tblAT.FileNr, tblAT.RefDate " & _ "FROM tblAT " & _ "WHERE (((tblAT.RefDate)=Date()));", dbOpenDynaset) 'Check to see if there has been records recorded today If rst.EOF = True And rst.BOF = True Then Beep MsgBox "THERE ARE NO RECORDS WITH TODAYS DATE, REFER TO SPECIFIC DATE." rst.Close Set db = Nothing Exit Sub End If 'Export query as MS EXCELL
DoCmd.SendObject acSendQuery, "qryTodaysDate", acFormatXLS, company@somewhere.com, myboss@somewhere.com, , "File reference number ?????????"The following file is the latest extract from me as at " & Date & "."
I have been reading all of your post for days now and can't find the answer to my question.
I have however found the answer to one of my programming problems. Thanks to all of you.
I have used Access as a data supplier but this is my first attempt to program in access.
I have absolutly no experience with VB code. And a limited amount of experience with macros in access only.
My question(s) are:
1. I need to send a single report (page) in an email (snapshot format) to a person using a command button. This report should be sent from the form that the person is currently looking at. Currently my command button sends the report in snapshot format but it sends the whole database.
2. This report will be used as a tracking mechanism for another department and I will need a specific name to store the email in a certain location. So that it can be tracked at a later date. I want (that doesn't mean that it can) Access to automatically put the subject line in the email. I know under the sendobject macro you can set the subject line the same for each email. But I need the subject line to match the information in several of my text boxes from a table. For instance: Subject line should read: [Permit number][CountyId][Inspector's Initials][Date]. Can this be done at all and if so how.
Thanks so much for all that you have done already.
I'm trying to write a line of VBA code (in an existing Access 2010 DB) that changes the Subject Line of all selected emails in my Outlook Inbox to today's date.
I have searched and searched... but I just cannot find this. I know it has to be in here somewhere. Any help is greatly appreciated.
I have a query called "MyLateProjects" that shows results based on a specific number of days since the "project" was entered in to the database. I need to be able to send a "You are late X days" email to each of the project submitters from the values in the records of the query result. I have the fields, for example, of "emailaddress" and "Projectnumber" that I need to include in the To: line and Subject line, respectively. So, if I get five results, I need it to send five separate emails.
Like I said, I have searched and searched, and I cannot find a way of getting this done. I can send the first one from a button if I show the results in a form... but I don't know to automate the send operation as part of the query, nor how to get a separate email sent for each record (would this be a loop of some sort??).
I have a parameter set on the query at run which filters by Region i.e. the box pops up and they enter a criteria..I would like to have a field entered next to Email that would take all the Email Addresses in my query result and concatenate them so essentially I have an email list I can pop in Outlook.
Or alternatively, a solution to allow access to these email lists via a button on a form. It has to be something very simple for an end user to access. For instance right now, to get there list they hit a button to run the query then enter the parameter then if desired, hit another button to export to excel. Today, they use Excel for everything and are used to having the concatenated email addresses in one cell in excel. For this reason, I am trying to have the email addresses concatenated in the query results to mimic what they are used to today. But I am not sold on it if there is a better way that is easy for them.
I am trying to create a form button that will automatically email each row of a query result to myself. At first the VBA code worked fine with a standard query. However when I use it with a query that contains a reference to a combobox form such as "<=[Forms]![Reminder]![Monthsleft].[Value] And >=0" I get the 3061 run-time error and "Too few parameters. Expected 1." I have included the VBA code below.
Private Sub Command9_Click() Dim MyDb As DAO.Database Dim rsEmail As DAO.Recordset Dim sToName As String Dim sSubject As String Dim sMessageBody As String
[code]....
If you intend to renew the lease, terms and conditions will need to be submitted for ECC for approval (regardless of changes or not in lease rates). If the terms have yet to be confirmed, it is important to begin the negotiation process as soon as possible with a target to provide the ECC submission at least two months prior to the commencement date of the renewed lease. To ensure sufficient time for ECC approval before the contract expiry date, please prepare the ECC paper and obtain necessary endorsements. Submission details can be found here. The ECC submission template and PSD Questionnaire could be found from this link
I am working with Access 2010, on vista. What I have is a query made up of two tables, one product the other inventory. (see below) query.jpg
In the product table i have a field called "minimum reorder level". In the inventory table i have two fields one called "number in stock" and "number on order". What i want to happen is "number on order" to be filtered by the result, if the "number in stock", is less than "minimum reorder level", if it is, have the result placed in the "number on order" field. EG. if the "number in stock" = 2 and the "minimum reorder level" = 5 then 3 would be placed in the field "number on order" and only the second record from the query would be visible (see below) Query result.jpg The result of this would mean that the field "number on order" would be populated with the result and the and query would also use this to filter the record.
I want to add a number to my results within a query depending on the month and how many results. For example I have 10 results in my query 3 from January, 5 from March and the rest from April. The 3 from January would be 1,2,3. The five in March would be 1,2,3,4,5 and so on. Is it possible to do?
I have a query (Access 2007) that contains a field named "email" (which contains email addresses, of course). I want to email everyone in the query and they are all going to receive the same message. My email to them doesn't have to be personalized and I don't need to collect data from the recipients. I don't even need a reply to the email I send.
I have a database that I can use to create a query, grouping companies by city. I then want to send a specific email I have created in outlook to all of the email addresses in the query.I do not need to include names.
I have posted on a couple of other sites and have not had an answer in two days on a replicated database question. Is this a taboo subject, or is there just not a lot known about it?
I have a FE/BE Database that has 25 users. Two of these users moved offsite and are having huge speed issues. What I have gotten out of my research is the best thing to do is create a replica of the backend and transfer that replica to the offsite agents pc. This way everything is on their C drive instead of the BE being on the network and the only speed issues they will have is when they synchronize the replica w/ the backend.
Here is my problem. How do I create a button on the FE of the Database that will cause the BE on their PC to synchronize with the Design Master BE on the network?
I have been asked to make a report from my database listing property sites and listed things found with them. Ex. a property might have 3 houses and 2 cars on it. Whenever I make a report the best I can make are groups that look like:
Property 1 House A Car a Car b Car c House B Car a Car b Car c
I need something that could group car and houses directly to property 1 rather than cars grouped to houses grouped to property.
I have a Macro setup and SendObject is one of the Actions. It is setup to send an existing report. Is there a way to insert a fieldname from that report into the Subject line of the e-mail that is sent? That would be great, instead of having the same subject line for every e-mail, using the date or something like that. Please let me know. Thanks.
I'm trying to automate some processes. My company uses Outlook 2010 and every day we need to go into our "Sent" folder and rename the Subject line of all of our sent emails. We change the subject to a standardized format depending on the content of the email and who the email was sent to. These are then used as part of an equation to tally our Transactions Per Hour. (TPH)
I've already designed a small Access 2010 utility to track the TPH, but I would like to add the functionality to parse some data from the subject lines of my "Sent" folder, and automatically make changes to save some time.
Here is my thought process:
- Click "Process Sent Emails" button from TPH utility. - Access runs through each email in the "Sent" folder (or perhaps only selected emails) and changes the Subject line per simple Select Case criteria (I can figure that part out).
I have a script that sends a mail using outlook to a different person depending on a value in a field. I want to add values from fields to the subject and body of the mail it creates. This is what I have so far:
Function Mail() On Error GoTo Mail_Err If (Forms![Manage Packages]![Customer] = "MSC") Then DoCmd.SendObject , "", "", "email", "email", "", "[ID] - [Package Name] - Delivered", "Dear," & vbNewLine
[Code] .....
In the subject and body the field ID's I want to add are marked as [ID], [Package name] etc.
The situation is that I have a table named patient and a form named [patient1] where it holds a textboxs named "MFC_Seq_no" and another to hold [date], now, I manged to do a manual auto numbering for "MFC_Seq_no" using the following VB :
Private Sub Form_Current()
If Me.NewRecord Then On Error Resume Next Me!MFC_Seq_no.DefaultValue = Nz(DMax("[MFC_Seq_no]", "Patient"), 0) + 1 End If
Whenever user create new record, the system will automatically store the next number in the new record.
Now, I've be requested to code that system to start again from 1 as value for "MFC_Seq_no" whenever there are changes in date field (i.e. next day in the date field)
Is this doable and how?
Q2. how to duplicate an entire record with a subform, from another table, in it?
I am developing database for my school. I am done with everything except the examination aspect where i need to indicate students position in every subject beside their overall position according to the sum of all the subject scores. How to indicate student position in subjects.
I am trying to capture a newly arrived mail in outlook with respective subject line. The below code works for me on 2010 outlook but when new mail arrive in outlook 2013 ,Mrthod Items_ItemAdd do not get called.
Code:
Option Explicit Private WithEvents Items As Outlook.Items Private Sub Application_Startup() Dim olApp As Outlook.Application Dim objNS As Outlook.NameSpace Set olApp = Outlook.Application Set objNS = olApp.GetNamespace("MAPI") ' (1) default Inbox
I am trying to create a VB script to automate a mailing based on several query result sets from access. I have gotten to the stage that the output is correct but have a problem with the 5th and 6th record set query as they only return one record (When in fact there should be at least two for each).
I don't really understand why this is happeneing as the SQL is exactly the same as in the 2nd record set - which works perfectly. Also I've tested the SQL directly in an access query & there are no errors in the formatting that I can see... correct number of records returned.
Code: Public emailaddress, ccaddress, Subject, body1 As String Public baserow, toprow, countnumberofrows, emails As Integer Public tempdir, projectlistdir, WBPATH As String Option Compare Database Option Explicit
In an event, groups of 2-5 persons may be tagged to this event by a randomly generated number (using autonumber).
Let's say Tom (social security number: 12345X) is tagged to events 2, 5 & 6. There are of course other persons together with Tom in the above 3 events.
If I would like to find out who are the persons who are in events which Tom had participated in, how do I find them using a query?
Currently, I'm thinking of using a searchform where it would return his "associates" if I just query using his social security number, i.e. 12345X.
I am trying to calculate the average patients age from 2671 records using this SQL:
SELECT tbl_Customer_Details.DOB, CalcAge([DOB]) AS Age, DAvg("[Age]","qryAvgAge") AS Average FROM tbl_Customer_Details GROUP BY tbl_Customer_Details.DOB, CalcAge([DOB]);
why am I getting the result:
68.1131066106
I would have thought that it would have been 68 a whole number, has anyone got any suggestions why this should be.