Bonjour,
je tente de faire un raccourci avec des parametres, cependant je n'arrive pas à obtenir le bon resultat dans mon fichier lnk.
voici mon code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
Dim Shell, DesktopPath, URL, Dossier, oFS
Set Shell = CreateObject("WScript.Shell")
DesktopPath = Shell.SpecialFolders("Desktop")
Set URL = Shell.CreateShortcut(DesktopPath & "\monraccourci.lnk")
Set oFS = CreateObject("Scripting.FileSystemObject") 
Dossier = left(wscript.ScriptFullName,len(wscript.ScriptFullName)-len(wscript.ScriptName))
URL.IconLocation = Dossier & "icone.ico"
chemin =  """"& Dossier & "monexec.exe"" -para monparametre"
msgbox
URL.TargetPath = chemin 
URL.Save 
SET oFS = nothing
La messagebox m'affiche le bon résultat, alors que mon racourcis contient:
"C:\"C:\Documents and Settings\Administrateur\Bureau\monexec.exe" -para monparametre"
qqu'un aurait-il une solution pour obtenir:
"C:\Documents and Settings\Administrateur\Bureau\monexec.exe" -para monparametre
Merci d'avances de vos réponse.

F-k-z