Envoi mail vbs

Travailleuuse06 Messages postés 8 Date d'inscription jeudi 22 décembre 2005 Statut Membre Dernière intervention 2 avril 2008 - 22 déc. 2005 à 10:59
kugan49 Messages postés 14 Date d'inscription mardi 16 mars 2004 Statut Membre Dernière intervention 4 décembre 2008 - 22 déc. 2005 à 11:39
Bonjour,
J'ai essayé le code suivant :

Set mail = CreateObject("CDO.Message")
mail.From = "[mailto:moi@xxxxxx.com moi@xxxxxx.com]"
mail.To = "[mailto:destinataire@xxxxxxx.com destinataire@xxxxxxx.com]"
mail.Subject = "Le message"
mail.Textbody = "Ceci est le corps du message"
mail.AddAtachment "C:\ledoc.txt
mail.Send

Mais j'ai une erreur à la ligne du send (La valeur de configuration "Send Using" est non valide).
Comment résoudre ce problème???

Merci!

3 réponses

kugan49 Messages postés 14 Date d'inscription mardi 16 mars 2004 Statut Membre Dernière intervention 4 décembre 2008
22 déc. 2005 à 11:10
Bonjour,

mail.AddAtachment "C:\ledoc.txt

il te manque le double guillemet fermant.
Si ca ne fonctionne toujours pas essaye avec des parenthèses.
0
Travailleuuse06 Messages postés 8 Date d'inscription jeudi 22 décembre 2005 Statut Membre Dernière intervention 2 avril 2008
22 déc. 2005 à 11:14
J'ai quarément enlevé la ligne du fichier joint mais j'ai la même erreur...

Set obmail = CreateObject("CDO.Message")
obmail.From = "[mailto:gsgsg@ahah.fr gsgsg@ahah.fr]"
obmail.To = "[mailto:ddgdg@ahah.fr ddgdg@ahah.fr]"
obmail.Subject = "Essai"
obmail.Textbody = "C'est un essai!!!!"
obmail.Send
0
kugan49 Messages postés 14 Date d'inscription mardi 16 mars 2004 Statut Membre Dernière intervention 4 décembre 2008
22 déc. 2005 à 11:39
Le souci vient de ton serveur virtuel :
va sur ce site http://www.faqoe.com/rep/cs.php3
0
Rejoignez-nous