Discussion :

[Sprsrini]

Bonjour,

J'ai créé un script VBS qui doit exécuter un diskpart :

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

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
diskpart
select volume D
detail disk

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éé.

Est-ce que vous auriez une solution ?

Merci

[SfJ5Rpw8]

place toi dans une fenêtre de commande pour lancer ce script et ainsi voir le message d'erreur ...

[omen999]

sans oublier de se placer dans le répertoire où était lancé ton script

[Sprsrini]

Merci pour vos réponses.

Je me suis placé dans le chemin où est mon script et j'ai rentré ça :

Code :

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

C:\Windows\System32\diskpart.exe /s "C:\Users\toto\Mes documents\tutu\Scripts VBS\script.txt">"C:\Users\toto\Mes documents\tutu\Scripts VBS\output.txt"

C'est ce qu'est censé faire le script VBS.

Je n'ai pas d'erreur dans l'invite de commande, mais voici ce que je vois dans le fichier output.txt qu'il me retourne :

Code :

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

1
2
3
4
5
6
7
 
Microsoft DiskPart version 6.1.7600
Copyright (C) 1999-2008 Microsoft Corporation.
Sur l'ordinateur : XXXXXXXXXX
 
DiskPart n'a pas pu ouvrir un lire le fichier script.
V‚rifiez que le fichier que vous avez sp‚cifi‚ existe.

Merci

[SfJ5Rpw8]

rajoute des espaces autour du "redirecteur"
[CODE...]txt " > " C:\U..[/CODE]
pour lancer le script en ligne de commande tu saisie :

Code :

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

monscript.vbs

MonScript.vbs étant le nom de ton fichier script...

[Sprsrini]

Bonjour,

J'ai réessayé la ligne de commande

Code :

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

C:\Windows\System32\diskpart.exe /s "C:\Users\toto\Mes documents\tutu\Scripts VBS\script2.ini" > "C:\Users\toto\Mes documents\tutu\Scripts VBS\output.txt"

et il me retourne bien le fichier output.txt avec le résultat.

Par contre si je le réessaye avec le script vbs (je précise que j'exécute bien le script à partir d'un invite de commande ouvert avec les droits admin sur Win 7), ça ne marche pas. J'ai mis un MsgBox pour voir ce que me retourne la variable strDispartCmdm, et ça correspond bien à ce que je met manuellement dans un invite de commande.

J'ai rajouté un cmd /K dans la variable strDispartCmdm pour forcer l'apparition de la fenêtre. Résultat : la fenêtre s'ouvre, affiche un prompt, et rien.

Je pense qu'il y a un problème lors de l'exécution de la ligne de commande présente dans la variable.

C'est vraiment bizarre