When I send an email from Access with SendObject, how does it determine the user name, the 'from' name. Is it just the user's Outlook name? Do I have any control over that?
View Replies have a vba code written to have my MS Access 2007 tell Outlook to send an e-mail with several attachments to whom it may concern, but I need it to change the "From" field in the e-mail, because there's many people who can send this, but it's looking like it's all being sent as my user. This is the code, it all works, but it doesn't change the sender field. Should I make some sort of auto-login macro or something?
Call fctnOutlook("Reconsideraciones BCH", EmailTasador, Email, , Subjet, "Agradecer revisar la tasacin indicada, de acuerdo a lo pedido en email adjunto, y me des tu opinin. " & vbCrLf & vbCrLf & "Favor no responder a Reconsideraciones BCH, no recibe correos es solo para enos, enviar a visador indicado en el email" & vbCrLf & vbCrLf & "Le saluda atte." & vbCrLf & vbCrLf & usu & vbCrLf & "Seccin Tasaciones" & vbCrLf & "Banco de Chile" & vbCrLf & vbCrLf & vbCrLf, Nz(Tpath), "Yes;No;Maybe", 2, True)
With objMail
.To = EmailTasador
.CC = Email
.Subject = Subjet
.Attachments.Add (Tpath)
[code]....
with the linking tables thing to outlook can it be reversed. ie if i have a table that was linked to outlook outbox would the records form an email just like the emails from my inbox form a record.
i wanting to send emails automatically to many recipients. so i would have to use a record set and i thought that if i build the email in a record then have outlook pick it up then that would be the easiest way.
Our database is in access 2003. It has a form which has a button to send email of orders. I added a new user in this database. That button works in all other computers in the network with the same user permissions as this user, in his computer when he select to email Order it does nothing. It does not open the new email page in outlook and the outlook email is configured in his computer.
View 3 Replies View RelatedAfter inputting data into a text box on a form i want to click on a command button which will open an email program and then put the text there so i can send it.
View 1 Replies View RelatedI'm working on a vacation/time off tracker and was hoping to use the collect data feature. I've created a form where a user submits their requested date and number of hours, at which point I'd like the form to be sent to their manager for approval. The manager's email address is stored in a table. Once the manager marks yes or no, I'd like that reflected in the time off requests table, and an email sent to the requester letting them know if it was approved or not. Is this possible? How would I go about it. I'm pretty new to Access, learning on the fly, but I'm pretty good at modifying code to match my situation/working backwards if you have any examples for me to look at.
View 1 Replies View RelatedI 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.
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."
Exit_cmdPCAuthSend_Click:
Exit Sub
End Sub
Im using the code below to send information by email. BUT:
I want to send the same information to more than one recipient. can i write more than one address in the SendObject?
What can i do if i do not know prior to sending how many addresses i want to include. (this means that once i might have tosend it to 1, then later to 3, etc...)?
The code is:
Private Sub cmdMailTicket_Click()
On Error GoTo Err_cmdMailTicket_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 stTicketID As String '-- The ticket ID from form
Dim stWho As String '-- Reference to tblUsers
Dim stHelpDesk As String '-- Person who assigned ticket
Dim strSQL As String '-- Create SQL update statement
Dim errLoop As Error
'-- Combo of names to assign ticket to
stWho = Me.cboAssignee
stWhere = "tblUsers.strUserID = " & "'" & stWho & "'"
'-- Looks up email address from TblUsers
varTo = DLookup("[strEMail]", "tblUsers", stWhere)
stSubject = ":: New Help Desk Ticket ::"
stTicketID = Format(Me.txtTicketID, "00000")
RecDate = Me.txtDateReceived
'-- Helpdesk employee who assigns ticket
strHelpDesk = Me.cboReceivedBy.Column(1)
stText = "You have been assigned a new ticket." & Chr$(13) & Chr$(13) & _
"Ticket number: " & stTicketID & Chr$(13) & _
"This ticket has been assigned to you by: " & strHelpDesk & Chr$(13) & _
"Received Date: " & RecDate & Chr$(13) & 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
'Set the update statement to disable command button
'once e-mail is sent
strSQL = "UPDATE tblHelpDeskTickets SET tblHelpDeskTickets.ysnTicketAssigned = -1 " & _
"Where tblHelpDeskTickets.lngTicketID = " & Me.txtTicketID & ";"
On Error GoTo Err_Execute
CurrentDb.Execute strSQL, dbFailOnError
On Error GoTo 0
'Requery checkbox to show checked
'after update statement has ran
'and disable send mail command button
Me.chkTicketAssigned.Requery
Me.chkTicketAssigned.SetFocus
Me.cmdMailTicket.Enabled = False
Exit Sub
Err_Execute:
' Notify user of any errors that result from
' executing the query.
If DBEngine.Errors.Count > 0 Then
For Each errLoop In DBEngine.Errors
MsgBox "Error number: " & errLoop.Number & vbCr & _
errLoop.Description
Next errLoop
End If
Resume Next
Exit_cmdMailTicket_Click:
Exit Sub
Err_cmdMailTicket_Click:
MsgBox Err.Description
Resume Exit_cmdMailTicket_Click
End Sub
I am sending an email using SendObject, like this:
DoCmd.SendObject acSendNoObject, , , eMailAddress, ccAddress, , Me.Subject, Me.MessageBody, 0
The email is sent correctly. However, in Access 2003 a copy was posted to the Outlook 'Sent' folder. Since we have moved to Outlook 2010, a copy is no longer posted to the 'Sent' folder. We miss having that copy.
Is there an option that I can set to post the email to the user's 'Sent' folder? If not, what about a BCC? How can I get the user's email address?
I'm using DoCmd.SendObject to send an e-mail using Windows Live Mail.
Works great UNLESS the recipient name contains a "_" character as in
joe_blow@isp.com. joeblow@isp.com works just fine.
I get RT Error 2293 "Access can't send this e-mail message"
Is this a WLM problem? SendObject problem? VBA? my code?
Are there character restrictions for the e-mail name? If so that is bad because these are valid names for users. What am I doing wrong and how do I correct the syntax so that these e-mail names can be accepted?
WIN 7, Access 2010
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]...
Have found some code that originated from this forum, and have modified it to suit my needs. There's one form with all the information, that has multiple buttons and subsequently multiple functions to generate emails, with each button/email to generate a different format and content. The first use of a button works fine, but trying to use the next button right after does nothing. If you exit the form and re-enter, you can then use the next email button, but that's a pain and the users won't like that. Can anyone help? I've pasted a sample of the code that is being used below, it's duplicated and changed slightly for the other buttons. I currently have the button linked to a macro that does other things like saving, and setting dates and then running the function.
Thanks,
Don
-----------------------------------------------------------------
Public Function AckEmailNew()
On Error GoTo Err_cmdMailTicket_Click
Dim varTo As String '-- Address for SendObject
Dim stText As String '-- E-mail text
Dim stSubject As String '-- Subject line of e-mail
Dim stTicketID As String '-- The ticket ID from form
Dim strSQL As String '-- Create SQL update statement
Dim errLoop As Error
varTo = Me.ClientEmail
stTicketID = Me.STSITicket
stSubject = "Ticket/numéro de référence: " & stTicketID
stText = <<My text goes here>>
'Write the e-mail content for sending to assignee
DoCmd.SendObject , , acFormatTXT, varTo, , , stSubject, stText, -1
On Error GoTo Err_Execute
Exit Function
Err_Execute:
MsgBox Err.Description
Resume Exit_cmdMailTicket_Click
Exit_cmdMailTicket_Click:
Exit Function
Err_cmdMailTicket_Click:
MsgBox Err.Description
Resume Exit_cmdMailTicket_Click
End Function
Access 2007 DB. Is there a way to have an auto gen. email sent to me and or other admin. After user has completed input into form...
View 1 Replies View RelatedI am useing DoCmd.SendObject to send emails - however I get outlook opening an email with my To, BCC fields filled in , however I am stuck in the new email screen - ie can't get to a previuos email to copy and paste text - like it is dialog?
Is there any way around this.
Thanks Paul
Hi!
I got a question about emailing.... I don't think this is possible but I thought why not ask....
Is it possible to have a button on a form, that when it's pushed, it sends an email with a report included to a certain email adress?
thanks!
-jake
I have been able to create a form that will send an email automatically when the form is opened. Tha problem is, the email will not actually send until I open Outlook. Any ideas?
Thanks in advance.
I am looking to write some code that "OnSave" in a form will run some code
No worries about writing the code on an event, I will figure that out...
What I want to do is:
If txt box A is not null then send an email to some recipient.
QUESTION:
Does anyone have an example of code that will send an email to someone from Inside Access.
Hi,
Im using square bracketed parameters in my query designs for user prompts. Now I want a similar feature to tell the query what field I want it to show. Is there a way of doing this please? - or does the fact I need to do imply a db design flaw?
Hi guys,
i want to send an email to several people when someone else enters a complaint in my database.
I have a form which displays the complaint with a reference number, recordsource is "tblKlachten". i have query that is set to return only those emails i want it to send to called "qerMailBeheerder". In there is a field called "email".
Now, whenever i a user closes the form after adding a complaint, i want at the same time a mail sent to those ppl in the query with the subject the reference number of the complaint (field called "Referentienummer") and in the body other information from the fields on the form. Like the field "complaintdecription" and "clientname".
Now, i know about the sendobject thing, but i have tried alot and non would do what i want. Can anybody help me with the code.
Many thanks
Hello,
I am a little lost here. My prorgam has a form where I added a button. When clicking on the button, it is supposed to use some fields from the form and add them to an email with additional info which is added when the email opens up and is about to be sent. My boss uses Mozilla for his email account. What would be the code on the Onclick event be and do I have to set up anything else??
So far I have this code but it is for Microsoft Office Outlook not for Mozilla:
Set objOutlook = CreateObject("Outlook.Application")
Set ObjOutlookMsg = objOutlook.CreateItem(olMailItem)
With ObjOutlookMsg
.To = str_Recipient 'str_Recipient is obtained before this code
.Subject = str_Subject 'str_Subject is obtained before this code
.Body = str_Body 'str_Body is obtained before this code
.readreceiptrequested = lb_ReadReceipt
.Display 'to display the message instead of sending it
End With
Thank you very much
I'm sending an email from a form to Outlook express. But before it opens Outlook I get a question that states "a program is trying to access email address you have stored in Outlook" I then have to click ok and then another window opens and askes the same question. How can I eliminate these warning messages??
Thank You
Hi,
So far I know there is a wizard for being able to create a button that sends a Form Report. What I really want to do though is when the user clicks the button on the form, just the form is sent/attached to the email, effectively giving the viewer/receiver a screenshot of the Form in question.
Thanks in advance,
Barret
I have looked through the forums for an answer to a problem I am having,
but I can't seem to find the complete answer.
I just started work on an inventory database that was made by other people;
it is a fairly large database. One of the forms is for equipment maintenance
and in it, you fill out several fields. What needs to be done is an email sent
out to 2 people in the department; they are selected via a combo box and this
runs a query that fills in a table with the proper email addresses and matches it
to the proper job in the table. A due date is inputted in a standard text box.
The emails are then supposed to be sent out on the due date provided.
For some reason, there is no code at all (that I can find) that even runs Outlook,
although it supposedly worked a while back. I have read that timers would help
with this, but I am not quite sure where to go with it. Also, does the email have
to be sent from the person that is logged into Outlook at the time the email is sent,
or can it be sent under another email address no matter who is logged into Outlook
at the time.
Any help would be greatly appreciated.
Thanks
I have made a form to send emails, I used this code I found somewhere:
Code:
Private Sub cmdEnviarOutlook_Click()
Call EnviarEmail(Me.txtEmail, Me.txtAsuntoEmail, Me.txtLeyenda)
End Sub
[code]...
I configured Outlook with my gmail account.The code works fine (after adding references) but when I take a look to the sent-box in Gmail, I find that the email is duplicated.If I send an email normally or even using docmd.sendobject, that doesn't happen.
One more question. I tried this function in two computers and in one of them Outlook asks for permission while it does not in the other one. I believe it is related with Outlook config.
Is there a way to send an email using outlook, have that email filtered into a specific folder, and then have an access program extract that email. The situation is that I have sales reps in the field that would like updates on projects that are stored in an access program I designed. The program already sends out auto notifications through outlook, but that is only when I update the specific project. All of the sales reps in the field use blackberry's and do not have time to call in to request an update. So I was wondering if it were possible to have a sales rep send a preformated email that has included the primary key ie Account number, and have access recieve that account number to turn around and send out an auto response.
View 6 Replies View Related