[..] Envoyer mail

[legend]

pour envoyer un mail j'ai trouvé un sujet assés compréhensible http://www.autoitscript.fr/forum/viewto ... ail#p35457 (c le code de matwachich)
mais il y a des termes que je ne comprend pas comme serveur smtp-server, CCadress, BCCadress1
est ce que sa marche seulement pour gmail?
Merci et bonne journée

[fred39]

Bonjour,
Il faut donner comme valeur à $s_SmtpServer le seveur smtp de ton fournisseur d'accès
liste ci dessous
http://www.commentcamarche.net/faq/893- ... cipaux-fai

CCadress et BCCadress sont respectivement les champs copie conforme et copie cachée.

[legend]

Je vais utiliser gmail
mon adresse est legendary1995@gmail.com
vous pouvez me donner ce que je dois mettre dans les autres formulaires a remplir?
Merci

[bloodwolff]

Pas trop compliqué à comprendre mais essayons d'éclaircir un peu
Déjà dans ton lien ils sont très bien expliquer

@bref:cette fonction envoie un mail. ;
; @param: ;
; ; $s_SmtpServer: le serveur SMTP ()serveur mail). ;
; ; $s_FromName:le nom de l'expediteur. ;
; ; $s_FromAddress:l'adresse mail de l'expediteur. ;
; ; $s_ToAddress:l"adresse mail du destinataire ;
; ; (on peut introduire plusieur adresses en les séparant avec des virgule ). ;
; ; $s_Subject = "":le sujet du mail (vide par défaut). ;
; ; $as_Body = "":le corp du mail (vide par défaut). ;
; ; $s_AttachFiles = "":les fichier à attacher au mail (vide par défaut). ;
; ; $s_CcAddress = "": Copie carbone (vide par défaut). ;
; ; $s_BccAddress = "":(blind carbon copy en Anglais)(vide par défaut). ;
; ; $s_Username = "":le nom d'utilisateur de la boite mail (vide par défaut). ;
; ; $s_Password = "":le mot de passe pour la boite mail (vide par défaut). ;
; ; $IPPort: le port IP ( = 25 ou 465). ;
; ; $ssl: (= 0 ou 1 ). ;
; @return: (rien).

$ipport pour Gmail est obligatoirement 465 et les champs $_username et $_password sont obligatoire avec Gmail
$ssl =1 signifie que tu passe par un serveur https et 0 signifie que tu ne passe pas par un serveur https
$_ccadress et $bccadress j'ignore à quoi elles servent mais elles ne sont pas obligatoire donc tu peux mettre

Code : Tout sélectionner

_INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body, $s_AttachFiles, "", "", $s_Username, $s_Password, $IPPort, $ssl)

Sinon explique ce que tu ne comprend pas dans la description

[legend]

je ne sais pas comment le faire fonctionner, c normal puisque je ne connais pas 70% des fonctions dans le script.
sinon si vous me donner un script qui envoyera le mail de legendary1995@gmail.com a legendzz@hotmail.fr ce serais plus facile
PS : donnez moi un code complet svp (qui marche quand je le lance sans grande modification) je ferais que mettre le mot de passe ^^
merci et bonne journée

[Tlem]

Votre demande n'est pas dans le bon forum.
Je déplace.

[cutprod]

Bonsoir legend voila prêt à l'emploi : (met ton Mdp du compte gmail)

► Afficher le texte

Code : Tout sélectionner

#Include <File.au3>

$s_SmtpServer="smtp.gmail.com"
$s_FromName="legendary1995"
$s_FromAddress="legendary1995@gmail.com"
$s_ToAddress="legendzz@hotmail.fr"
$s_Subject = "test"
$as_Body = ""
$s_AttachFiles = ""
$s_CcAddress = ""
$s_BccAddress = ""
$s_Username = "legendary1995"
$s_Password = "ici tu met ton mdp"
$IPPort = 465
$ssl = 1
$s_Importance="Normal"


_INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body , $s_AttachFiles , $s_CcAddress, $s_BccAddress, $s_Importance, $s_Username, $s_Password , $IPPort , $ssl)

Func _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject = "", $as_Body = "", $s_AttachFiles = "", $s_CcAddress = "", $s_BccAddress = "", $s_Importance="Normal", $s_Username = "", $s_Password = "", $IPPort = 25, $ssl = 0)
    Local $objEmail = ObjCreate("CDO.Message")
    $objEmail.From = '"' & $s_FromName & '" <' & $s_FromAddress & '>'
    $objEmail.To = $s_ToAddress
