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

  1. #1
    Candidat au Club
    envoyer un mail avec un piece jointe si la modification date d'aujourd'hui
    bonjour,

    j'aimerais avoir un coup de main pour pouvoir créé un script pour pouvoir envoyer un mail avec une pièce jointe si celle-ci a été modifié dans la journée. sinon il ne faut pas l'envoyer.

    je vous remercie d'avance pour votre aide.

  2. #2
    Modérateur

    Bonjour et BIENVENU sur DVP;

    Pour envoyer un mail avec pièce jointe, regarde cette [post=7970426]discussion[/post].

    Pour l'envoi du fichier du jour, il faut mettre une condition sur la date de dernière modification du fichier et ce AVANT LA LIGNE objEmail.Send, par exemple :
    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set f = fso.GetFile("C:\FichierAEnvoyer") ' mettre le chemin complet du fichier
    If Day(f.DateLastModified) <> Day(Date) Then
        MsgBox "Le fichier ne date pas d'aujoud'hui, l'envoi est annulé."
        Wscript.Quit
    End If
    Ne pas oublier le tag si satisfait.
    Voter pour toute réponse satisfaisante avec pour encourager les intervenants.
    Balises CODE indispensables. Regardez ICI
    Toujours utiliser la clause Option Explicit(VBx, VBS ou VBA) et Ne jamais typer variables et/ou fonctions en VBS.
    Vous pouvez consulter mes contributions
    Ne pas oublier de consulter les différentes FAQs et les Cours/Tutoriels VB6/VBScript
    Ne pas oublier L'Aide VBScript et MSDN VB6 Fr

  3. #3
    Candidat au Club
    Merci pour votre réponse rapide.
    Je vais essayer cela, étant pas du domaine de la programmation, je reviendrais vers vous si j'ai d'autre problème.

###raw>template_hook.ano_emploi###