Création d'un raccourci avec icone grâce à un Vbs ou un batch [Résolu]

Signaler
Messages postés
12
Date d'inscription
lundi 6 avril 2020
Statut
Membre
Dernière intervention
10 mai 2020
-
Messages postés
12
Date d'inscription
lundi 6 avril 2020
Statut
Membre
Dernière intervention
10 mai 2020
-
Bonjour, je cherche a faire apparaitre un raccourci sur le bureau grâce à un Vbs ou un batch. J'ai déjà fait mes recherches mais elles n'ont pas abouties.
Pourriez vous me faire le script avec cela :

Dim Shell, DesktopPath, INK 

Set Shell = CreateObject("WScript.Shell") 

DesktopPath = Shell.SpecialFolders("Desktop") 

Set Ink = Shell.CreateShortcut(DesktopPath & "\Google Chrome.lnk") 

Ink.TargetPath = "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe" 

Ink.Save 


mais avec cette icone : "C:\Users\xxxxx\OneDrive\Documents\clé USB de yyyyy\Clé USB de zzzzzz ne pas toucher !\divers\téléchargement.ico"

Et qui ouvre : "C:\Users\xxxxx\OneDrive\Documents\clé USB de yyyyy\Clé USB de zzzzzz ne pas toucher !\divers\!.txt"

Et enfin avec le nom de : "?"

Merci !

1 réponse

Messages postés
12
Date d'inscription
lundi 6 avril 2020
Statut
Membre
Dernière intervention
10 mai 2020

J'ai trouvé il suffit de le pointer vers un autre qui lui a une icône et qui ouvre ce que l’on veut