473,320 Members | 1,902 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,320 software developers and data experts.

Email

It used to be possible to send email (with the DoCmd.SendObject
acSendNoObject, , , "ni*****@btinternet.com", , , "Email", "Enquiry",
False command), however since 2000, Microsoft has put a restraint on
this, so each email that goes out you have to confirm that Access is
allowed to use Outlook. Is there anyway round this that anyone knows
of, obviously I do not want to confirm 400 times (or more) that
everthing is above board.

Thanks Guys

Jun 21 '06 #1
5 2048
Here's one method, very good, but it's not free:

Total Access Emailer
http://www.fmsinc.com/products/Emailer/index.asp
Tom Wickerath
Microsoft Access MVP
http://www.access.qbuilt.com/html/ex...tributors.html
http://www.access.qbuilt.com/html/search.html
============================================

You may wish to use CDO. Here is a sample.

Public Sub VerySimpleSendMailWithCDOSample()
Dim iCfg As Object
Dim iMsg As Object
Set iCfg = CreateObject("CDO.Configuration")
Set iMsg = CreateObject("CDO.Message")
With iCfg.Fields
..Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
..Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")
= 25
..Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") =
"smtp.aim.com"
..Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate")

= 1
..Item("http://schemas.microsoft.com/cdo/configuration/sendusername") =
"MyUserName"
..Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") =
"MyPassord"
..Item("http://schemas.microsoft.com/cdo/configuration/sendemailaddress")

= "Lyle Fairfield <lylefairfi...@aim.com>"
..Update
End With
With iMsg
..Configuration = iCfg
..Subject = "Temp.xls"
..To = "lfairfi...@cogeco.ca"
..TextBody = "This is the latest!"
..AddAttachment "C:\Program Files\Backup Scripts\Temp.xls"
..Send
End With
Set iMsg = Nothing
Set iCfg = Nothing
End Sub

===============================================

There is also a product call "Yes Click" that will do the response for
you
BUT
There is still a 5 second delay that you cannot get around.

And also
===============================================
Here is the address of the write up at Microsoft for the original
security update release:
(At the end he mentions that the administrator can set up overrides for
it when it is a network type of email server situation.)

http://www.microsoft.com/presspass/f...08outlook.mspx

At roughtly Paragraph 10 it says:

"Two other features should greatly diminish the spread of worm viruses
by warning users before they unknowingly spread a virus via email. If a
program tries to access your Outlook Address Book, you will be notified
by a dialog warning box and given the choice to let it access your
Outlook Address Book. "No" will be the default option. Owners of Pocket
PCs and other personal digital assistants such as Palm Pilots, or who
have other legitimate uses, will be able to select "Yes." The update
also warns you by a dialog warning box if a program is trying to send
email on your behalf. You will have the option to let the program send
email on your behalf, because there are legitimate business scenarios
where this is useful, but the default answer is "No" . This will help
curb the spread of certain viruses by putting users in control of their
desktop. With worm viruses, people usually don't know they are sending
an infected email to 500 of their closest friends. This update puts
customers in control of their address books and of programs that
attempt to send mail on their behalf. "

Later on in the same article he says:

Sinofsky: We have added administrative options to the update for
organizations that rely on server-based security settings, thus
enabling customization without sacrificing a high level of security.
Administrators will be able to choose which attachments cannot be
accessed or must be saved to a hard drive before opening. They will
also be able to choose when and if the warning dialog boxes appear.

Ron

Jun 21 '06 #2
Ron2006 wrote:
Here's one method, very good, but it's not free:

Total Access Emailer
http://www.fmsinc.com/products/Emailer/index.asp
Tom Wickerath
Microsoft Access MVP
http://www.access.qbuilt.com/html/ex...tributors.html
http://www.access.qbuilt.com/html/search.html
============================================

You may wish to use CDO. Here is a sample.

