Re: [fr-users] Formulaire pdf : propriétés des boutons

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 à users+unsubscribe@fr.libreoffice.org 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