I am sending out multiple emails to my customers in my customer table manually. As it is time consuming to send to about 100-200 customers daily, I am wondering if it is possible to automate the process in access in such a way that I can load all files from a particular folder and the access application will be able to sort the files in the folder for each company based on their name in the field(e.g.CompanyABC_DailyReport,CompanyDEF_DailyR eport) before sending out.
I am using Microsoft Developer and wish to email the program to my customer. With Developer, there are tons of files and a few folders, not just one exe. I realize I must zip to send a exe, but the folders are a problem, since WinZip, which is what I have, will not accept the folders, only files. I could ship like that but it would be a mess on my customer's end. Any suggestion would be helpful.
The reason I want to send this way is just for speed. Of course I can copy to CD and send that way.
Can anyone suggest a good program that will handle scheduled emails to people in our Access database? I need to send an email automatically to each of our employees on their birthday. I need the program for much more than that but that is what I am working on at this time.
Ok, I've run into two serious problems in testing, and another question that I'm hoping you guys can help me solve. Below my questions is the code used for making the search query/email program.
Problem #1: In testing, this search program only is working for me for new data. Any data that I had in the database prior to implimenting the program will not move past the search stage. In other words, I will do a search, it will find the emails and bring them up in a box, I hit "OK" and it gets hung up and won't move on to opening up a new Email with the addresses implemented. However if I enter new data in the database, say with a weird name so its only bringing up the new entry and no old entry, it works fine and opens up the new email.
Problem #2: Items I would like to search like check boxes. Say I have a check box "Donor", this is listed in the database as a 1 or 0. I can't have my boss searching 1 or 0. Is there a way to change this to, say, being recorded in the DB as a Yes or No. That way he would check to search "Donor" and type Yes in the search box and this would search the DB "Donor" column for "Yes" and bring up the results.
New Question: My boss and I reviewed the form as it is so far yesterday. He was asking if I could add a Print Labels option in there. I'm wondering instead of adding another seperate search box and all that mess for a labels search print, can I rather add two check boxes, one labeled "Print Labels" and the other labeled "Email". What this would do is depending on the check box you selected it would either run the search and email like we have it, or clicking the other check box would run the search and print labels.
Quote: 'Author: Michael Walts, but use it as you like'Important information! this code requires a reference to the Microsoft DAO object library Option Compare Database Option Explicit
Private Sub cmdEmail_Click()
'will hold the dynamic SQL query Dim strSQL As String
'will hold the WHERE clause portion of our SQL query Dim strWHERE As String
'will hold all the recipients of this message Dim strRecipients As String
'the recordset we will use to get the emails of the records that match our criteria Dim rst As DAO.Recordset
'if there is input in the search criteria, then we will run the query and send the e-mail If txtSearch <> "" Then
'if you have more buttons, just add mosr cases (the value of the radio button '= the Case number, so Value of the State radio button is 1, etc.) Select Case opgSearch.Value
Case 1 strWHERE = "WHERE State = '" & txtSearch & "'"
Case 2 strWHERE = "WHERE City = '" & txtSearch & "'" End Select
strSQL = "SELECT EMail FROM tblUser " & strWHERE
'run the query and get the results into the recordset Set rst = CurrentDb.OpenRecordset(strSQL)
'Loop through the recordset and add all the EMails Do While Not rst.EOF strRecipients = strRecipients & ";" & rst!EMail rst.MoveNext Loop
'remove the first ; from the strRecipients strRecipients = Right(strRecipients, Len(strRecipients) - 1)
'stops a ' entered in the field from breaking the query Private Function SQLSafe(safeMe As String) As String SQLSafe = Replace(safeMe, "'", "''") End Function
I am sending an email using SendObject. Sometimes it works, and sometimes it makes the computer freeze up with no error message. I have tried this with Outlook running or not running, seems to make no difference.
Code:
'The sub procedure below sends e-mail in response to a click on the Send button. Private Sub SendMessagesButton_Click()
'For Access, define some object variables and make connections. Dim myConnection As ADODB.Connection Set myConnection = CurrentProject.Connection Dim myRecordSet As New ADODB.Recordset myRecordSet.ActiveConnection = myConnection
[Code] ....
I have added some MsgBox () to narrow down where it crashes. It is after 'Five' and Before 'Six'. On the line:
Set appOutlookRecip = .Recipients.Add(eMailAddress)
I am mystified as to why it works OK sometimes, and not others. The email address being used is valid.
I have a table that collects training information for our company. Some training is limited to one or two employees and that is easily entered by using a form linked to the table. However, some training is mandatory, company-wide training that all employees must attend. How can I add a record for each employee reflecting this training most efficiently? Is there a way to do a mass update?
I'm trying to update this movie database, and I need something to save me time, not to mention my finger. One field in this db tracks if a movie is colour or black/white. In the old/existing db, that was done with text - "color" and "black & white". I want to replace that with a yes/no field [Color]. But the db has a few thousand entries. What I would like to do is either change all of the [Color] fields in the new db to yes, and then manually uncheck the ones that are b/w. But I guess it should also be possible to do the whole operation automatically. Any ideas as to how to accomplish either of these would be appreciated.
I recently posted a question in the REPORTS section asking if it was possible to generate a report that contains only the email addresses of my contacts to generate and send a mass email. There were no responses to that...so that makes me ask - Is there anyway in Access to generate mass emails using only the email address field in a table or query?
I am aware of other programs you can buy to do that - but was hoping to stay within Access.
I've been asked to come up with a way (one-off) of renaming over 100 hundred tables. The table are all called "STUD_ADMIN_blah". We need to remove the "STUD_ADMIN_" part of the table name.
Is there a nice easy way of doing this without having to physically rename each table individually?
I have several thousand hyperlinks that need to be changed due to our network server being changed. I have tried to change the hyperlink field to a text field and do a find and replace. (See mandaman post 3/13/06) The problem that I have is that all the hyperlinked fields have a different text comment in the field to identify the hyperlink to the user. When I change the hyperlink field to text then it thinks that the text in the field is the hyperlink and in fact it has nothing to do with the actual hyperlink. Any suggestions?
Hello, I have been working on my database for sometime - searching this forum for answers, thanks to all the experienced people for their sharing of knowledge.
My question is this: My database will be over several years of data, on my splash screen (switchboard) I would like to have a combo box of with choices for years. When a user chooses a year, the entire database is filtered. Say if the choice was for 2005, then anything with a binderdate of 01/01/05 to 12/31/05 will be filtered.
This will need to be done across several tables, queries, forms, and reports.
Once the choice is made for that year - any form the user is on will be filtered for that specific year.
I am still fairly new at access programming, so any code snips or working examples would be greatly appreciated.
Hi, can any help : ) i am trying to mass update one field in a table. Basically i have created a new check box (Yes/No Value) in my customers table. Basically i will tick this box if a customers placed any order with our company.
At present all our existing customers have placed orders with us. and i want to add value Yes to this field.
What method can i use to make this Mass update all customers records.
I've read through many of the threads relating to sending Email from Access but can't seem to find quite what I'm looking for. I work as a Tutor Coordinator at a local college and I've set up Access to handle a lot of the day-to-day chores that our administrative assistant has to deal with.
One feature that would be absolutely wonderful would be to create and send Emails to students at the click of a button. I have several types of Email I'd like to be able to set up, but the one most needed (and probably most complex) is this:
Students come in to the office and request a tutor. If we have a tutor available, we assign them to an available tutor. If there is no tutor availabe, then every Friday we send out an Email to each individual student saying something like this:
"Dear John Doe - We currently do not have a tutor for MATH 101 at this time, but when one becomes available we will let you know... blah, blah, blah..."
I'd like to set it up so that the body of the message comes from a template - such as a text file (that is easily edited by a user) and populated with fields from a query.
Probably do something like this:
Query the Student_First_Name_field, Student_Last_Name_field, Department_Name_field, Course_Number_field, and Student_Email_field. Send an Email to each Email address pulled from the Student_Email_field and tell them the following - "Dear <first name, last name> we currently do not have a tutor for <department name, course number> at this time... blah, blah, blah..."
Currently the way the administrative assistant handles this is to send each student an Email individually - manually creating each Email with the specific data needed. As you can guess, this is quite time-consuming.
I'm rather new to Access but have been a RDMS programmer (in PICK) for several years. I know what it is I want to do, but don't know how to do it in Access.
Any help?
Would the best way be to use text files for templates?
Can text files be set up with field codes (Access recognizes "<LAST NAME>" to be Student_Master_Table.Last_Name_field)?
I'm guessing this will likely have to be a Visual Basic loop that works with data from a query.
I have a database for clients and have set up a form and code to run a query for different types of clients and to send emails to the group.
Everything works fine until I try to send and then I get a Microsoft Outlook pop-up which states:
"A program is trying to automatically send e-mail on your behalf. Do you want to allow this? If this is unexpected, it may be a virus and you should choose "No."
This message stays for 5 seconds and then I can click on "YES" and it will send the email, and start all over for the next recipient.
I am assuming this is an Outlook Spam Blocker, but is there any way to stop it?
I have 300++ Excel files that contain data in the format of column1 = textual identifier, column2 = numerical value. Each file can have up to 1300 rows. The text identifier will be 95% the same in all files with slight variations.
I want to create a database to store the numerical value of each identifier from every excel spreadsheet and average the value.
This should be ~1300 instances, each with 300++ value assigned to it. Then run a report to pull the average value of every instance/identifier.
My (many) questions as follows..
-Is Access a good way to go about this? -Is there an efficient way to bulk import from excel ( I just saw a script to do this below )? -How to set up tables/queries/relationships?
So I am building a database to track PTO. I already have a form set up with an append query but what I want to do it use a list of check boxes to create mass appends incase a large group of people leave, Holidays, etc. Instead of having to do them individually.
In my simple database (attached), I need to mass duplicate Tasks and their Notes.
I have three tables: tbTasks (PK: Task_ID), tbNotes (PK: Note_ID), jtbTaskNotes (FKs: Task_ID and Note_ID). jtbTaskNotes is my many-to-many junction table that ties Tasks to Notes.
The main form (fmTasks), bound to tbTasks, has a subform (sbfm_TaskNotes) that displays notes associated with each Task. On themain form,you select which Tasks you want duplicated via a checkbox. The append query (quCopyTasks) will duplicate all tasks that have the checkbox checked. All good there. However, I can't figure out how to also duplicate each task's Notes.
I found Allen Browne's solution [URL] ....., but that only handles duplication of one record at a time, whereas I need to duplicate many records at a time (sometimes 10+ records). How do I go about duplicating multiple Tasks and their associated Notes?
Before you ask "why are you duplicating records?": There are times when tasks need to be re-accomplished and therefore need to have a new record. It's easier to duplicate records than it is to hand-jam everything again.
VBA Code to go in the on double_click event of a name field in a Subform bound to a table. The subform is just a copy of a data table and within the subform view, When the field "employee name" which contains e.g. John is double clicked, I would like access to Lookup and get John's email in the employee table under field "Email" and launch outlook application and insert it into the To field.
I assume hyperlinking the field can also achieve this similar to what excel does but I am fast learning that what is standard functionality in excel is a whole another story in Access..
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 form which has a button to email the data out in a standard email message.
Private Sub Command60_Click() Dim MyDb As dao.Database Dim rsEmail As dao.Recordset Dim sToName As String Dim sSubject As String Dim sMessageBody As String
[code]...
This works well enough, however, FIELDS 11 through to 16 contain the venue address. This is all we ll and good if every field of the venue address is populated. here are times when not all of the fields are populated, for instance, the address might only be 5 lines.I know I can do this using IIf statements on a report, but how can i achieve the same thing for the email.
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 made a query with the name "Confirmation" and it is setup like this:
Name trainee Email Training John John@mail.com Tr one Mary Mary@mail.com Tr two
I also made a button in a report with the title "Send Mail" now is my goal that if i press that button automatically multiple e-mail message's will be generated with data from people in that query. So if click on that "Send Email" button i want two different mails messages generated that will be send to John@mail.com and Mary@mail.com with in the mail body their data.
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'):
I want to automate an email to include the senders email addres with some text in the body of the email.
Code: Private Sub send_mail_Click() Dim olApp As Object Dim objMail As Object On Error Resume Next 'Keep going if there is an error Set olApp = GetObject(, "Outlook.Application") 'See if Outlook is open
