sigmatc24
Messages postés53Date d'inscriptiondimanche 29 avril 2007StatutMembreDernière intervention22 avril 2013 16 févr. 2013 à 18:52
Merci, Programme très simple
Et Merci à xenografter aussi
matheonimbus30
Messages postés60Date d'inscriptionvendredi 19 septembre 2008StatutMembreDernière intervention11 avril 2012 8 mai 2009 à 19:21
salut tout le monde j'ai un probleme avec ce code quand je le met dans un bouton un message d'erreur s'affiche variable non definie: mapisession1
pourriez vous m'aider s.v.p ?
cs_molo molo
Messages postés55Date d'inscriptionlundi 14 novembre 2005StatutMembreDernière intervention23 juin 2008 15 juin 2007 à 18:34
En regardant rapide 2 erreurs :
Les boucles portent le même nom, et l'une d'elles n'est pas fermée :
Dim locVarI as Integer, locVarJ as Integer
MAPISession1.SignOn
With MAPIMessages1
.MsgIndex = -1
For locVarI = 0 to NbPersonne - 1
.RecipIndex = locVarI
.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
next locVarI
.SessionID = MAPISession1.SessionID
.Send
End With
MAPISession1.SignOff
Pour le reste, j'ai pas testé.
anto37_44
Messages postés48Date d'inscriptionmardi 3 avril 2007StatutMembreDernière intervention11 juin 20071 31 mai 2007 à 17:02
desole pour les admin qui vont devoir enlever un des deux messages, mais mon PC à eut un petit bug
desole
anto37_44
Messages postés48Date d'inscriptionmardi 3 avril 2007StatutMembreDernière intervention11 juin 20071 31 mai 2007 à 17:00
xenografter, ton programme est super
le seul petit problème que j'ai, c'est que je n'arrive pas à envoyer des fichiers txt.
J'arrive à envoyer tout les autres format, mais pas celui là.
çà c'est bizarre mais sinon il super cool.
si je pouvais te mettre une note, elle serait de 9/10.
A+ tout le monde
anto37_44
Messages postés48Date d'inscriptionmardi 3 avril 2007StatutMembreDernière intervention11 juin 20071 31 mai 2007 à 16:59
xenografter, ton programme est super
le seul petit problème que j'ai, c'est que je n'arrive pas à envoyer des fichiers txt.
J'arrive à envoyer tout les autres format, mais pas celui là.
çà c'est bizarre mais sinon il super cool.
si je pouvais te mettre une note, elle serait de 9/10.
A+ tout le monde
xenografter
Messages postés3Date d'inscriptionvendredi 15 septembre 2006StatutMembreDernière intervention20 février 2007 18 déc. 2006 à 20:25
Private Sub boutonmail_Click()
'^^ Sur mon projet,le code est appliqué sur un "bouton de commande" que j'ai appeller boutonmail
MAPISession1.SignOn
MAPIMessages1.MsgIndex = -1
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.RecipDisplayName = "toto@toto.fr" 'mail Destinataire
MAPIMessages1.MsgSubject = "message pour toto a lire !" 'Objet
MAPIMessages1.MsgNoteText = "slt toto, comment va tu?" 'Texte contenu du mail
MAPIMessages1.AttachmentName = "a.txt" 'nom de votre fichier
MAPIMessages1.AttachmentPathName = "C:\a.txt" 'emplacement de votre fichier
MAPIMessages1.Send
MAPISession1.SignOff
End Sub
xenografter
Messages postés3Date d'inscriptionvendredi 15 septembre 2006StatutMembreDernière intervention20 février 2007 18 déc. 2006 à 20:19
il y a un pb sur le code : la première boucle et la deuxième se nomme tout les deux appeller "locVarJ"
normal que cela fonctionne pas
même en rectifiant cette erreur je me retrouve avec une erreur type with sans with
je pige pas trop pourquoi.
pour ceux qui ne veulent pas ce casser trop la tête et qu'il veulent envoyer 1 mail a 1 personne avec un fichier joint regarder le code ci dessous.
ça fonctionne sur mon projet correctement.
j'espère qu'avec de l'experience en vb je l'ameliorerai
cs_RENAUD34
Messages postés18Date d'inscriptionlundi 17 mai 2004StatutMembreDernière intervention 4 octobre 2007 4 juil. 2006 à 10:21
A Softin, Moskito & Emap: Il faut sélectionner dans le projet le composant MAPI (msmapi32.ocx). ensuite dans un form, il faut mettre un contrôle MAPISession et un contrôle MAPIMessage
mirylou
Messages postés2Date d'inscriptionmardi 3 juin 2003StatutMembreDernière intervention13 janvier 2004 13 janv. 2004 à 22:46
J'obtiens l'erreur 32002, comment faire pour la contournée?
emap
Messages postés64Date d'inscriptionmardi 18 décembre 2001StatutMembreDernière intervention28 novembre 2008 25 juin 2003 à 16:49
ouaip, il manque la Réference... c'est laquelle?
cs_moskito
Messages postés10Date d'inscriptionlundi 3 février 2003StatutMembreDernière intervention 1 février 2007 8 févr. 2003 à 23:49
Même problème que softin... HELP !
Est-il pssible d'avoir quelques explications complémentaires ?
Merci d'avance....
softin
Messages postés5Date d'inscriptionmardi 7 janvier 2003StatutMembreDernière intervention14 août 2003 8 janv. 2003 à 00:45
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
16 févr. 2013 à 18:52
Et Merci à xenografter aussi
8 mai 2009 à 19:21
pourriez vous m'aider s.v.p ?
15 juin 2007 à 18:34
Les boucles portent le même nom, et l'une d'elles n'est pas fermée :
Dim locVarI as Integer, locVarJ as Integer
MAPISession1.SignOn
With MAPIMessages1
.MsgIndex = -1
For locVarI = 0 to NbPersonne - 1
.RecipIndex = locVarI
.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
next locVarI
.SessionID = MAPISession1.SessionID
.Send
End With
MAPISession1.SignOff
Pour le reste, j'ai pas testé.
31 mai 2007 à 17:02
desole
31 mai 2007 à 17:00
le seul petit problème que j'ai, c'est que je n'arrive pas à envoyer des fichiers txt.
J'arrive à envoyer tout les autres format, mais pas celui là.
çà c'est bizarre mais sinon il super cool.
si je pouvais te mettre une note, elle serait de 9/10.
A+ tout le monde
31 mai 2007 à 16:59
le seul petit problème que j'ai, c'est que je n'arrive pas à envoyer des fichiers txt.
J'arrive à envoyer tout les autres format, mais pas celui là.
çà c'est bizarre mais sinon il super cool.
si je pouvais te mettre une note, elle serait de 9/10.
A+ tout le monde
18 déc. 2006 à 20:25
'^^ Sur mon projet,le code est appliqué sur un "bouton de commande" que j'ai appeller boutonmail
MAPISession1.SignOn
MAPIMessages1.MsgIndex = -1
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.RecipDisplayName = "toto@toto.fr" 'mail Destinataire
MAPIMessages1.MsgSubject = "message pour toto a lire !" 'Objet
MAPIMessages1.MsgNoteText = "slt toto, comment va tu?" 'Texte contenu du mail
MAPIMessages1.AttachmentName = "a.txt" 'nom de votre fichier
MAPIMessages1.AttachmentPathName = "C:\a.txt" 'emplacement de votre fichier
MAPIMessages1.Send
MAPISession1.SignOff
End Sub
18 déc. 2006 à 20:19
normal que cela fonctionne pas
même en rectifiant cette erreur je me retrouve avec une erreur type with sans with
je pige pas trop pourquoi.
pour ceux qui ne veulent pas ce casser trop la tête et qu'il veulent envoyer 1 mail a 1 personne avec un fichier joint regarder le code ci dessous.
ça fonctionne sur mon projet correctement.
j'espère qu'avec de l'experience en vb je l'ameliorerai
4 juil. 2006 à 10:21
13 janv. 2004 à 22:46
25 juin 2003 à 16:49
8 févr. 2003 à 23:49
Est-il pssible d'avoir quelques explications complémentaires ?
Merci d'avance....
8 janv. 2003 à 00:45
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
30 oct. 2001 à 17:46
6 oct. 2001 à 12:33
J'ai l'erreur suivante : erreur à l'ouverture de la piece jointe ( il n'y a aucun probleme sur le fichier)
Merci
14 sept. 2001 à 01:17
5 sept. 2001 à 13:09