IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBScript Discussion :

send mail avec vbs


Sujet :

VBScript

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Juin 2006
    Messages
    171
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 171
    Par défaut send mail avec vbs
    Bonjour,
    Quelqu'un pourrait-il au moins me mettre sur la voie pour envoyer un mail depuis un script vbs svp ? Je ne parviens pas à trouver sur le Web. J'ai trouvé des choses qui ont l'air trés bien mais avec Delphi....

  2. #2
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut
    pourrai tu préciser ton mode de connexion internet... les clients emails utilisés...

    sinon j'ai justement posté un code à tester (il marche avec ma connexion ..)

    [FAQ] Envoi de mail en SMTP, CDO

  3. #3
    Membre confirmé
    Inscrit en
    Juin 2006
    Messages
    171
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 171
    Par défaut
    en fait j'ai trouvé un script qui me fait du ménage dans un répertoire donné sur les fichiers plus vieux que x jours. A la fin je souhaite qu'il puisse envoyer un mail à l'administrateur (nous avons outlook et exchange) pour dire que c'est ok

  4. #4
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut
    essai donc le code extrait de

    [FAQ] Envoi de mail en SMTP, CDO

    sans la configuration .. (histoire d'utiliser ta config par défaut..)

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Dim oCDO
     
    Set oCDO = CreateObject("CDO.Message")
    With oCdo
       .From = "bbil@gmail.com"
      .to = "bbil@gmail.com"
      .Subject ="Essai de mail" & Now
      .TextBody ="Voici un petit message " & vbCrlf & "pour tester l'envoi de mail par CDO/VBScript"
      .Send
    End With

  5. #5
    Membre confirmé
    Inscrit en
    Juin 2006
    Messages
    171
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 171
    Par défaut
    Merci pour le bout de code. Voila ce qu'il donne :
    CDO.Message.1: The "SendUsing" configuration value is invalid.

  6. #6
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut
    voir
    http://msdn2.microsoft.com/en-US/library/ms872404.aspx


    pour Exchange c'est donc 3... ce qui devient..:


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
     
    Dim oCDO
    Set oCDO = CreateObject("CDO.Message")
     
    With oCdo
       With .Configuration.Fields ' Configuration "du
         .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 3
         .Update
        End With
      .From = "bbil@gmail.com"
      .to = "bbil@gmail.com"
      .Subject ="Essai de mail" & Now
      .TextBody ="Voici un petit message " & vbCrlf & "pour tester l'envoi de mail par CDO/VBScript"
      .Send
    End With

Discussions similaires

  1. Send Mail avec pièce jointe "fichier pdf"
    Par hous2m dans le forum Android
    Réponses: 1
    Dernier message: 12/06/2015, 08h54
  2. Envoyer un mail avec une pièce jointe en VBS
    Par nicosmash dans le forum Vos Contributions VBScript
    Réponses: 3
    Dernier message: 24/06/2014, 09h32
  3. probléme avec le send mail
    Par mickisa dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 16/11/2009, 18h01
  4. [TIdSMTP] Envoi d'un mail avec authentification ?
    Par BACUS dans le forum C++Builder
    Réponses: 4
    Dernier message: 16/06/2004, 16h18
  5. envoi de mail avec attachement de fichier
    Par GMI3 dans le forum Modules
    Réponses: 2
    Dernier message: 24/09/2003, 11h22

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo