Bonjour,
J'ai créé un script VBS qui doit exécuter un diskpart :
Ce code supprime le fichier output.txt s'il existe, sinon il exécute la commande diskpart avec en variable le contenu du fichier script.ini, dont voici le contenu, et est censé me renvoyer le résultat dans le fichier output.txt.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Set oShell = WScript.CreateObject("WScript.Shell") Set oFSO = CreateObject("Scripting.FileSystemObject") strCurrentDir = oShell.CurrentDirectory strDiskpart = oShell.ExpandEnvironmentStrings("%windir%\system32") strDispartCmdm = strDiskpart & "\diskpart.exe /s " & Chr(34) & strCurrentDir & "\script.ini" & Chr(34) & ">" & Chr(34) & strCurrentDir & "\output.txt" & Chr(34) oShell.Run strDispartCmdm, 1, True
Le problème est que ça ne marche pas : il m'affiche rapidement une invite de commande et le ferme immédiatement. Le fichier output.txt n'est qu'en à lui pas créé.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3diskpart select volume D detail disk
Est-ce que vous auriez une solution ?
Merci
Partager