Application créant raccourci sur le bureau
ricotrutt
Messages postés
2
Statut
Membre
-
jyn -
jyn -
Bonjour à tous,
je cherche à créer une application installant tout simplement un raccourci sur le bureau lorsqu'on la lance (je précise que c'est dans un cadre professionnel).
On m'a orienté vers le langage visual basic, pouvez vous me le confirmer et me dire de quel outil j'ai besoin et vers quelle fonction de VB dois je chercher ?
Merci d'avance
je cherche à créer une application installant tout simplement un raccourci sur le bureau lorsqu'on la lance (je précise que c'est dans un cadre professionnel).
On m'a orienté vers le langage visual basic, pouvez vous me le confirmer et me dire de quel outil j'ai besoin et vers quelle fonction de VB dois je chercher ?
Merci d'avance
A voir également:
- Application créant raccourci sur le bureau
- Desinstaller application sur windows - Guide
- Nommez une application d'appel vidéo ou de visioconférence - Guide
- Creer un raccourci clavier - Guide
- Raccourci changement de bureau - Guide
- Comment supprimer une application préinstallée sur android - Guide
3 réponses
Salut,
Pour la création de raccourcis tu peux utiliser l'interface IShellLink
Plus de détails :
https://docs.microsoft.com/en-us/
bonne chance
Pour la création de raccourcis tu peux utiliser l'interface IShellLink
Plus de détails :
https://docs.microsoft.com/en-us/
bonne chance
Merci pour cette réponse.
sur un autre forum j'ai trouvé ce morceau de code qui semble convenir :
Le simple problème est que je ne sais pas comment l'utiliser. D'après ce que j'ai compris, je dois l'enregistrer en .vbs avec un éditeur de script et le convertir en .exe grâce à un convertisseur vbs to exe.
Pouvez vous me confirmer cela ?
sur un autre forum j'ai trouvé ce morceau de code qui semble convenir :
Dim Wsh As New WshShell
DesktopPath = Wsh.SpecialFolders("Desktop")
Set Shortcut = Wsh.CreateShortcut(DesktopPath & "\Test.lnk")
With Shortcut
.TargetPath = App.EXEName
.Description = "Mon Programme"
.WindowStyle = 4
.Save
End With
Le simple problème est que je ne sais pas comment l'utiliser. D'après ce que j'ai compris, je dois l'enregistrer en .vbs avec un éditeur de script et le convertir en .exe grâce à un convertisseur vbs to exe.
Pouvez vous me confirmer cela ?
Salut,
Voici un code testé :
'--------------------------------------------------------
'|
'| pour Déterminer le répertoire du bureau
'|
'--------------------------------------------------------
Set WshShell = CreateObject("WScript.Shell")
strDesktopPath = WshShell.SpecialFolders("Desktop")
'--------------------------------------------------------
'|
'| pour Création du lien sur le bureau du programme Bloc-notes(NotePad)
'|
'--------------------------------------------------------
Set objShortcutLnk = WshShell.CreateShortcut(strDesktopPath & "\Test.lnk")
objShortcutLnk.TargetPath = "notepad"
objShortcutLnk.Save
Bonne chance.
Voici un code testé :
'--------------------------------------------------------
'|
'| pour Déterminer le répertoire du bureau
'|
'--------------------------------------------------------
Set WshShell = CreateObject("WScript.Shell")
strDesktopPath = WshShell.SpecialFolders("Desktop")
'--------------------------------------------------------
'|
'| pour Création du lien sur le bureau du programme Bloc-notes(NotePad)
'|
'--------------------------------------------------------
Set objShortcutLnk = WshShell.CreateShortcut(strDesktopPath & "\Test.lnk")
objShortcutLnk.TargetPath = "notepad"
objShortcutLnk.Save
Bonne chance.
