Bonjour,
j'ai quelque chose à vous proposer, peut être que c'est ce que vous recherchez:
Soient les variables suivantes:
1 2 3
| dim adresse as String
dim message as String
dim sujet as String |
* adresse contiendra la ou les adresses de courriel, par exemple "adresse1@fai.fr" + ";" + "adresse2@fai.fr"...
* sujet contiendra le sujet du courriel
* message contiendra le texte du message
L'exécution de la ligne suivante provoque le lancement de l'application déclarée comme gestionnaire de courriel sur votre ordinateur:
call ShellExecute(0&, "Open", "mailto:" + adresse + "?Subject=" + sujet + "&Body=" + message, "", "", 1)
Evidemment, il faut un programme gestionnaire de courriel, dans votre cas Lotus je crois. Sinon cela ne fonctionne pas.
En espérant que cela vous aide...
Partager