Bonjour,
J'utilise un batch pour envoyer des mails par MailSend. J'aurais voulu les envoyer par un vbs, mais mes connaissances en vbs sont limitées.
Ci-dessous le script en batch
Puis le même en vbs, mais qui ne fonctionne pas (fin d'instruction attendue dans la dernière ligne après -f)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 @echo off SET DEST=informatique.rdc@rdc.com SET MAILSRV="smtp.rdc.com" SET DOMAIN="rdc.com" SET EXPEDITEUR="Sauvegarde_Data2@rdc.com" SET SUJET="Sauvegarde RDC-Data2" SET MSG="Ci-joint le CR de la sauvegarde du serveur RDC-Data2" SET PJ="H:\Sauvegardes\Logs\Robocopy_RDC-Data2_Erreurs.txt,text/plain" "D:\Scripts\Sauvegarde\MAILSEND.EXE" -f %EXPEDITEUR% -d %DOMAIN% -smtp %MAILSRV% -t %DEST% -sub %SUJET% -M %MSG% -a %PJ% +cc +bc
Merci d'avance pour vos conseils
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Dim Sh, vDest, vMailSrv, vDomain, vExpediteur, vSujet, vMsg, vPJ Set Sh=CreateObject("WScript.Shell") vDest="informatique.rdc@rdc.com" vMailSrv="smtp.rdc.com" vDomain="rdc.com" vExpediteur="Sauvegarde_Data2@rdc.com" vSujet="Sauvegarde RDC-Data2" vMsg="Ci-joint le CR de la sauvegarde du serveur RDC-Data2" vPJ="H:\Sauvegardes\Logs\Robocopy_RDC-Data2_Erreurs.txt,text/plain" wshell.run "D:\Scripts\Sauvegarde\MAILSEND.EXE" -f vExpediteur -d vDomain -smtp vMailSrv -t vDest -sub vSujet -M vMsg -a vPJ +cc +bc
Partager