Envoi de mail avec attachements, via mapi32
Soyez le premier à donner votre avis sur cette source.
Vue 5 183 fois - Téléchargée 856 fois
Description
Petit programme permettant d'envoyer un mail avec des attachements.
Le seul paramètre doit être le chemin complet du fichier texte listant les fichiers à attacher dans le mail.
Le seul paramètre doit être le chemin complet du fichier texte listant les fichiers à attacher dans le mail.
Source / Exemple :
//////////////////////////////////////////////////////////////////
// Voici juste le début du code intéressant.
// Vous trouverez le reste dans le fichier ZIP.
//////////////////////////////////////////////////////////////////
// Chargement de la DLL
SetErrorMode(SEM_FAILCRITICALERRORS | SEM_NOOPENFILEERRORBOX);
hInstMAPI = LoadLibrary("MAPI32.DLL");
SetErrorMode(0);
if (hInstMAPI == NULL)
return(FALSE);
// Chargement de l'adresse des fonctions
lpfnMAPILogon = (LPMAPILOGON) GetProcAddress(hInstMAPI, SZ_MAPILOGON);
if (lpfnMAPILogon == NULL)
{
FreeLibrary(hInstMAPI);
return(FALSE);
}
lpfnMAPILogoff = (LPMAPILOGOFF) GetProcAddress(hInstMAPI, SZ_MAPILOGOFF);
if (lpfnMAPILogoff == NULL)
{
FreeLibrary(hInstMAPI);
return(FALSE);
}
lpfnMAPISendDocuments = (LPMAPISENDDOCUMENTS) GetProcAddress(hInstMAPI, SZ_MAPISENDDOCUMENTS);
if (lpfnMAPISendDocuments == NULL)
{
FreeLibrary(hInstMAPI);
return(FALSE);
}
lpfnMAPISendMail = (LPMAPISENDMAIL) GetProcAddress(hInstMAPI, SZ_MAPISENDMAIL);
if (lpfnMAPISendMail == NULL)
{
FreeLibrary(hInstMAPI);
return(FALSE);
}
Codes Sources
A voir également
- Envoi de mail avec attachements, via mapi32
- Envoi de mail VB Excel via Outlook 2000 ✓ - Forum - Visual Basic 6
- Envoi de mail via lotus notes - Codes sources - Visual Basic / VB.NET (Réseau & Internet)
- Visual Basic / VB.NET : Envoi de mail via un composant com/activex - CodeS SourceS - Guide
- Visual Basic / VB.NET : Envoi de mail via iis : cdonts.dll et cdosys.dll - CodeS SourceS - Guide
- Visual Basic / VB.NET : Envoyer des mails via lotus notes - CodeS SourceS - Guide
Bien commenté, bien structuré, parfait pour le newbie qui veut comprendre les MAPI...
J'ai juste eu un pti pb avec le _unlink (voulait pas compiler grr)... rien de préoccupant.
Merci beaucoup !
-----> je suis intimement convaincu d'avoir grillé plus de synapses en lisant ce code que zidane en faisant une tête sur un corner !
gneuuuuuuh
à bobo la tête !
Bon en même temps il nous prend pas en traitre, c'est une source initié, et moi je suis un débutant ! ^^
Allez, merci pour la source, je vais continuer a potasser !
J'ai besoin de ton code mais je n'arrive pas a l'utiliser.
Voila j'ai change uniquement ces lignes :
// Liste des destinataires
msg.lpRecips = (MapiRecipDesc*)"hasanikreshnik@hotmail.com";
msg.nRecipCount = 1;
Ensuite j'appele le prog en lui donnant comme param. un fichier texte.
Merci de votre aide
Un grand merci, voici une source riche de connaissance qui ne vous donnera pas mal au crâne :-))
- Messages postés
-
1100
- Date d'inscription
- jeudi 24 avril 2003
- Statut
- Membre
- Dernière intervention
- 17 octobre 2012
7Vous 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.