;~     Local $i_Error = 0
;~     Local $i_Error_desciption = ""
    If $s_CcAddress <> "" Then $objEmail.Cc = $s_CcAddress
    If $s_BccAddress <> "" Then $objEmail.Bcc = $s_BccAddress
    $objEmail.Subject = $s_Subject
    If StringInStr($as_Body, "<") And StringInStr($as_Body, ">") Then
        $objEmail.HTMLBody = $as_Body
    Else
        $objEmail.Textbody = $as_Body & @CRLF
    EndIf
    If $s_AttachFiles <> "" Then
        Local $S_Files2Attach = StringSplit($s_AttachFiles, ";")
        For $x = 1 To $S_Files2Attach[0]
            $S_Files2Attach[$x] = _PathFull($S_Files2Attach[$x])
            ConsoleWrite('@@ Debug(62) : $S_Files2Attach = ' & $S_Files2Attach[$x] & @LF & '>Error code: ' & @error & @LF) ;### Debug Console
            If FileExists($S_Files2Attach[$x]) Then
                $objEmail.AddAttachment ($S_Files2Attach[$x])
            Else
                ConsoleWrite('!> File not found to attach: ' & $S_Files2Attach[$x] & @LF)
                SetError(1)
                Return 0
            EndIf
        Next
    EndIf
    $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
    $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = $s_SmtpServer
    If Number($IPPort) = 0 then $IPPort = 25
    $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = $IPPort

    ;Authenticated SMTP
    If $s_Username <> "" Then
        $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
        $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = $s_Username
        $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = $s_Password
    EndIf
    If $ssl Then
        $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
    EndIf
    ;Update settings
    $objEmail.Configuration.Fields.Update
    ; Set Email Importance
    $objEmail.Fields.Item ("urn:schemas:mailheader:Importance") = "High"
    $objEmail.Fields.Update
    ; Sent the Message
    $objEmail.Send
    $objEmail=""
EndFunc   ;==>_INetSmtpMailCom
 

[legend]

sa ne marche pas . . .
message d'erreur :
C:\Documents and Settings\Administrateur\Bureau\Nouveau AutoIt v3 Script.au3 (69) : ==> The requested action with this object has failed.:
$objEmail.Send
$objEmail.Send^ ERROR

[cutprod]

Ha non!! me dit pas ca
Je viens de faire un copier coller du code au dessus j'ai remplacer mes identifiants et l'adresse du destinataire et ca poste bien et je le reçoit bien de suite!!
Là tu as un souci peut être avec tes identifiant ou destinataire,
quelle version d'Autoit as tu?
Vérifié bien tout ca!

[legend]

g la version autoIT 3 et les 2emails marchent (le gmail c'est un nouveau mail créer pour testé le script)

[cutprod]

Y a forcement un erreur dans tes identifiants ou dans l'adresse du destinataire si tu me garantie que tu fais un copier coller du code au dessus!!

[legend]

l'erreur est ici : (ligne 70)

Code : Tout sélectionner

 ;Sent the Message
    $objEmail.Send
    $objEmail=""

je suppose que sa veut dire que sa a réussi a se connecter etc . . .
et seulement qu'il y a un erreur dans le send
(The requested action with this object has failed) => jme demande ce que sa veut dire.
normalement sa devrait pas être une faute de mot de passe ou e-mail.
sinon mon mot de passe comporte des lettres +3chiffres.
merci et bonne journée

[cutprod]

Tu as raison il n'arrive même pas a essayer d'envoyer le mail!
tu met bien l' include au début du sript et tu a bien SciTE Version 1.79 et Autoit 3.3.6.1

[legend]

j'ai téléchargé autoit de ce lien http://www.autoitscript.com/autoit3/downloads.shtml
le premier lien.
pour le scite c inclus dans la méme installation.
le fichier .au3 que j'utilise pour ce script est sur le bureau.
faut il que je met le chemin de l'include? (normalement l'include fonctionne puisqu'il y a pas d'erreur d'include.)
merci et bonne journée

[cutprod]

Essaye de télécharger =
http://www.autoitscript.com/autoit3/sci ... oads.shtml
le premier, installe le.
Réessaye les mails

[legend]

Sa marche toujours pas.
L'etape $objEmail.Send fait quoi? (c'est l'avant dérniere étape du script)
c la qu'il y a l'erreur. peut être si on comprend c'est quoi l'erreur on pourra le regler (je connais pas cette fonction ^^ jconnais seulement que Send envoie du texte )
merci et bonne journée

[cutprod]

$objEmail.Send veut dire qu'il envoi ton $obj email.
Là je peux plus rien pour toi je suis au bout de mes faibles compétences, je passe le relais a un vrai pro!!
A plus

[Jerome]

Coucou,


Essaye en rajoutant :

Code : Tout sélectionner

#include-once

au début du script, on sait jamais.


D'autres éléments de réponses ici et ici (Apparemment test avec la MAJ de l'UDF ici) .





Jérôme

[legend]

Le #include-once ne change rien.
et les codes/soluce dans les liens ne marchent pas . . .
sinon il y a pas autre moyen pour communiquer 2pc autre que l'email? (par autoit)
merci et bonne journée

[Jerome]

Re-Coucou,


Sa dépend, tes 2 postes sont connecter au même réseaux local ?
Ont ' ils les deux internet ?


Effectue une recherche de la commande Net Send sur internet, sa peut t'aider si les deux postes se voyent sur le même réseaux.


PS : Ne désespère pas pour les mails, as-tu essayer de changer l'UDF ? (mon dernier lien ?( ta vraiment mis 17 minutes pour tout test avant de dire sa :s ?))




Jérôme