Public Sub VerySimpleSendMailWithCDOSample()
Dim iCfg As Object
Dim iMsg As Object
Set iCfg = CreateObject("CDO.Configuration")
Set iMsg = CreateObject("CDO.Message")
With iCfg.Fields
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")
= 25
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") =
"smtp.aim.com"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate")

= 1
.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") =
"MyUserName"
.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") =
"MyPassord"
.Item("http://schemas.microsoft.com/cdo/configuration/sendemailaddress")

= "Lyle Fairfield <lylefairfi...@aim.com>"
.Update
End With
With iMsg
.Configuration = iCfg
.Subject = "Temp.xls"
.To = "lfairfi...@cogeco.ca"
.TextBody = "This is the latest!"
.AddAttachment "C:\Program Files\Backup Scripts\Temp.xls"
.Send
End With
Set iMsg = Nothing
Set iCfg = Nothing
End Sub

===============================================

There is also a product call "Yes Click" that will do the response for
you
BUT
There is still a 5 second delay that you cannot get around.

And also
===============================================
Here is the address of the write up at Microsoft for the original
security update release:
(At the end he mentions that the administrator can set up overrides for
it when it is a network type of email server situation.)

http://www.microsoft.com/presspass/f...08outlook.mspx

At roughtly Paragraph 10 it says:

"Two other features should greatly diminish the spread of worm viruses
by warning users before they unknowingly spread a virus via email. If a
program tries to access your Outlook Address Book, you will be notified
by a dialog warning box and given the choice to let it access your
Outlook Address Book. "No" will be the default option. Owners of Pocket
PCs and other personal digital assistants such as Palm Pilots, or who
have other legitimate uses, will be able to select "Yes." The update
also warns you by a dialog warning box if a program is trying to send
email on your behalf. You will have the option to let the program send
email on your behalf, because there are legitimate business scenarios
where this is useful, but the default answer is "No" . This will help
curb the spread of certain viruses by putting users in control of their
desktop. With worm viruses, people usually don't know they are sending
an infected email to 500 of their closest friends. This update puts
customers in control of their address books and of programs that
attempt to send mail on their behalf. "

Later on in the same article he says:

Sinofsky: We have added administrative options to the update for
organizations that rely on server-based security settings, thus
enabling customization without sacrificing a high level of security.
Administrators will be able to choose which attachments cannot be
accessed or must be saved to a hard drive before opening. They will
also be able to choose when and if the warning dialog boxes appear.

Ron


Thanks Ron,

I knew about fms's Total Access Emailer but I did particularly want to
part with the $299 that it costs and if they can do it there must be a
way.

I was thinking that a simple VB.NET app should be enough.

But I am not sure of the code that would be necessary.

Could you explain the code that was contained in your answer?

Thanks Nick

Jun 21 '06 #3
I wish......

The code is from another post in one of these google groups and I have
not had the need to try to use it.

I am not sure exactly except to say it is supposed to be how to send
email using CDO. You will probably have to do a search on email cdo to
find someone with a better explanation. I have the feeling it is not
used extensivly but does work. We both probably have the same questions
about it. I don't have any extensive email requirements so we have been
able to live with the authorization to send request. In fact, most of
the time we use display, because the users want to add / check some
things on either the email itself and/or the attachment.

I had one thread with someone who wasn't getting the message at all. It
turns out it looks like her network people installed it with the
verification request turned off. She is keeping quiet.

Wish I could help more.

Ron

Jun 21 '06 #4
I found these:
=================

HOWTO: Send HTML Mail with CDO for Win 2000 and Local Pickup Dir:
http://support.microsoft.com/default...;EN-US;q286430

=================

Microsoft Most Valuable Professional (MVP) - Exchange Server
Co-author of "Professional CDO Programming", Wrox Press 1999

CDOLive LLC - The Microsoft Messaging and Collaboration Application
Experts
http://www.cdolive.com

=================

Jun 21 '06 #5

Ron2006 wrote:
I wish......

The code is from another post in one of these google groups and I have
not had the need to try to use it.

