Bouton qui envoi les données d'un formulaire par mail

Résolu
Christian-74 Messages postés 79 Date d'inscription   Statut Membre Dernière intervention   -  
ensascience Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Voilà,

J'ai un formulaire de données client avec les info suivantes :

"nom, prénom, login, mot de pass et lien avec un site"

Je ne sais pas comment faire, à partir de se formulaire, pour envoyer les données par le biais d'un mail.

En résumé, j'ai un bouton qui est spécifique à chaque client, ce bouton m'ouvre une page "mail" et dans ce mail il y a toutes les infos citées ci-dessus.

Amicalement.

A voir également:

1 réponse

le meruvien Messages postés 1130 Date d'inscription   Statut Membre Dernière intervention   40
 
Salut christian,

Voila la méthode que j'utilise et qui marche bien!
1)Tout d'abord, tu fait un état qui affiche les données du formulaire que tu veut envoyer,
2)- Dans ton formulaire, tu met un bouton "envoyer", et sur clic de ce bouton, tu met dans la procédure:
DoCmd.OpenReport "programmation", acPreview ', "", "[affaire]=[Forms]![fiche de proposition].[affaire]"
DoCmd.SendObject acReport, "programmation", "SnapshotFormat(*.snp)"
'' bien sur là j'envoye en format SNP, mais tu peut mettre autre chose!
'DoCmd.SendObject acReport, "programmation", "SnapshotFormat(*.snp)"


Dans les parametre de sendobject, tu peut aussi mettre ce qui suit, car sans param, la boite d'envoie va s'ouvrir, comme un courrier normal, mais avec des param; tu peut faire un envoie automatique, soit en fixant le destinataire si c'est toujours le meme, soit en le selectionnant dans un form!
, destinataire, cc, cci, message, "", "", "" 'si ce param est nul, ouverture de la boite outlook



DoCmd.Close acReport, "programmation"
0
castours Messages postés 2955 Date d'inscription   Statut Membre Dernière intervention   217
 
bonjour le meruvien
Je suis a la recherche d'une procedure pour envoyer des devis et factures a des clients par email.Avec l'aide d'access j'ai fait cette procedure qui, lorsque je clique sur le bouton m'envoie toute la liste de devis. Je voudrai envoyer seulement celui qui en cours sur le formulaire.
Merci de ton aide.
Private Sub Commande46_Click()
On Error GoTo Err_Commande46_Click

Dim stDocName As String

stDocName = "E_Factures"
DoCmd.SendObject acReport, acNext, stDocName, acNormal


Exit_Commande46_Click:
Exit Sub

Err_Commande46_Click:
MsgBox Err.Description
Resume Exit_Commande46_Click

End Sub
0
castours Messages postés 2955 Date d'inscription   Statut Membre Dernière intervention   217
 
Dans ma procedure , il n'y a pas acNext
0
ensascience Messages postés 1 Date d'inscription   Statut Membre Dernière intervention  
 
Salut,
et si je veux envoyer les donnees sous forme de excel ou d une table acccess et je remarque que ds votre code il a aucune indication de l'adresse du destinataire
0