cs_MasterH
Messages postés12Date d'inscriptionmardi 16 avril 2002StatutMembreDernière intervention 4 mars 2003
-
24 juin 2002 à 19:43
wde
Messages postés9Date d'inscriptionvendredi 28 février 2003StatutMembreDernière intervention26 juillet 2008
-
3 mars 2003 à 15:54
Bonjour, j'ai besoin de votre aide pour un envoie par email. Voici mon code:
Set Mailer = CreateObject("CDONTS.NewMail")
Mailer.To = "grecsale@hotmail.com, sandrinefullin@hotmail.com"
' email du destinataire (meme avec une seule adresse ça ne fonctionne pas)
Mailer.From = "grecsale@hotmail.com"
' email de l'expediteur
Mailer.Subject = tTitre.Text
' titre du message
Mailer.Body = tMessage.Text
' corps du message
If Check1.Value = True Then
sPath = drvDossier.Path + "" + drvFichier.filename
Mailer.AttachFile sPath, drvFichier.filename
End If
Mailer.Send
' on envoie le tout
Mais voila, la ligne "Mailer.Send" provoque une erreur. "Error '429' : ActiveX component can't create object". J'ai ajouter cdonts.dll a la base de registre de Windows dans \system32\ et j'ai internet explorer4.0 et plus comme mentionné sur le site de MSDN et pourtant ça ne fontionne pas!!!!! Je désespère!! :( :(