Bonjour, afin de tester mon ping en bat j'utilise ceci et ça marche nickel:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
PING www.google.fr -n 6 > NUL
 
IF %ERRORLEVEL% EQU 0 (calc.exe) ELSE (notepad.exe)
 
PAUSE>NUL
mais quand je tente de l'insérer dans ce code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Set oShell = CreateObject("WScript.Shell")
strHomeFolder = oShell.ExpandEnvironmentStrings("%USERPROFILE%")
 
Set lnk = oShell.CreateShortcut(strHomeFolder & "\chrome.lnk")
 
lnk.WindowStyle = 
lnk.IconLocation = 
lnk.TargetPath = "cmd.exe"
lnk.arguments = "/C PING www.google.fr -n 3 > NUL & IF %ERRORLEVEL% EQU 0 (calc.exe) ELSE (notepad.exe)"
lnk.Save
oShell.Run (strHomeFolder & "\testping.lnk")
Il ne prend pas en compte correctement ma condition, le code n'arrive pas à faire le lien avant et après le "&" je crois... il fait comme si il n'y a pas d'erreur lorsque je coupe ma connexion comment faire ?

Je vous remercie !