application qui scanne un document et l'envoie par mail

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : application qui scanne un document et l'envoie par mail

Jordan59100

Bonjour à tous,
Dans le cadre de mon stage, je suis chargé de réaliser une application permettant de scanner un document et ensuite de l'envoyer par mail en pièce jointe.
J'arrive a scanner sans problème et à afficher le document dans une picturebox mais je ne parviens pas à sauvegarder ce document sur le disque dur dans le but de l'envoyer par mail ensuite. Ce n'est pas l'envoi du mail qui me pose problème mais la sauvegarde du document sur le disque.
Quelq'un pourrait-il m'éclairer? :hello:

Publicité

jpcheck

Pioupiou

si tu sais gérer l'envoi de mail par la simulation d'appui de touches, tu peux utiliser le commondialog pour enregistrer ton image, il me semble, si quelqu'un peut confirmer.

Message cité 1 fois

kiki29

Voir Aide en ligne sur SavePicture
et adapter http://www.freevbcode.com/ShowCode.Asp?ID=109
pour envoi mail+piege jointe

Message édité par kiki29 le 23-06-2006 à 14:03:15

Jordan59100

jpcheck a écrit :

si tu sais gérer l'envoi de mail par la simulation d'appui de touches, tu peux utiliser le commondialog pour enregistrer ton image, il me semble, si quelqu'un peut confirmer.

Qu'est-ce que tu entends par simulation d'appui de touches? :heink:

Message cité 1 fois

jpcheck

Pioupiou

Jordan59100 a écrit :

Qu'est-ce que tu entends par simulation d'appui de touches? :heink:

pardon, il s'agit là des sendkeys

Jordan59100

Merci de t'intéresser à mon problème mais pourrais-tu m'en dire un peu plus?

jpcheck

Pioupiou

afin de gérer l'envoi automatique d'un mail (je n'ai pas à proximité le code en question, mais sur mon ordi chez moi), tu peux simuler des appuis de touches par la fonction sendkey. Cete fonction de permet de faire un envoi de mail rien qu'en raccourci clavier (ctrl N, Ctrl I, etc.) et tu peux depuis ta macro VB remplir le corps de ton mail automatiquement.
si cette méthode t'intéresse, sois patient, et je te filerai ce dont je parle durant le week end =) :sol:

Jordan59100

Ah oui, ce serait sympa de ta part

Message cité 1 fois

jpcheck

Pioupiou

Jordan59100 a écrit :

Ah oui, ce serait sympa de ta part

avec une liste d'adresse mail dans la colonne A

Code :

Private Sub CommandButton1_Click()
Dim Dest, Sujt, Msg As String
Dim RepName
RepName = "chemin_de_la_piece_jointe"
For i = 1 to 10
Dest = range("A"&i).Value
Dest = "adresse mail du destinataire"
Sujt = "sujet_du_mail"
Msg = "corps_du_mail"
Shell "C:\Program Files\Outlook Express\msimn.exe " & _
"/mailurl:mailto:" & Dest & "?subject=" & Sujt & "&Body=" & Msg & ""
SendKeys "%I" & "p" & RepName & "~" & "%s"
Next i
'ActiveWorkbook.Close
End Sub

enjoy

Jordan59100

Merci beaucoup mais par contre si la boîte mail n'est pas ouverte, le programme va planter, non?

Message cité 1 fois

Publicité

jpcheck

Pioupiou

Jordan59100 a écrit :

Merci beaucoup mais par contre si la boîte mail n'est pas ouverte, le programme va planter, non?

il n'y a pas de raison, la commande shell t'ouvre outlook express. Si jamais tu utilises thunderbird les sendkeys seront différents (commandes clavier différentes). ENfin si tu utilises outlook tout court, le nom de programme à lancer sera différent, mais à ma connaissance, les sendkeys seront les mêmes.
de rien :jap:

Jordan59100

Oui mais, si la boîte mail n'est pas ouverte, il y aura le mot de passe à saisir

Message cité 1 fois

jpcheck

Pioupiou

Jordan59100 a écrit :

Oui mais, si la boîte mail n'est pas ouverte, il y aura le mot de passe à saisir

pour le mot de passe, je n'y ai pas pensé car il me semblait logique qu'ils soient automatisés =)
je n'ai pas d'idée sur les paramètres à envoyer à ce moment là pour entre le mdp...

kiki29

de plus sur les forums US apparemment la venue de Vista sonnera le glas des SendKeys sauf via des modules externes payants

Message cité 1 fois

Jordan59100

Sacré bilou

jpcheck

Pioupiou

kiki29 a écrit :

de plus sur les forums US apparemment la venue de Vista sonnera le glas des SendKeys sauf via des modules externes payants

faute de mieux d'ici là les sendkeys me conviennent

FORUM HardWare.fr

Programmation

VB/VBA/VBS

application qui scanne un document et l'envoie par mail

Sujets relatifs
Insertion d'application dans un document html	Possibilité de modifier propriétés document Office via PHP ??
[RESOLU] Créer un document RTF avec du PHP	pop-up + Mail
convertir document word - 1 bon point a celui qui me resoud ca	Mail automatique à partir d'Access
[ASP.net] Debugger une application Web	probleme envoi mail avec php
[VBscript] Envoi de mail
Plus de sujets relatifs à : application qui scanne un document et l'envoie par mail

Page générée en 0.059 secondes