bonjour
j'ai crée un raccourci j'ai un petit souci de caractère voici le script :
Auriez vous une idée
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
Merci
Partager