Hi all,
ive searched the forums but cannot find exactly what im looking for.
ive got an access db of contacts names/emails. how can i get these contacts into my ms outlook address book/contacts list?
any help would be greatly appreciated.
thanks, James
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..
main_database form i have a field called coordinators
this field has a list of coordinators in a drop down box
and i also have a field called coordinatorsEmail
what i am trying to do is when the coordinators field has a name in it i want to tell the email field to input a certain email address
ie cordinator joebloggs
email address is joe@myemail.com
i have tried playing with if then and else if commands but not quite sure of the code to create
Please please please!
It's driving me crazy!
Is it possible to send e-mails to all of your e-mail addresses in one single e-mail?
Right now I am able to open up an individual e-mails for each of my stored e-mailo adresses but it would be so much better (and more user friendly) if I could just have one e-mail with all addresses in the To: field.
Any help would be really appreciated.
Rob
Is it possible to send an email after pressing a button to an email address which is within a field? If so where should I start?
View 6 Replies View RelatedI have an Email field on a form. Is it possible to send an email by clicking on the email address? Now, I only have a vague familiarity with VBA as I've taken an Access Intermediate class. We were just introduced to it at the end of the class, so you may have to walk me through it like a 6 year old. I went to a site that said a macro was needed in either the After Update, After Delete, or After Insert. With that said, I know where to go, but I don't know exactly how to write the code. I have outlook set up on my computer and am operating Windows 8.1 and Access 360.
View 5 Replies View RelatedI 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?
Normally I don't have any troubles sending an e-mail; however, this time I want to include a text field (cc copy) that is sometimes blank. The e-mail will not send if the field is blank. So, I tried using an If Then statement but that doesn't work within the SendObject command.
Here's the code I tried ...
DoCmd.SendObject acSendNoObject, , acFormatRTF, Me.POC1EMail, If Not IsNull([Me.POC2EMail]) Then Me.POC2EMail, , "FOUO: Assistance Request", "Text here", True
Hello Everyone,
My Situation: I have a form which merges with a table of 123 Names & Addresses. The only thing these records have in common is an ID #. And the name of the company the ID Number belong to.
Now what I need to do is send in an Email the ID# and Company that the ID# belong to.
Here is an example: Toys R US #45
In the records there is "Gi Joy"
"XBOX"
But they all are connected to the #45
When I try to send from the form I get a table as an attachment with all of the records in excel format when using the following code:
DoCmd.SendObject acSendForm, "frmPeople", acFormatHTML, "sample@aol.com", , , "ID# Information"
I need to send just the ID# in a table but not as an attachment in Outlook. I have looked for examples and I seen none anywhere.
If I could just send a table with one row and nothing but the ID# Information, I would be so happy...
I have vba code set up to automate a query output to email with outlook. I am having issues with the "TO" field. I have tried different types of code, such as the following:
1) MyMail.To = MailList.Fields("EmailAddress")
2) MyMail.To = MailList.Fields("EmailAddress") & ";"
Both of these work, but the issue I am having is the "TO" field in the outlook message looks like this:
admin@blahblah#mailto:admin@blahblah#
Why my code is adding the email address twice, I need to get rid of the #mailto:admin@blahblah# but I do not know how or why it keeps adding that end part.
Afternoon all,
This is one I haven't come across before.
I have a table with a list of contact details/company details etc. I would like to send an email to each customer in this list in one fell swoop essentially asking the same question but tailored for that customer (or as easily as possible).
Any help would be really appreciated.
Thanks.
Can someone help me try and figure out how I can get my code to not just pull the first email based on a dlookup from a table...
I am looking to enter information in a form and have outlook populated with to specific email addresses based on a groupid in the table. Right now this code works fine but only returns 1 email address not all with the same GroupID.
Private Sub Command27_Click()
On Error GoTo Err_Command27_Click
Dim stWhere As String '-- Criteria for DLookup
Dim varTo As Variant '-- Address for SendObject
Dim stText As String '-- E-mail text
Dim RecDate As Variant '-- Rec date for e-mail text
Dim stSubject As String '-- Subject line of e-mail
Dim stWho As String '-- Reference to tblUsers
Dim stEvalEmp As String '-- Person who assigned ticket
Dim stDelBidPrice As String '-- Delivery Bid Price
Dim stOverBidPrice As String '-- Override Bid Price
Dim stOverMeanPrice As String '-- Override Mean Price
Dim stOverOfferPrice As String '-- Override Offer Price
'-- Combo of names to assign price change to
stWho = Me.GroupID
stWhere = "ClientServices_tbl.GroupID = " & "'" & stWho & "'"
'-- Looks up email address from ClientServices_tbl
varTo = DLookup("[ClientEMAIL]", "ClientServices_tbl", stWhere)
RecDate = Me.Date
stSubject = ":: Price Change Request :: " & RecDate
stCusip = Me.CUSIP
stDelBidPrice = Me.DeliveredBidPrice
stOverBidPrice = Me.OverrideBidPrice
stOverOfferPrice = Me.OverrideOfferPrice
stOverMeanPrice = Me.OverrideMeanPrice
'-- Evaluators employee who assigns ticket
stEvalEmp = Me.EvalEmpId.Column(1)
stText = "A price change has been requested by Evaluators Department." & Chr$(13) & Chr$(13) & _
"This price change has been requested by by: " & stEvalEmp & Chr$(13) & _
Chr$(13) & _
"Price Change Details:" & Chr$(13) & _
"Received Date: " & RecDate & Chr$(13) & _
"CUSIP: " & stCusip & Chr$(13) & _
"Delivered Bid Price: " & stDelBidPrice & Chr$(13) & _
"Override Bid Price: " & stOverBidPrice & Chr$(13) & _
"Override Offer Price: " & stOverOfferPrice & Chr$(13) & _
"Override Mean Price: " & stOverMeanPrice & Chr$(13) & _
"This is an automated message. Please do not respond to this e-mail."
'Write the e-mail content for sending to assignee
DoCmd.SendObject , , acFormatTXT, varTo, , , stSubject, stText, -1
Exit_Command27_Click:
Exit Sub
Err_Command27_Click:
MsgBox Err.Description
Resume Exit_Command27_Click
DoCmd.GoToRecord , , acNewRec
End Sub
How to add attachments to a email using a sub form were I store the attachment paths
E.g I have a main form called frmteaminfomer with various fields and continuous subform called attachmentssubform in the sub form I have a field call txtaddress . I have some code that I can pick a file then put its file path into txtaddress field and also have a check box call add to email. so what I trying to do is loop through all the records in the subform and if the check box is true add the files as attachment on the email.
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.
View 12 Replies View RelatedI 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.
View 6 Replies View RelatedI 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.
Hi,
I am trying to email a table in text format using :
DoCmd.SendObject acSendTable, "Table", acFormatTXT, , , , "Results", "Attached are the reslts"
It sends the file in text file format, but it adds "-" & "|" characters all over the file. Is there a way that I can send the file in simple "Comma Separated" file format.
Thx,
Jatz
Hi,
I am trying to email a table in text format using :
DoCmd.SendObject acSendTable, "Table", acFormatTXt, , , , "Results", "Attached are the reslts"
It sends the file in text file format, but it adds "-" & "|" characters all over the file. Is there a way that I can send the file in simple "Comma Separated" file format.
Thx,
Jatz
I have a table, "TBL_Email", which simply contains a list of email addresses in a field called "email".
I would like to concatenate all of them together into one string, and add semi-colons to the end e.g.
"123@abc.com;456@def.com;789@hij.com"
I believe a may need a record set, but i'm not entirely sure how they work.
I am trying to email a group of records in a table and with the code I have written, it just loops to the first record in the recordset and will not move down to the next record. Below is my code.
Code:
Private Sub TestOutlook()
Dim db As Database
Dim rstMail As Recordset
Dim appOutlook As Outlook.Application
Dim MailOutlook As Outlook.MailItem
[Code] ....
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]...
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
[Code] ....
I have a table that holds company information for the user - eg farm name, company name, manager, phone number and email address etc. Its simply used to provide headers for reports, so that the same generic database can be used on several farms. There is only one record in this table tblfarmdetails.The second table tblorder is for orders and receipts - I currently have code that allows the user to send an order request by email to the manager, and to also send notice of receipt of goods through to the manager. I would like the code to get the email address from the unrelated table.Can I reference this field in the vba?
Private Sub cmdemailorder_Click()
Dim orderdate As String
Dim stafford As String
Dim item As String
Dim itemamnt As String
[code]....
I want to import email data into my access table. The email format is always same and the fields in the email match with the fileds in my table.
View 1 Replies View RelatedI would like to use the "Collect and update via email" function within MS Access 2010 which sends out and collects emails. I know how to use this function, but what I would like to do is something slightly different. Instead of emailing out a data entry "form" that has the employee/team member enter information for data collection purposes about their project, status, start date, end date, priority, tasks, etc. Instead, I would like send an Excel/Access table with all of the current project information displayed in the email data collection form and then have the employee reply to the email and overtype edits to displayed information and then have those changes automatically entered into my table. For example, one project table can have up to 50 rows and then column headers such as project status, start date, end date, priority, task description, etc.
View 1 Replies View Related