Rabu, 26 Oktober 2016

RE: [MS_AccessPros] Email code question to display on screen before sending


Liz - By using .Display, Outlook's "allow" message is suppressed. That's because the email requires user intervention and no mail is sent out without the user knowing. In Jim's case, This is what he wants as the user is editing the message.

In some cases, you don't want the user to edit anything so you use .Send. The drawback with that is the dreaded "allow" warning. To avoid that, I use vbMAPI from everythingaccess.com. It adds the necessary code to your project to forgo the warning. It also gives you very minute control over the whole email process. I find it invaluable in my applications. Nothing needs to be installed on the user side. And the online help and sample code is totally complete.

Bill Mosca, Founder - MS_Access_Professionals
My nothing-to-do-with-Access blog

---In MS_Access_Professionals@yahoogroups.com, <liz_ravenwood@beaerospace.com> wrote :

So does this override the trust settings in security that makes the individual click "allow?"


From: MS_Access_Professionals@yahoogroups.com [mailto:MS_Access_Professionals@yahoogroups.com]
Sent: Thursday, October 20, 2016 9:03 AM
To: MS_Access_Professionals@yahoogroups.com
Subject: RE: [MS_AccessPros] Email code question to display on screen before sending


What does the SendKeys "%{s}", True  line do? If it is sending the mail then if you comment it out it will stop at .display and you user can review it and press the send button.


Bob Peterson



From: MS_Access_Professionals@yahoogroups.com [mailto:MS_Access_Professionals@yahoogroups.com]
Sent: Thursday, October 20, 2016 11:48 AM
To: MS_Access_Professionals@yahoogroups.com
Subject: [MS_AccessPros] Email code question to display on screen before sending


Hello all


I just put some code on forms that allows the users to send an email to me and my director if the users have an issue, a request for enhancements or questions for a specific database. But the email sends so fast that the users do not have the ability to type their request or issue. It just sends.

How do show the email message on the screen?


My code is below. I know I need to change or add one thing.


Thank You


Jim Wagner




Private Sub cmdEmailDataManagementServices_Click()






Set objol = New Outlook.Application


Set objmail = objol.CreateItem(olMailItem)


With objmail


.To = "xxxxxxxxxx"


.CC = "xxxxxxxxxxx"


.Subject = "Requesting help for the Agency/Org Database"


.Body = "Database found at P:\BUDGETING_FINANCE\FORMS AND POLICIES\Business Operations Documents" _


& vbCrLf & vbCrLf & _


" Please assist with the following issue.... "






.NoAging = True




End With


Set objmail = Nothing


Set objol = Nothing


SendKeys "%{s}", True




End Sub




This email (and all attachments) is for the sole use of the intended recipient(s) and may contain privileged and/or proprietary information. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message.


Posted by: wrmosca@comcast.net
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (6)

Have you tried the highest rated email app?
With 4.5 stars in iTunes, the Yahoo Mail app is the highest rated email app on the market. What are you waiting for? Now you can access all your inboxes (Gmail, Outlook, AOL and more) in one place. Never delete an email again with 1000GB of free cloud storage.



Tidak ada komentar:

Posting Komentar