OVH Cloud OVH Cloud

envoie de mail automatique

7 réponses
Avatar
watchou
Bonjour.

J'utilise office 2003.
J'ai une appli access qui doit envoyer par mail une partie précise et
différente d'une table à 93 destinataires différents. J'utilise pour cela la
fonction "envoie objet" dans une macro et tout fonctionne très bien.

Le probleme c'est qu'à chaque envoie de mail (il y en a 93) outlook
m'affiche un message m'indiquant qu'une autre appli essaie d'envoyer un mail
et me demande confirmation. Je suis pas faignant mais cliquer 93 fois sur OK
ne me passionne pas des masses et me fait perdre un peu de temps.

quelqu'un sait-il comment faire pour que l'envoie ce fasse sans que OUTLOOK
me demande confirmation ?

merci d'avance.

fabien

7 réponses

Avatar
Bonjour,

Si tu ne veux pas monter une usine à gaz :
1 - export de la requete dans un fichier
2 - envoi mail avec méthode CDO au lieu de sendobject
(http://users.skynet.be/accesshome/ah_outlook_sendmailcdo.htm)
3 - suppression fichier

alors tu peux utiliser le petit prog suivant qui cliquera sur oui à ta place
http://faq.outlook.free.fr/telechargement/ClickYesSetup.exe

n'empêche que 5 secondes x 93 mails, ça fait quand même 8 minutes de moulinette...

--
Arnaud
-----------------------------------
http://users.skynet.be/mpfa/
-----------------------------------

"watchou" a écrit dans le message de news:
43285ac2$0$2309$
| Bonjour.
|
| J'utilise office 2003.
| J'ai une appli access qui doit envoyer par mail une partie précise et
| différente d'une table à 93 destinataires différents. J'utilise pour cela la
| fonction "envoie objet" dans une macro et tout fonctionne très bien.
|
| Le probleme c'est qu'à chaque envoie de mail (il y en a 93) outlook
| m'affiche un message m'indiquant qu'une autre appli essaie d'envoyer un mail
| et me demande confirmation. Je suis pas faignant mais cliquer 93 fois sur OK
| ne me passionne pas des masses et me fait perdre un peu de temps.
|
| quelqu'un sait-il comment faire pour que l'envoie ce fasse sans que OUTLOOK
| me demande confirmation ?
|
| merci d'avance.
|
| fabien
|
|
Avatar
pgz
Bonsoir,

Non, je ne sais pas, et j'aimerais bien, d'ailleurs. Mais quand outlook te
demande si tu autorises l'accès tu peux l'autoriser pour plusieurs minutes.
Comme cela tu ne réponds qu'une fois pour les 93 messages.

pgz
Avatar
Fred
Moi, j'utilise une fonction toute simple :

Function EnvoiMail(Sujet As String, Provenance As String, Destination As
String, texte As String)
Dim Cdo_Message As Object
Set Cdo_Message = CreateObject("CDO.Message")
With Cdo_Message
.to = Destination
.FROM = Provenance
.Subject = Sujet
.TextBody = texte
' .AddAttachment (PieceJointe)
.send
End With
Set Cdo_Message = Nothing
End Function

Il faut aussi vérifier que le composant windows "Services" SMTP est bien
installé.

Fred
"watchou" a écrit dans le message de news:
43285ac2$0$2309$
Bonjour.

J'utilise office 2003.
J'ai une appli access qui doit envoyer par mail une partie précise et
différente d'une table à 93 destinataires différents. J'utilise pour cela
la
fonction "envoie objet" dans une macro et tout fonctionne très bien.

Le probleme c'est qu'à chaque envoie de mail (il y en a 93) outlook
m'affiche un message m'indiquant qu'une autre appli essaie d'envoyer un
mail
et me demande confirmation. Je suis pas faignant mais cliquer 93 fois sur
OK
ne me passionne pas des masses et me fait perdre un peu de temps.

quelqu'un sait-il comment faire pour que l'envoie ce fasse sans que
OUTLOOK
me demande confirmation ?

merci d'avance.

fabien




Avatar
marcel ruettimann
Bonjour Fred

Moi, j'utilise une fonction toute simple :

Function EnvoiMail(Sujet As String, Provenance As String, Destination As
String, texte As String)
Dim Cdo_Message As Object
Set Cdo_Message = CreateObject("CDO.Message")
With Cdo_Message
.to = Destination
.FROM = Provenance
.Subject = Sujet
.TextBody = texte
' .AddAttachment (PieceJointe)
.send
End With
Set Cdo_Message = Nothing
End Function

Il faut aussi vérifier que le composant windows "Services" SMTP est bien
installé.

Fred


J'ai découvert cette possibilité d'envoi il y a peu de temps. Sûr,
c'est simple et rapide, surtout s'il y a plusieurs pièces jointes.

Mais, as-tu un contrôle que ton message soit bel et bien parti ? S'il
y a un noeud dans la transmission, tu ne reçois pas de message comme
quoi l'envoi s'est échoué, non?

Actuellement, je travaille avec une solution sur la base de Winsock.
C'est peut-être un peu long avec des pièces attachées "volumineuses"
ou s'il y en a plusieurs. Par contre, du moment qu'il y a un dialog
de transmission, les erreurs d'envoi sont annoncés et tu as un
contrôle d'expédition de message.

Comment fais-tu cela avec CDO ? Cela m'intéresserais de savoir.

Bonne journée
Marcel

Avatar
watchou
merci beaucoup
<Anor> a écrit dans le message de
news:%
Bonjour,

Si tu ne veux pas monter une usine à gaz :
1 - export de la requete dans un fichier
2 - envoi mail avec méthode CDO au lieu de sendobject
(http://users.skynet.be/accesshome/ah_outlook_sendmailcdo.htm)
3 - suppression fichier

alors tu peux utiliser le petit prog suivant qui cliquera sur oui à ta
place

http://faq.outlook.free.fr/telechargement/ClickYesSetup.exe

n'empêche que 5 secondes x 93 mails, ça fait quand même 8 minutes de
moulinette...


--
Arnaud
-----------------------------------
http://users.skynet.be/mpfa/
-----------------------------------

"watchou" a écrit dans le message de news:
43285ac2$0$2309$
| Bonjour.
|
| J'utilise office 2003.
| J'ai une appli access qui doit envoyer par mail une partie précise et
| différente d'une table à 93 destinataires différents. J'utilise pour
cela la

| fonction "envoie objet" dans une macro et tout fonctionne très bien.
|
| Le probleme c'est qu'à chaque envoie de mail (il y en a 93) outlook
| m'affiche un message m'indiquant qu'une autre appli essaie d'envoyer un
mail

| et me demande confirmation. Je suis pas faignant mais cliquer 93 fois
sur OK

| ne me passionne pas des masses et me fait perdre un peu de temps.
|
| quelqu'un sait-il comment faire pour que l'envoie ce fasse sans que
OUTLOOK

| me demande confirmation ?
|
| merci d'avance.
|
| fabien
|
|




Avatar
watchou
merci. je vais voir si j'm'en sort.

"Fred" a écrit dans le message de
news:43293533$0$14387$
Moi, j'utilise une fonction toute simple :

Function EnvoiMail(Sujet As String, Provenance As String, Destination As
String, texte As String)
Dim Cdo_Message As Object
Set Cdo_Message = CreateObject("CDO.Message")
With Cdo_Message
.to = Destination
.FROM = Provenance
.Subject = Sujet
.TextBody = texte
' .AddAttachment (PieceJointe)
.send
End With
Set Cdo_Message = Nothing
End Function

Il faut aussi vérifier que le composant windows "Services" SMTP est bien
installé.

Fred
"watchou" a écrit dans le message de news:
43285ac2$0$2309$
Bonjour.

J'utilise office 2003.
J'ai une appli access qui doit envoyer par mail une partie précise et
différente d'une table à 93 destinataires différents. J'utilise pour
cela


la
fonction "envoie objet" dans une macro et tout fonctionne très bien.

Le probleme c'est qu'à chaque envoie de mail (il y en a 93) outlook
m'affiche un message m'indiquant qu'une autre appli essaie d'envoyer un
mail
et me demande confirmation. Je suis pas faignant mais cliquer 93 fois
sur


OK
ne me passionne pas des masses et me fait perdre un peu de temps.

quelqu'un sait-il comment faire pour que l'envoie ce fasse sans que
OUTLOOK
me demande confirmation ?

merci d'avance.

fabien








Avatar
pascal1967
Il faut aussi vérifier que le composant windows "Services" SMTP est bien
installé.


ce service est installé d'office avec Microsoft Outlook ou pas ?
merci