Discussion :

[Toulousaing]

Yo,
Soit le .cmd suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
set acopier="C:\Users\Didier\Documents"
set bckpath="G:\BACKUP_DATA_2019"
set log="c:\Robocopy\log_backup_data_2019_St_Jean.txt"
robocopy %acopier% %bckpath% /mir /np /R:1 /W:5 /log:%log%
cscript/nologo sendmail_backup_St_Jean.vbs
echo Done.

Quand je le lance à la mimine depuis une "fenêtre DOS" (oui, je suis de l'ancienne école) le sendmail fonctionne parfaitement, mais quand j'inclus la tâche dans une planification, le backup se fait et le .cmd se termine, mais je n'ai pas le mail. Une lecture attentive des fichiers de journalisation d'erreurs ne dit rien.
Des idées, anyone, svp ?
Merci.
A++

__
W10 Pro

[Jipété]

le sendmail fonctionne parfaitement, mais quand j'inclus la tâche dans une planification, le backup se fait et le .cmd se termine, mais je n'ai pas le mail.

Ce n'est pas le sendmail qui fonctionne parfaitement, c'est le .vbs dont une partie du nom comporte les lettres "sendmail", nuance.
Faudrait voir ce qu'il y a dans le .vbs.

Une lecture attentive des fichiers de journalisation d'erreurs ne dit rien.

Tu as le droit de rajouter des lignes dans ton .cmd et/ou ton .vbs pour voir ce qui se passe, avec des echo ou similaire.

[Toulousaing]

Yo,
J'ai trouvé. Contrairement à XP qui utilise le répertoire par défaut où se trouve le script pour l'exécuter (ce backup tournait parfaitement depuis des années sur mon ancienne machine), W10 ne le fait pas. Donc, j'ai ajouté le chemin complet du script sendmail dans le cmd et ça remarche.
Merci.
A++

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
With CreateObject("CDO.Message")
.From="didier.morandi@gmail.com"
.To="didier.morandi@gmail.com"
.Subject="backup CLIENT1 terminé"
.TextBody="See c:\robocopy\log_backup_data_2019_St_Jean.txt"
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.bbox.fr"
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
.Configuration.Fields.Update
On Error Resume Next
.Send
If Err Then MsgBox "Le message n'a pas pu être expédié."
On Error GoTo 0
End With