Call *.vbs et choisir le MsgBox désiré
Résolu/Fermé
Henreck
Messages postés
9
Date d'inscription
lundi 4 mars 2019
Statut
Membre
Dernière intervention
16 mars 2019
-
15 mars 2019 à 19:15
Henreck Messages postés 9 Date d'inscription lundi 4 mars 2019 Statut Membre Dernière intervention 16 mars 2019 - 16 mars 2019 à 19:42
Henreck Messages postés 9 Date d'inscription lundi 4 mars 2019 Statut Membre Dernière intervention 16 mars 2019 - 16 mars 2019 à 19:42
A voir également:
- Batch msgbox
- Fichier batch - Guide
- Input batch - Forum Autoit / batch
- Extension batch - Forum Windows
- Batch net use - Forum Réseau
- Batch renommer une partie du nom de plusieurs fichiers - Guide
2 réponses
yg_be
Messages postés
23235
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
30 septembre 2024
Ambassadeur
1 538
16 mars 2019 à 17:51
16 mars 2019 à 17:51
voici un exemple de script vbs
si tu l'appelles "alerte.vbs", tu peux l’appeler ainsi:
ou
action = WScript.Arguments.Named("a") select case action case "nok": MsgBox "Un problème est survenu lors de la sauvegarde du Lecteur !", 48, "SaveDrive.exe" case "ok": MsgBox "La sauvegarde du Lecteur a réussi.", 64, "SaveDrive.exe" end select
si tu l'appelles "alerte.vbs", tu peux l’appeler ainsi:
call alerte /a:ok
ou
call alerte /a:nok
yg_be
Messages postés
23235
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
30 septembre 2024
Ambassadeur
1 538
16 mars 2019 à 09:55
16 mars 2019 à 09:55
bonjour,
tu peux faire un script vbs qui reçoit un paramètre et utilise ce paramètre pour décider que faire.
ou qui reçoit en paramètre le message à afficher.
tu peux faire un script vbs qui reçoit un paramètre et utilise ce paramètre pour décider que faire.
ou qui reçoit en paramètre le message à afficher.
Henreck
Messages postés
9
Date d'inscription
lundi 4 mars 2019
Statut
Membre
Dernière intervention
16 mars 2019
16 mars 2019 à 13:23
16 mars 2019 à 13:23
Justement, c'est quelque chose que je suppose être possible, mais que je n'arrives pas à faire car je ne maîtrise pas assez le vbs. C'est pour ça que je demande de l'aide :)
yg_be
Messages postés
23235
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
30 septembre 2024
1 538
>
Henreck
Messages postés
9
Date d'inscription
lundi 4 mars 2019
Statut
Membre
Dernière intervention
16 mars 2019
16 mars 2019 à 14:29
16 mars 2019 à 14:29
difficile d'être plus précis avec les informations partagées.
Henreck
Messages postés
9
Date d'inscription
lundi 4 mars 2019
Statut
Membre
Dernière intervention
16 mars 2019
16 mars 2019 à 15:08
16 mars 2019 à 15:08
Pas de problème.
J'ai ce script SaveDrive.bat:
Et j'ai ces deux scripts vbs - error & complete:
Ce que je veux faire c'est regrouper ces deux instructions en un fichier vbs par exemple:
Par contre je ne sais pas comment faire en sorte que mon scripts.vbs puisse faire ça
J'ai ce script SaveDrive.bat:
:: [Save Actual Drive] Last edit March 16th 2019, by Henreck
:: %b2eincfilepath% is the environment variable to retrieve the location where
:: the embeded items will be extracted
@Echo off
SetLocal EnableExtensions EnableDelayedExpansion
IF Exist "#" (Set b2eincfilepath=%cd%\src)
FOR /F %%A IN ('wmic os get localdatetime ^| FINDSTR [0-9]') DO Set date=%%A
Set time=%date:~0,4%-%date:~4,2%-%date:~6,2% %time:~0,2%H%time:~3,2%
FOR /F "tokens=1-5*" %%A in ('vol') do ( Set vol=%%F & Goto SaveDrive)
:SaveDrive
Set drive=%vol:~0,1%:\
Set name= %vol:~12,32%
Call "%b2eincfilepath%\7Zip\7za.exe" a "D:\USB_BCK\(%name%) %time%.zip" "%drive%"
IF Exist "D:\USB_BCK\(%name%) %time%.zip" (
Call "%b2eincfilepath%\complete.vbs"
Goto EOF
) Else (
Call "%b2eincfilepath%\error.vbs"
Goto EOF
)
Et j'ai ces deux scripts vbs - error & complete:
MsgBox "Un problème est survenu lors de la sauvegarde du Lecteur !", 48, "SaveDrive.exe"
MsgBox "La sauvegarde du Lecteur a réussi.", 64, "SaveDrive.exe"
Ce que je veux faire c'est regrouper ces deux instructions en un fichier vbs par exemple:
'Si la variable x appeler du fichier SaveDrive.bat est vrai, interpréter la ligne ci-dessous
MsgBox "Un problème est survenu lors de la sauvegarde du Lecteur !", 48, "SaveDrive.exe"
'SI la variable y appeler du fichier SaveDrive.bat est vrai, interpréter la ligne ci-dessous
MsgBox "La sauvegarde du Lecteur a réussi.", 64, "SaveDrive.exe"
Par contre je ne sais pas comment faire en sorte que mon scripts.vbs puisse faire ça
16 mars 2019 à 19:42