Est ce possible ?
Jacques
A mon avis, oui. Emploie le SaveToFile()
Je l'ai utilise avant le Send(), mais je ne vois pas pourquoi cela ne
marcherait pas apres le Send()
ObjMsg = CreateObject('CDO.Message')
......
=m.ObjMsg..SaveToFile('\tmp\00.eml')
Gregory
___________
"Jacques Mangold" <Jacques...@village.uunet.be> wrote in message
news:ZqWdndof6t1Up9fZ...@scarlet.biz...
> J'ai l'intention de gérer l'envoi de mails par VFP.
> J'ai bien trouvé la documentation sur AtoutFox, et le faire par CDO me
> convient.
> Sauf pour une fonction que je n'y trouve pas.
> Après envoi, je voudrais sauver (Save as) le message avec sa piéce jointe
lcStr = oMSG.getstream && Stocker le document dans une variable
lcStr.SaveToFile("c:\sgc2data\document\A000.eml",1) && Sauvegarder le
document
Et ainsi, ca marche
Un grand merci, Gregory
Jacques
"Gregory Adam" <Grego...@PleaseReplyViaNewsGroup.com> wrote in message
news:#kpOTthZ...@TK2MSFTNGP05.phx.gbl...
> Jacques,
>
> A mon avis, oui. Emploie le SaveToFile()
>
> Je l'ai utilise avant le Send(), mais je ne vois pas pourquoi cela ne
> marcherait pas apres le Send()
>
> ObjMsg = CreateObject('CDO.Message')
> ......
> =m.ObjMsg..SaveToFile('\tmp\00.eml')
>
> Gregory
> ___________
>
> "Jacques Mangold" <Jacques...@village.uunet.be> wrote in message
> news:ZqWdndof6t1Up9fZ...@scarlet.biz...
> > J'ai l'intention de gérer l'envoi de mails par VFP.
> > J'ai bien trouvé la documentation sur AtoutFox, et le faire par CDO me
> > convient.
> > Sauf pour une fonction que je n'y trouve pas.
> > Aprčs envoi, je voudrais sauver (Save as) le message avec sa piéce
Oui, GetStream() retourne un objet (ADO stream)
(1)
ObjMsgStream = ObjMsg.GetStream()
=m.ObjMsgStream.SaveToFile('....', 2)
ou (2)
=m.ObjMsg.GetStream().SaveToFile('....', 2)
voir exemple :
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/e2k3/e2k3/_cdo_imessage_getstream.asp
et
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/ado270/htm/mdobjstreampme.asp
Gregory
_____________
"Jacques Mangold" <Jacques...@village.uunet.be> wrote in message
news:jKWdnQOj28RXL9fZ...@scarlet.biz...