> Tous les forums > Forum Bureautique
 Envoie Mail avec piece jointe ACCESS 2007Sujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
marsutof
  Posté le 30/11/2011 @ 12:45 
Aller en bas de la page 

Bonjour à tous !

Je suis en stage et j'ai besoin d'un coup de main sur ACCESS.

Je souhaite créer un formulaire avec un bouton "envoyer" qui me permet d'envoyer un mail directement d'ACCESS avec la pièce jointe de la fiche.

Ca devrait ressemenbler à :

Nom : "nom du client"

Prénom : "prénom du client"

Adresses : "suite logique"

Code postale : "idem"

Ville : "idem"

Mail : "mail du contact"

Piece jointe: "photo sur le pc"

bouton : "envoyer"

L'idée est que lorsque l'on rentre les informations du client, avec la photo associé, je clique sur le bouton et celui-ci envoie le mail selon l'adresse du champ "mail" avec la pièce jointe du champ "pièce jointe".

Quelqu'un pourrait il me donner l'ensemble de la marche à suivre sachant que je travail sur OFFICE 2007 (OUTLOOK et ACCESS)

Merci d'avance

Cette demande est assez urgente donc merci de toutes les aides !

A bientôt

Publicité
qmike549
 Posté le 30/11/2011 à 12:56 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

marsutof
 Posté le 30/11/2011 à 13:08 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

Merci de cette réponse mais je suis vraiment novice et là je sais toujours pas faire. encore un coup de main détailler selon ma demande s'il vous plait

marsutof
 Posté le 30/11/2011 à 18:11 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

Bonsoir,

Navré je vais être un chiant mais je n'y arrive pas, je dois être bête mais là rien de ce que tu m'as donné m'aide, soit je sais pas m'en servir soit y autre chose.

Pourrai-je avoir d'avantage de précision sur la marche à suivre s'il vous plait.

Merci d'avance

qmike549
 Posté le 30/11/2011 à 19:17 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

bonjour

Il serait interessant que tu nous dise où cela peche

Qu'as tu fait pour t'en sortir

Quel est le problème

As tu commencé à créer quelque chose

marsutof
 Posté le 30/11/2011 à 19:57 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

RE

Vu que j'ai pas pu sur ce forum vous montrer mon imprime écran voici un lien vers un autre pour le montrer:

http://www.clubic.com/profil/photo-imprime-ecran-38162.html

Merci encore pour le coup de main

marsutof
 Posté le 30/11/2011 à 20:01 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

Pardon,

Oui j'ai fait des essaies, j'ai essaie de copier dans un module les différents code, puis essaié un bouton avec clic dont j'y ai inséré un code. Mais rien ne fonctionne j'ai toujours des erreurs que je comprends pas forcément car je comprends pas forcément non plus les tutos et comment m'en servir.

Voilà pourquoi je demande une méga aide car novice est peu dire pour moi.

Merci encore

marsutof
 Posté le 01/12/2011 à 14:41 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

Y a personne qui est apte à pouvoir m'aider???

Allez svp, j'ai vraiment besoin que ça fonctionne

{#}

qmike549
 Posté le 01/12/2011 à 14:53 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

bonjour

Le lien donné affiche ton formulaire mais ne donne pas le code que tu as construit pour envoyer ce mail

Publicité
marsutof
 Posté le 02/12/2011 à 19:55 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

Bonjour,

J'ai donc essayé cette façon:

Mode création, j'ai appuyé sur le bouton XXX pour faire un bouton, je l'ai placé sur mon formulaire, sur l'assistance j'ai fait annulé, puis clic sur ce bouton, feuille de propriété, évènement, ligne "sur clic" et là les 3 petits points, ouverture de visual basic donc j'ai écris ce code:

Private Sub Commande27_Click()
OBJET_SEND = PlainText(OBJET.Value)

'OBJET_SEND = OBJET.Value

Dim gen_Email As Outlook.MailItem
Dim ex_OutLook As Outlook.Application

Set ex_OutLook = New Outlook.Application
Set gen_Email = appOutLook.CreateItem(olMailItem)

gen_Email .To = Adresse_mail.Value
gen_Email .Subject = Nom.Value
gen_Email .Body = Photos.Value



gen_Email .Send


Set gen_Email = Nothing

Set ex_OutLook = Nothing
End Sub

Bien sur j'y comprend pas grand chose du coup c'est un peu du copier coller du deuxième lien donné ci-dessus.

Le problème maintenant (hors mis le fait que je sache pas si c'est ce qu'il fallait faire), lorsque je clique sur mon bouton (mode affichage) il me r'ouvre visual basic avec une erreur sur la ligne "...gen_email .to = adresse_mail.value

Voila, merci de m'aider et s'il vous plait essayé de me donner toutes la démarche à suivre pour que je puisse obtenir le résultat souhaité.

Merci encore

marsutof
 Posté le 03/12/2011 à 07:00 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

ok merci je vais essayé ce matin et je donne l'info qui suivera !

marsutof
 Posté le 03/12/2011 à 09:17 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

Bonjour,

Voila les news, malgré l'enlèvement des espaces, rien n'y fait, donc en re-re-re-re fouillant sur internet je suis tomber sur un code que j'ai essayé et là j'ai un nouveau message lorsque je clic sur mon bouton du style "une erreur a été produite: propriété ou méthode non gérée par cet objet".

Là je me dis que je suis pas loin du résultat donc j'ai encore besoin d'un coup de main car je comprend pas l'erreur. Voici le code correspondant à mon formulaire et mon bouton:

Private Sub cmd_EnvoiMail_Click()
On Error GoTo Err_cmd_EnvoiMail_Click
Dim mess_body As String
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)

