I have been working on a database which is going to integrate a client database with any emails they send to me. The idea is that I will create a sub form as part of the contact information section which will show any emails that have been sent from that contact. I have a field which has the email address in the contact section and I want to link the contact to the sub form by the 'email address' and the 'from' field in the link outlook folder.
This all works great except that access links to the outlook folder and in the 'from' field, it shows the display name instead of the email address it was sent from. Is there anyway to tell it to extract the email address itself instead of the display name, or is there another way of achieving this same thing?
I have a query that may have 6 - 7 different records for example each record contains a different email address, i need to get the first email then send and email to that address then go to the next record get that email address send an email to that email address until its gone through all the records...
I use this code to send an email, dont know how to loop through records and get the email...
Code: Dim appOutLook As Outlook.Application Dim MailOutLook As Outlook.MailItem Dim strPath As String Dim strFileName As String Set appOutLook = CreateObject("Outlook.Application")
I have a form bound to a table which stores contact info for a person. I have two controls that are email_address and website_address. I set them both as hyperlinks. So now when the user clicks on the email_address Outlook opens a new message with an email_address in the To field. (I had to use a function found on this forum to replace the "htttp" with "mailto" on AfterUpdate event in order for this to work properly.) However, now trying to add some other features to my DB I ran into problems listed below. I wonder if I should have rather left that control as Text instead of Hyperlink, and use the DoCmd.SendObject on doubleclick event instead of using the above solution. How people usually store email addresses and enable emailing on click?
The problems I ran into: 1) My main form is in popup mode and therefore right click on the hyperlink does not give an option to edit the hyperlink 2) I copied a function from this forum which gathers a list of emails and sends one message to the emaillist. However, my email list instead of generating as: email1@a.com; email2@b.com it generates as: email1@a.com#mailto:email1@a.com#; email2@b.com#email2@b.com#
I guess I could extract the email using vba (not sure how), but I still don't know how to solve issue number 1. So maybe it is better to siwtch the field to plain text and forget the hyperlinks?
Thanks, Mariusz
PS. What procedure on double click would open a default browser, since I also have to deal with web addresses and thought of turning them into text controls?
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
Im using the sendobject macro to email a report when the database is opened, yet when it does, the email is only in my outbox, doesnt seem to be sent to other users!!! Can anyone tell me what is going on or how to get around this??
using Ms acess 2007 this code is working fine buuutttt....
This one worked, but sent everyones records DoCmd.SendObject _ acSendReport, _ "Contact Report", _ acFormatHTML, _ "realridergmail.com", _
[code]...
I need it to send just the records belonging to the customer, they shouldnt be able to see anyone elses.how to send the dates that belong only to each customer?
I have a form that shows first name, last name, email, date appointment, time appointment.
If I just select the regular email option (form attached as pdf) I have to type in the email address manually.
How can I make sure the form is attached as a pdf to my email and the email address that is on the form that I have open is automatically put in the TO: field in my outlook?
Basically I just want to use 2 mouseclicks: button on the form to create an email in outlook and click the send button in outlook.
When I joined this forum last month, I attempted to enter my current email address and I got a message box that my email address had been banned. I tried several times to enter the correct (current) email address and each time was told that email address had been banned.
I attempted to contact 'jon@access-programmers.co.uk' on the 13th and 27th of April with no response.
As it is right now, this forum only recognizes my old email address instead of my real email address as that's the only way I could continue the join process.
Can anyone: 1. tell me why my current email address has been banned 2. help me get my correct information entered?
The code below works for the one email address "Quality Assurance"...but I want to add more email values to SendObject command. If I do this: stEmail = Me.Quality_Assurance_Authorizer.Column(1) And Me.Engineering_Authorizer.Column(1)..... I get a Runtime error '13' Type mismatch. Is there another way of including a series of email values into the SendObject code below? The reason I'm using the value of the column is that sometimes the value may be null if that department doesnt need to be emailed. Thanks for any help.
Private Sub cmdPCAuthSend_Click()
Dim stDocName As String Dim stEmail As String
stDocName = "rptPCAuthReq" stEmail = Me.Quality_Assurance_Authorizer.Column(1) DoCmd.SendObject acSendReport, stDocName, "SnapshotFormat(*.snp)", stEmail, , , "PCA Authorization Request", "Please review this product change and authorize when appropriate."
I am using Access 2007. I have a text field that contains multiple e-mail addresses. The field is generated from a excel file that I download from a website the company uses. I would like to create a query or VBA code to change the e-mail address to just the employee name. The problem is the filed can have multiple e-mail address separated by a comma. I have been changing them manually using "Search - Replace", but that is getting tedious as the database is getting used more often.
I've spent about an hour searching this site for email issues but most I found we how to send. I want to take existing data and make an email address. I have a FName field and an LName field. In my email field I want FName.LName@email.com. the @email.com will always be the ending. Also where (on gotfocus) is the best place to put this code so it autopopulates after the FName and LName are entered?
How I can insert the email address from 'Newemail' into my existing customer list 'masterlist' i.e. contact email of ID 1 and 3 :confused: ? I would like to ignore ID 4-5 from the 'Newemail' table. And I would like to keep ID 4 from the 'masterlist' table.
I currently have details of my clients in a table called tblSites, this tble includes a field with an email address. I currently produce a invoice which is automatically saved as a pdf and an email generated with the invoice attached. However, a few clients do not have email addresses (these are sent by post). My code (see below) will successfully produce the email with the attachment, but if the client does NOT have an email address in the tblSites it comes up with the "Invalid use of Null" error. What I want it to do is continue the process of just saving the invoice with a Msgbox stating "This Client does not have an email address etc etc.
'Save Invoice as PDF and annotate Invoice Number, Date and site name
Dim StrFile As String Dim slSQLString As String Dim rsEmailAddress As Recordset Dim slEmailAddress As String StrFile = "C:Redwatch Invoices" & Forms!frminvoice!txtInvoiceNr.Value _ & "-" & Format(Date, "dd-mmm-yy") & "-" & Forms!frminvoice!cboSiteName & ".pdf"
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.
I can already send emails out as PDF files when an email address exists, however, I'm trying to validate whether or not an email address does actually exist. My problem is, there are four possible locations where an email address could be: MainEmail or Contact1Email or Contact2Email or Email (the last one - Email - is in a separate table).
Four text boxes exist on the form that is being actioned (the form is based on a query to extract the relevant information) and are available to test for an email address being present. What I'm struggling with is ensuring that the 'To' box in Outlook always gets populated or Outlook chucks a hissy fit. I have been trying various IF Then Else and Do Loop plus a myriad of other ways but none are reliable, especially if no email address is present which can be the case.
I am a website administrator and don't want to send back a verification email as people register on my website. So, I am wondering whether there is a way for me to check the validity of their registered email addresses. How can I easily check whether an email address is valid or exists?
My situation is that , I have a sub for sending an email to a single client on the current form. Using a record set works fine, I now wish to have
.Cc email address which is not part of the Record set ." its to the department head". strEmailAddress = rst![clientEmail] & " ;" & somebody@ntlworld.com
My question is can I type the somebody email address as indicated in red in the above line? to enable the email to go to both addressees .
