J'enchaîne sur un autre problème.
Mes fichiers jpg crées par CopyPicture (voir fil précédent) sont envoyés
automatiquement par mail via la sub suivante.
Seulement, quand je suis en itinérance, (ou en wifi au macDo,) cad non
conecté à mon FAI, je ne parviens pas à envoyer les messages...
Une idée ??
Merci
Eric
> Sub SendMail(TheNom, TheEmail, TheEnvoi)
> Dim objMessage, Rcpt
> Rcpt = Chr(34) & TheNom & Chr(34) & "<" & TheEmail & ">"
> With CreateObject("CDO.Message")
> .From="mon adresse@aa.com"
> .To=Rcpt
> .Subject="sujet"
> .AddAttachment("mon chemin\mon fichier.jpg")
> .Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
> .Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "MON FAI SMTP SERVER"
> .Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
> .Configuration.Fields.Update
>
> On Error Resume Next
> .Send
> End With
>
> End sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
| .Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "MON FAI SMTP SERVER"
Le serveur SMTP de ton ordi. et celui de McDo n'est pas le même! C'est ce pour quoi la procédure ne fonctionne pas. D'ailleurs il n'est pas dit si celui de McDo est configuré de toute manière.
MichD -------------------------------------------- "Eric C" a écrit dans le message de groupe de discussion : 4d73cbf8$0$14254$
J'enchaîne sur un autre problème. Mes fichiers jpg crées par CopyPicture (voir fil précédent) sont envoyés automatiquement par mail via la sub suivante.
Seulement, quand je suis en itinérance, (ou en wifi au macDo,) cad non conecté à mon FAI, je ne parviens pas à envoyer les messages...
| .Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "MON FAI SMTP SERVER"
Le serveur SMTP de ton ordi. et celui de McDo n'est pas le même!
C'est ce pour quoi la procédure ne fonctionne pas. D'ailleurs il n'est
pas dit si celui de McDo est configuré de toute manière.
MichD
--------------------------------------------
"Eric C" a écrit dans le message de groupe de discussion : 4d73cbf8$0$14254$ba620e4c@news.skynet.be...
J'enchaîne sur un autre problème.
Mes fichiers jpg crées par CopyPicture (voir fil précédent) sont envoyés
automatiquement par mail via la sub suivante.
Seulement, quand je suis en itinérance, (ou en wifi au macDo,) cad non
conecté à mon FAI, je ne parviens pas à envoyer les messages...
| .Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "MON FAI SMTP SERVER"
Le serveur SMTP de ton ordi. et celui de McDo n'est pas le même! C'est ce pour quoi la procédure ne fonctionne pas. D'ailleurs il n'est pas dit si celui de McDo est configuré de toute manière.
MichD -------------------------------------------- "Eric C" a écrit dans le message de groupe de discussion : 4d73cbf8$0$14254$
J'enchaîne sur un autre problème. Mes fichiers jpg crées par CopyPicture (voir fil précédent) sont envoyés automatiquement par mail via la sub suivante.
Seulement, quand je suis en itinérance, (ou en wifi au macDo,) cad non conecté à mon FAI, je ne parviens pas à envoyer les messages...