Discussion :

[BorisB]

Bonjour à tous,

Je voudrai savoir quel est le code VB 2005 pour créer un raccourci (Fichier .lnk) sur le bureau par exemple ?

Merci.
Boris.

[fregolo52]

salut,

Ce lien devrait d'aider.

[BorisB]

Ok, j'ai trouvé !

Avec un mixte entre ce tu m'as donné et un autre site internet, j'ai le résultat.

Alors pour ceux que ca intéresse :

1. Dans : MyProjet, onglet Référence, cliquez sur Ajouter, onglet COM, choisissez "Windows Script Host Object Model"

2. Dans le code de votre Form, sur la première ligne ajoutez :
Imports IWshRuntimeLibrary

3. Entrez le code suivant pour insérer un raccourcis :
'Récupère le répertoire du bureau
Dim Shell = New WshShell
Dim DesktopDir As String = CType(Shell.SpecialFolders.Item("Desktop"), String)


Dim objShell = New WshShell

Dim objShortcut = objShell.CreateShortcut(DesktopDir +"\macalculette.lnk")

objShortcut.TargetPath = "c:\windows\calc.exe"

'(optional)
'objShortcut.Arguments = xxxx
'(optional) : = Un fichier icone
'objShortcut.IconLocation = xxxx

'Enregistrer le .lnk
objShortcut.Save()

[seb_cba]

Si tu fais rien de special avec ton .exe ça marche.
Mais quand il s'agit de compliquer son application,ça devient plus raide.

Dans mon appli,je regarde si il y a une mise à jour.Si je lance mon appli avec le raccourci creer par l'install,cela fonctionne.
Mais des que j'utilise mon raccourci,ça ne marche plus Erreur:"L'identite de l'application n'est pas defini".
J'ai beau chercher ,je ne trouve rien sur ce sujet.
Si tu as eu le meme problème (ou quelq'un d'autres cela m'interesse)