Mapi (mail plusieurs personnes et pièces jointes)

Soyez le premier à donner votre avis sur cette source.

Snippet vu 7 928 fois - Téléchargée 57 fois

Contenu du snippet

Bon alors, j'etais comme vous je voulais utiliser MAPI mais pas tres facile.
Enfin voila le code pour pouvoir envoyer plusieurs pieces jointes ainsi qu'a plusieurs expediteurs. Ce code a été teste et normalement fonctionne.

Source / Exemple :


Dim locVarI as Integer, locVarJ as Integer

MAPISession1.SignOn
With MAPIMessages1
.MsgIndex = -1
For locVarJ = 0 to NbPersonne - 1
  .RecipIndex = locVarJ
  .RecipDisplayName = "Nom de la personne"
  .RecipAddress = "Adresse de la personne"
  .MsgSubject = "Sujetb du mail"
  For locVarJ = 0 To NbPieceJointe - 1
    .AttachmentIndex = locVarJ
    .AttachmentName = "Nom du fichier"
    .AttachmentPathName = "Chemin du fichier"
  Next locVarJ
.SessionID = MAPISession1.SessionID
.Send
End With
MAPISession1.SignOff

Conclusion :


La 1er boucle "for" (locVarJ) permet de creer les personnes.
La 2eme boucle "for" (locVarI) permet de creer les pieces jointes.

RecipIndex permet d'indexer les personnes
(RecipIndex = 0 -> 1er personne etc...)
AttachmentIndex permet d'indexer les pieces jointes (AttachmentIndex = 0 -> 1er fichier etc ...)

A voir également

Ajouter un commentaire

Commentaires

comment sa marche ? faut faire quoi et a quoi sa sert ??
géant, j'ai enfin fait ce que je voulais à partir de ces sources faciles !
Salut,

J'ai l'erreur suivante : erreur à l'ouverture de la piece jointe ( il n'y a aucun probleme sur le fichier)
Merci
C'est sympa. Mais je comprend pas pourquoi il me demande le mot de passe du fichier pst.
softin
Messages postés
5
Date d'inscription
mardi 7 janvier 2003
Statut
Membre
Dernière intervention
14 août 2003
-
bonjour, c'est gentil comme exemple de code mais moi je connais pas les API et quand je copy le code dans une function il me pette une erreur de variable non déclaré sur MAPISession1.SignOn.
Quel est le type de cette variable?
Quel est le fichier a référencé dans mon projet pour que sa tourne.
Je sais que mes questions ne sont pas très glorieuses et que je passe pour un nul mais sans Doc. je rame....
Merci de m'aider
Cordialement lolo

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.