[Access] envoie d'un mail
Résolu/Fermé
dadou_82
Messages postés
44
Date d'inscription
vendredi 22 juin 2007
Statut
Membre
Dernière intervention
29 août 2007
-
26 juin 2007 à 09:17
dcanl Messages postés 2997 Date d'inscription mercredi 7 septembre 2005 Statut Contributeur Dernière intervention 3 juin 2013 - 27 juin 2007 à 08:02
dcanl Messages postés 2997 Date d'inscription mercredi 7 septembre 2005 Statut Contributeur Dernière intervention 3 juin 2013 - 27 juin 2007 à 08:02
A voir également:
- [Access] envoie d'un mail
- Creer adresse mail - Guide
- Créer un compte yahoo mail gratuit avec capacité de - Guide
- Ouvrir ma boîte mail ✓ - Forum Messagerie
- Formule de politesse mail anglais - Guide
- Cci mail - Guide
3 réponses
dcanl
Messages postés
2997
Date d'inscription
mercredi 7 septembre 2005
Statut
Contributeur
Dernière intervention
3 juin 2013
469
26 juin 2007 à 09:48
26 juin 2007 à 09:48
Salut !
Pourrais-tu coller ici le code important de l'envoi de tes mails stp ?
Surtout la récupération de la valeur de retour de la fenêtre d'alerte.
Mais je ne suis pas sûr que cela vienne de là.
Peut-être plutôt du logiciel utilisé pour envoyer le mail...
https://support.microsoft.com/fr-fr/help/287530 : voir "Erreur d'exécution '287'" dans la partie "Fonctionnalités de sécurité Outlook "
@+
Pourrais-tu coller ici le code important de l'envoi de tes mails stp ?
Surtout la récupération de la valeur de retour de la fenêtre d'alerte.
Mais je ne suis pas sûr que cela vienne de là.
Peut-être plutôt du logiciel utilisé pour envoyer le mail...
https://support.microsoft.com/fr-fr/help/287530 : voir "Erreur d'exécution '287'" dans la partie "Fonctionnalités de sécurité Outlook "
@+
dadou_82
Messages postés
44
Date d'inscription
vendredi 22 juin 2007
Statut
Membre
Dernière intervention
29 août 2007
26 juin 2007 à 10:02
26 juin 2007 à 10:02
Voici le code:
Merci pour ton aide
Set MonOutlook = CreateObject("Outlook.Application")
Set MonMessage = MonOutlook.CreateItem(0)
MonMessage.To = adrmail
DoCmd.OpenReport stDocName, acViewPreview, , "Numéro_OS = " & Me.Numéro_OS
DoCmd.OutputTo acOutputReport, "OS", acFormatSNP, "CHEMIN", False
MonMessage.Attachments.Add, " CHEMIN "
DoCmd.Close acReport, "OS", acSaveNo
MonMessage.send
Set MonOutlook = Nothing
Merci pour ton aide
dadou_82
Messages postés
44
Date d'inscription
vendredi 22 juin 2007
Statut
Membre
Dernière intervention
29 août 2007
26 juin 2007 à 10:23
26 juin 2007 à 10:23
Il suffit d'intercepter l' erreur et de définir une action appropriée.
dcanl
Messages postés
2997
Date d'inscription
mercredi 7 septembre 2005
Statut
Contributeur
Dernière intervention
3 juin 2013
469
27 juin 2007 à 08:02
27 juin 2007 à 08:02
Alors c'est réglé apparemment...
Cool !
@+
Cool !
@+