I am not sure exactly except to say it is supposed to be how to send
email using CDO. You will probably have to do a search on email cdo to
find someone with a better explanation. I have the feeling it is not
used extensivly but does work. We both probably have the same questions
about it. I don't have any extensive email requirements so we have been
able to live with the authorization to send request. In fact, most of
the time we use display, because the users want to add / check some
things on either the email itself and/or the attachment.

I had one thread with someone who wasn't getting the message at all. It
turns out it looks like her network people installed it with the
verification request turned off. She is keeping quiet.

Wish I could help more.

Ron


Hi Ron,

Thanks you what you have given me, I did not know that it was possible
to turn off the verification request. I will investigate further.

Regards

Nick

Jun 23 '06 #6

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

12
by: Chuck Anderson | last post by:
Can anyone point me in the right direction? I want to use Php to automate confirmation of someone joining an email list by them replying to an email (so they don't have to have a browser?). I...
4
by: dmiller23462 | last post by:
So here's my problem.....I need to set up different email distributions based on which option in the following Select form has been chosen....For instance if "Putaway" is chosen it needs to email...
88
by: Mike | last post by:
Is there a way to determine what a user's default email client is? I read a post from 3 years ago that said no. I guess I'm hoping something has come along since then.
2
by: BSG-SMTP-Gateway | last post by:
The following message sent by this account has violated system policy: Connection From: 64.253.55.90 From: python-list@python.org To: terriss@birdsall.com, q4dzsAEAAAAA@birdsall.com,...
26
by: libsfan01 | last post by:
Hi all! Can anyone show me how to check and email field on a form for the existence of these two characters. Kind regards Marc
3
by: g0c | last post by:
hi, how to hide or replace email addresses in php mail function with something like "group" so the email addresses to which email is sent are not visible ? i have : $subs = "email1@dot.com,...
3
by: Erik Johnson | last post by:
THE GOAL: I need to send an email with a simple ASCII text body and an attached HTML file. I have scripts that send basic emails via the smtplib module that don't have any attachements and that...
15
by: Craig Hurley | last post by:
Hello, user@x.com receives an email from user@a.com. I want to forward that email to user@y.com. I want the contents/header to remain intact, with the exception of adding "X-Forwarded-For". ...
3
by: IGD | last post by:
I don't know if this is the right place to post this or not. If not, could someone direct me elsewhere where I would find more information on how to solve my problem? Thanks! My problem is this:...
27
matheussousuke
by: matheussousuke | last post by:
I'm having trouble with e-mail sending, I mean, the website is suposed to send a confirmation email after sign up, but it gets like text plain instead of HTML May someone help me, please? ...
0
by: DolphinDB | last post by:
The formulas of 101 quantitative trading alphas used by WorldQuant were presented in the paper 101 Formulaic Alphas. However, some formulas are complex, leading to challenges in calculation. Take...
0
by: DolphinDB | last post by:
Tired of spending countless mintues downsampling your data? Look no further! In this article, you’ll learn how to efficiently downsample 6.48 billion high-frequency records to 61 million...
0
by: ryjfgjl | last post by:
ExcelToDatabase: batch import excel into database automatically...
1
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
1
by: PapaRatzi | last post by:
Hello, I am teaching myself MS Access forms design and Visual Basic. I've created a table to capture a list of Top 30 singles and forms to capture new entries. The final step is a form (unbound)...
0
by: CloudSolutions | last post by:
Introduction: For many beginners and individual users, requiring a credit card and email registration may pose a barrier when starting to use cloud servers. However, some cloud server providers now...
0
by: Defcon1945 | last post by:
I'm trying to learn Python using Pycharm but import shutil doesn't work
1
by: Shællîpôpï 09 | last post by:
If u are using a keypad phone, how do u turn on JavaScript, to access features like WhatsApp, Facebook, Instagram....
0
by: af34tf | last post by:
Hi Guys, I have a domain whose name is BytesLimited.com, and I want to sell it. Does anyone know about platforms that allow me to list my domain in auction for free. Thank you

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.