Ajouter une option dans un raccourci

Question

Bonjour,

j'ai le raccourci gestion.lnk qui se trouve dans un dossier C:\EDF

Est-il possible de me modifier ce petit programme pour pouvoir ajouter l'option suivante:
                                       d=\edf p=date

à la fin de la ligne cible du raccourci

iSet winScriptObj = WScript.CreateObject("WScript.Shell")
linkFile = "C:\bb\gestion.lnk"
Set link = winScriptObj.CreateShortcut(linkFile)"
link.Description = "Gestion"   
link.HotKey = "CTRL+ALT+N"
link.IconLocation = "C:\bb\logo.ico"
link.WindowStyle = "1"
link.WorkingDirectory = "C:\bb\memtools\start"
link.Save

Merci pour ton aide
HBY

cs_Le Pivert · Answer

Bonjour,

voir ceci:

http://blog.ronanlefichant.fr/2020/05/create-shortcut-vbscript.html

hocss · Answer

Bonjour
Merci ta réponse rapide.
Je connais ce site, le problème, le module de ce site, m'oblige à taper la commande cible.
Mon but est de rajouter une option à la fin de ligne cible du raccourci existant sans toucher le contenu.
Cela me fait une semaine de recherche sans résultat.
Merci pour ton aide.

hocss · Answer

Cela n'est pas pratique pour l'utilisateur.
je vais encore chercher mais, si tu as une autre idée, n'hésite pas pas à m'aider.
merci pour ta sympathie.

hocss · Answer

Bonjour,
je crois que je me suis mal exprimer pour expliquer mon problème.

j'ai un raccourci modèle qui a pour nom: Gestion.lnk
Cible:  C:\MEMTOOLS\START\MOD2000.EXE /§§-50;32  
Démarrer dans: C:\MEMTOOLS\start

Je voudrais copier gestion.lnk dans GC.lnk  et rajouter à ce dernier raccourci dans la ligne cible l'option suivante:
d=c:\edf p=date

je me suis inspiré du VBS de Ronan le Fichant pour le faire, ça marche bien mais 
je ne veux pas taper la ligne link.TargetPath 

Pourrais-tu, si c'est possible, d'apporter le correctif à la ligne surlignée ci-dessous.. 

Set winScriptObj = WScript.CreateObject("WScript.Shell")
linkFile = "C:\edf\GC.lnk"
Set link = winScriptObj.CreateShortcut(linkFile)
link.TargetPath = "C:\memtools\start\mod2000.exe /§§-50;32"
link.Arguments = " d=c:\edf p=date"
link.Description = "Gestion"   
link.HotKey = "CTRL+ALT+N"
link.IconLocation = "C:\Memtools\start\mod2000.exe" ''
link.WindowStyle = "1"
link.WorkingDirectory = "C:\memtools\start"
link.Save

Merci pour ton qui me serait vraiment utile.

hocss · Answer

Bonjour
Merci pour ta réponse.
j'explique:

j'ai un raccourci qui s'appelle:  Gestion.lnk
voici ses propriétés:
Type de cible :              Application
Emplacement:             start
Cible:                             c:\memtools\start\mod2000.exe /§§-50;32
Démarrer dans:            c:\memtools\start    
Touche de raccourci:  Agrandie
Commentaire:              Raccourci modèle

Le but est de transmettre  les propriétés de Gestion.lnk vers Gc.lnk  
et de rajouter à sa ligne cible l'option suivante: D=c:\edf p=date 

on obtient:

Type de cible :              Application
Emplacement:             start
Cible:                             c:\memtools\start\mod2000.exe /§§-52;30 d=c:\edf p=date
Démarrer dans:            c:\memtools\start
Touche de raccourci:  Agrandie
Commentaire:              

mon Script fonctionne bien mais le caractère § n'est pas reconnu par certains pc et se transforme en un autre caractère et l'exécution n'est plus possible.

alors y'a t-il un moyen de lire le raccourci Gestion.lnk, de mémoriser dans une variable le contenu de sa ligne cible ensuite transmettre cette variable à la ligne cible de Gc.lnk

J'espère que suis clair maintenant:
Merci de ta patience et de vouloir m'aider
HBY

hocss · Answer

On ne se comprend pas, Merci pour ton aide.

Ajouter une option dans un raccourci

6 réponses

Votre réponse

Discussions similaires