Bonsoir, Jean Sympa a écrit : > Bonjour à toutes et à tous, > Base Adresses mèl > Je saisis des adresses mèl dans Base. > Que faut-il faire pour qu'en cliquant sur une de ces adresses, > on ouvre Thunderbird, prêt à saisir et à envoyer un message. > Est-ce possible? > Comment? > Avec mes remerciements > Cordialement > Papy
1) créer une macro de lancement du client de messagerie Sub sendEmailClient( oEvent as object ) dim sAddressEmail as string sAddressEmail = oEvent.Source.Text shell( "thunderbird", 2 , "mailto:"; + sAddressEmail ) End Sub 2) modifier les propriétés du champ "email" dans le formulaire - clic-droit sur le champ et "contrôles" - onglet "évènements" - en regard de l'évènement "bouton de souris enfoncé" cliquer sur le bouton [...] (petits points) - assigner une macro - rechercher la macro "sendEmailClient" et valider le tout. Sauvegarder le formulaire et la base. Lors de l'emploi du formulaire un simple clic sur le champ "email" ouvrira le client de messagerie avec comme destinataire l'adresse issue de la base. NB : - je travail sous Linux et n'ai pas testé sous Ms-Windows - il faudra éventuellement modifier le nom du client ici "thunderbird" Bonne chance Francois Gatto --------------------------------------------------------------------- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected]
