OVH Cloud OVH Cloud

envoie d'un mail avec process.start

7 réponses
Avatar
Chris
bonjour,
pour des raisons professionnelles je suis obligé d'envoyer des mails en
passant par le process.start car des clients possede outlook et d'autre
thunderbird... mais le plus gros inconvénients est quils desirent faire
une correction d'orthographe avant que le mail parte.

System.Diagnostics.Process.Start("mailto:" & Dest & "?subject=" & Sujet
& "&body=" & tmp & "&Att=" & strAttach.ToString)

mon probleme est que je n'arrive pas a lui lié des pieces jointes, je
lui mets Attachements=, Attachments=, Attachment=, Att=... rien à faire

qqun saurait il la bonne syntaxe??

merci

7 réponses

Avatar
Millox Frédéric
Salut Chris,

En cherchant un peu sur le net, j'ai trouvé :

--------------------------------------------------------

: Can you send an attachment with the Mailto function?

No.

: If not, how can I open
: the clients email system and add an attachment.

Use the MAPI control, CDO, or for direct-send, some of the sendmail DLLs
available.

Randy Birch
MS MVP Visual Basic

--------------------------------------------------------

Par contre, tu peux le faire avec une dll gratuite :

http://www.quiksoft.com/freesmtp/

A+

Frédéric

--
fmillox


"Chris" a écrit :

bonjour,
pour des raisons professionnelles je suis obligé d'envoyer des mails en
passant par le process.start car des clients possede outlook et d'autre
thunderbird... mais le plus gros inconvénients est quils desirent faire
une correction d'orthographe avant que le mail parte.

System.Diagnostics.Process.Start("mailto:" & Dest & "?subject=" & Sujet
& "&body=" & tmp & "&Att=" & strAttach.ToString)

mon probleme est que je n'arrive pas a lui lié des pieces jointes, je
lui mets Attachements=, Attachments=, Attachment=, Att=... rien à faire

qqun saurait il la bonne syntaxe??

merci



Avatar
Chris
Millox Frédéric a écrit :
Salut Chris,

En cherchant un peu sur le net, j'ai trouvé :

--------------------------------------------------------

: Can you send an attachment with the Mailto function?

No.

: If not, how can I open
: the clients email system and add an attachment.

Use the MAPI control, CDO, or for direct-send, some of the sendmail DLLs
available.

Randy Birch
MS MVP Visual Basic

--------------------------------------------------------

Par contre, tu peux le faire avec une dll gratuite :

http://www.quiksoft.com/freesmtp/

A+

Frédéric





le probleme de cette DLL est que c'est une copie de system.Net.mail, il
ne passe pas par outlook.

merci a+
Avatar
Sebdraluorg
Salut a tous,

exemple en vb6, si tu veux utiliser les parametres par defaut de outlook,
passe l'etape de configuration de parametres d'envoi (smtp, port, password
etc..)
C'est un exemple brut, le mieux est de faire une classe ou au moin une
fonction pour configurer, et une fonction pour envoyer

++

Dim msg
Dim Conf
Dim Config


On Error Goto Echec:

Set msg = CreateObject("CDO.Message") 'pour la configuration du message
Set Conf = CreateObject("CDO.Configuration") ' pour la configuration de
l'envoi

Set Config = Conf.Fields

' Configuration des parametres d'envoi
'(SMTP - Identification - SSL - Password - Nom Utilisateur - Adresse
messagerie)
With Config
'If Identify = False Then GoTo Anon
.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate")
= 1
.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") =
""
.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") =
"nouveau"
'Anon:
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") =
465
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") =
"SMTP.Mail.com"

.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout")
= 10
.Update
End With



With msg
Set .Configuration = Conf
.To = Dest
.From = ""
.Subject = "Objet du message"
.Textbody = body
.AddAttachment "C:My File.txt"
.Send

End With

Set msg = Nothing
Set Conf = Nothing
Set Config = Nothing

Msgbox "Message envoye"
Exit sub

Echec:
msgbox "Echec de l'envoi du message," & vbcrlf & Err.Drescription



"Chris" a écrit :

Millox Frédéric a écrit :
> Salut Chris,
>
> En cherchant un peu sur le net, j'ai trouvé :
>
> --------------------------------------------------------
>
> : Can you send an attachment with the Mailto function?
>
> No.
>
> : If not, how can I open
> : the clients email system and add an attachment.
>
> Use the MAPI control, CDO, or for direct-send, some of the sendmail DLLs
> available.
>
> Randy Birch
> MS MVP Visual Basic
>
> --------------------------------------------------------
>
> Par contre, tu peux le faire avec une dll gratuite :
>
> http://www.quiksoft.com/freesmtp/
>
> A+
>
> Frédéric
>


le probleme de cette DLL est que c'est une copie de system.Net.mail, il
ne passe pas par outlook.

merci a+



Avatar
Christian
merci je vais regarder cela pour voir si outlook s'ouvre mais le pied
serait que ce soit la messagerie par defaut qui s'ouvre et pour trouver
cela je galere un peu.

merci a+

--
http://www.correzeweb.com
http://www.localetv.com
http://cerbermail.com/?5RVJmRhSQw
Avatar
Fred
Dans : news:%,
Christian disait :
merci je vais regarder cela pour voir si outlook s'ouvre mais le pied
serait que ce soit la messagerie par defaut qui s'ouvre et pour
trouver cela je galere un peu.



Bonjour,

Il s'agit de variantes à ce que tu as trouvé toi même dès le début :
System.Net.Mail
Pour ton problème, je ne vois pas de solution.
La syntaxe mailto ne permet pas l'attachement de PJ. Pas la peine de
chercher.

Les seules solutions que j'entrevois (mais d'autres peuvent m'échapper),
c'est l'automation pour Outlook et se plonger dans le code pour TB (je
ne sais pas si l'automation est possible). Pas très pérenne à mon avis.

Ou l'envoi de séquences clavier une fois le client mail ouvert avec le
mailto pour attacher la PJ ? Pas terrible non plus.

Si les utilisateurs n'ont pas le besoin absolu de conserver ces message
dans *leur* client mail préféré, je chercherais plutôt le moyen de faire
une correction orthographique par programmation (ce serait, si j'ai bien
compris, la seule contrainte restante)
Et s'ils ont besoin de les conserver, pourquoi pas leur en envoyer un
exemplaire en copie ?


--
Fred
http://www.cerbermail.com/?3kA6ftaCvT
Avatar
Christian
oui merci pour ta vision du probleme maintenant je m'oriente vers une
correction ortho sur word puis envoie du mail par system.net.mail
--
http://www.correzeweb.com
http://www.localetv.com
http://cerbermail.com/?5RVJmRhSQw
Avatar
Christian
sinon j'ai trouvé qu'avec MAPI on pouvait mon problème est que je ne
trouve pas les references COM MAPISESSION et MAPIMESSAGE.
sauriez vous comment ce la se fait ?

merci

--
http://www.correzeweb.com
http://www.localetv.com
http://cerbermail.com/?5RVJmRhSQw