With MailOutLook
.BodyFormat = olFormatRichText
.To = Me.Adresse_mail
.Subject = Me.Nom
.HTMLBody = Me.Prénom
If Left(Me.Photos, 1) <> "<" Then
.Attachments.Add (Me.Photos)
End If
.Send
End With

Exit Sub
Err_cmd_EnvoiMail_Click:
MsgBox "Une erreur a été produite." & vbCrLf & "Le message d'erreur est: " & Err.Description
Resume Erreur_Non
Erreur_Non:
End Sub

Merci

marsutof
 Posté le 05/12/2011 à 00:56 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

Ca y est {#} c'est ok, pour tous ceux que ça intéresse, le dernier code que j'ai écris fonctionne très bien après la modif suivante: il fallait que mon champs "attachments.add (Me.photos) ne soit plus en piece jointe et plutot en format texte avec le chemin d'acces exacte du fichier à envoyer.

En tous cas un grand merci pour votre aide !!!

Bye {#}

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
67,15 €Switch Netgear Gigabit GS308P 8 ports avec 4 ports PoE à 67,15 €
Valable jusqu'au 22 Octobre

Amazon fait une promotion sur le switch Netgear GS308P 8 ports 10/100/1000 qui passe à 67,15 € livré gratuitement. On le trouve habituellement à plus de 89 €. 4 ports PoE permettent de connecter et d’alimenter directement des périphériques comme des caméras IP, des téléphones IP et des points d’accès Wifi.


> Voir l'offre
989,31 €Tablette Apple iPad Pro 2021 (12.9 pouces, M1 WiFi, 128 Go) à 989,31 € livrée
Valable jusqu'au 22 Octobre

Amazon Italie fait une belle promotion sur Rakuten sur l'iPad Pro 2021 qui passe à 982,62 € (avec la TVA ajustée). Comptez 6,69 € pour la livraison en France soit un total de 989,31 € livrée alors qu'on le trouve ailleurs à partir de 1219 €. L'iPad Pro 12,9 offre des performances à couper le souffle avec l'intégration de la puce Apple M1. Il est équipé d'un écran Liquid Retina XDR immersif de 12,9 pouces idéal pour visionner photos, vidéos HDR et réaliser des montages simplement. L'appareil photo principal intègre trois capteurs, dont un capteur LIDAR pour des expériences inédites avec la réalité augmentée. Le capteur frontal inclut la fonctionnalité "cadre centré" pour des appels vidéo dynamiques. L'iPad Pro est doté d'un port Thunderbolt / USB 4 pour une connectivité à hautes performances.

Vous pouvez utiliser votre compte Amazon FR sur Amazon IT. Pas de douane, tablette en français et garantie européenne.


> Voir l'offre
GratuitUn livre audio offert sur Amazon.fr
Valable jusqu'au 31 Décembre

En vous inscrivant à l'offre d'essai gratuite du service de livres audio Audible (qui appartient à Amazon) vous pourrez télécharger gratuitement un livre audio. L'abonnement passe ensuite à 9,95 € / mois après ce mois d'essai. Notez que l'offre est résiliable à tout moment et facilement et ce, même avant la fin de l'essai gratuit. Les membres Amazon Prime bénéficient de 2 mois gratuits (2 livres audio offerts).

Vous pouvez prendre n'importe quel livre audio parmi une large sélection de 500 000 titres, peu importe sa durée ou son prix. Vous pourrez télécharger et d'écouter (même hors connexion) vos livres via l'application Audible ou directivement via le site.

Vous n'avez pas le temps de lire ? Avec Audible, écoutez vos livres en voiture, en marchant, en faisant du sport, ...


> Voir l'offre

Sujets relatifs
Impossible envoi de piece jointe avec un mail
outlook 2007 probleme avec piece jointe
Access 2007 Liste déroulante avec case à cocher
[Outlook 2007] Rechercher un titre de pièce jointe
Tri avec Access 2007
Problème avec Access 2007
Piece jointe avec eudora5
Mail delivery system avec Outlook 2007
Publipostage courriel avec une pièce jointe...
Envoyer un fichier par mail en pièce jointe
Plus de sujets relatifs à Envoie Mail avec piece jointe ACCESS 2007
 > Tous les forums > Forum Bureautique