Pour envoyer un email de facon automatique avec le composant MAPI de vb, rien de plus simple ! [voir le code suivant, nécessite un controle session (mpiSession) et message (mpiMailTo)]
Le problème vient de l'automatisation du process (alertes ...) car outlook express demande confirmation par popup avant envoi du message.
Pour l'en empêcher, éditer la clé suivante dans la base de registre, et la mettre à 0
[HKEY_CURRENT_USER\Identities\{E0517484-429C-4C5A-BC79-9CA8AEB3656D}\Software\Microsoft\Outlook Express\5.0\Mail]
"Warn on Mapi Send"=dword:00000001" ----> dword:00000000"
Source / Exemple :
.mpiSession.UserName = [login]
.mpiSession.Password = [motdepasse]
.mpiSession.SignOn
.mpiMailTo.SessionID = .mpiSession.SessionID
.mpiMailTo.Compose
.mpiMailTo.MsgIndex = -1
For idest = 0 To [NbDestinataires]- 1
.mpiMailTo.RecipIndex = idest
.mpiMailTo.RecipAddress = [@destinataire]
End If
Next
.mpiMailTo.MsgSubject = [sujet]
.mpiMailTo.MsgNoteText = [corps du message]
.mpiMailTo.AttachmentPathName = [fichier attaché]
.mpiMailTo.Send False
.mpiSession.SignOff
Conclusion :
et c'est tout !
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.