création raccourci souci de caractère pour le champ cible
bonjour
j'ai crée un raccourci j'ai un petit souci de caractère voici le script :
Code:
1
2
3
4
5
6
7
8
9
10
|
Dim Shell, DesktopPath, INK
Set Shell = CreateObject("WScript.Shell")
DesktopPath = Shell.SpecialFolders("Desktop")
Set Ink = Shell.CreateShortcut(DesktopPath & "\Zenon client.lnk")
Ink.TargetPath = "E:\ZENON\Zenon.exe /R=E:\ZENON\fichiers" ' <= lorsque le raccourci est crée le champ cible affiche des guillemets en début et fin : "E:\ZENON\Zenon.exe \R=E:\ZENON\fichiers"
'au lieu de
E:\ZENON\Zenon.exe /R=E:\ZENON\fichiers ' et l'antislash devant l'option R devient un slash
Ink.WorkingDirectory = "E:\ZENON"
Ink.Save |
Auriez vous une idée
Merci
