Bonsoir,
Le 14/03/2016 17:15, Ysabeau a écrit :
Bonjour,
Je voudrais faire un formulaire pdf avec un bouton envoi, qui envoie
les données du formulaire rempli par exemple sur une adresse courriel
ou, mieux dans une feuille type (j'ai honte mais bon) Google docs.
Comment je peux paramétrer ça ? Si c'est possible.
Merci.
J'ai ce genre de truc dans un formulaire de base de données. Ça doit
pouvoir fonctionner dans un formulaire conçu avec Writer et peut-être
fonctionner dans le PDF exporté :-)
Ça se fait au moyen d'une macro mais ce n'est peut-être pas exactement
ce que tu veux faire, la macro prépare un mail dans le courielleur par
défaut.
Enfin... si ça peut t'aider...
La macro :
Sub sendEmailClientAutoDetect( oEventEmail as object )
dim oShell as object
dim sAddressEmail as string, sSubjectEmail as string, sBodyEmail
as string
dim sEmailData as string
sAddressEmail = trim(
oEventEmail.Source.getModel.getParent.getByName( "email_address"
).Start.Text.String )
sSubjectEmail = trim(
oEventEmail.Source.getModel.getParent.getByName( "email_subject"
).Start.Text.String )
sBodyEmail = trim(
oEventEmail.Source.getModel.getParent.getByName( "email_body"
).Start.Text.String )
sEmailData =
"mailto:"+sAddressEmail+"?subject="+sSubjectEmail+"&body="+sBodyEmail
oShell = createUnoService( "com.sun.star.system.SystemShellExecute" )
oShell.execute(sEmailData, "", 0 )
End Sub
'email_adress' est le nom du champ contenant l'adresse e-mail, dans le
formulaire
La macro est déclenchée par un bouton du formulaire, sur l'évènement :
"bouton de la souris enfoncé").
Bernard
PS : Inutile de me poser des questions sur la macro, je suis ignare en
ce domaine :-)
--
Bernard Ribot
LibreOffice 5.1.1.3 / Windows 7 x86
--
Envoyez un mail à [email protected] pour savoir comment vous
désinscrire
Les archives de la liste sont disponibles à
http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne
pourront pas être supprimés
