Les Snippets

Connexion

Créer le raccourci de l'application sur le bureau

Niveau requis pour utiliser/comprendre cette source : 1 ( Débutant )
Créé le 04/03/2007 21:26:40 et initié par mortalino [Liste]
Date de mise à jour : 26/04/2008 17:40:25
Vue : 14165
Catégorie(s) : Fichier / Disque, Trucs & Astuces, Divers
Langages dispo pour ce code :
- VB6
- Javascript
- C# 1.x, C# 2.x
- Windev
- Delphi 5
- VB 2005
- VBA
- Voir tous les langages pour ce code snippet



Langage : VBA
Date ajout : 21/04/2008
Posté par Le Pivert [Liste]
DateMAJ : 26/04/2008
'utilise Windows Scripting Host Model
'autres propriétés accessibles:
'    oShellLink.Hotkey (ex : = "CTRL+SHIFT+F")
'    oShellLink.IconLocation (ex : = "notepad.exe, 0")
'    oShellLink.Description (ex = "Raccourci classeur Excel") '    oShellLink.WorkingDirectory (ex = strDesktop) Sub CreerRaccourci(CheminCible)     Set WSHShell = CreateObject("WScript.Shell")     strDesktop = WSHShell.SpecialFolders("Desktop")     Set oShellLink = WSHShell.CreateShortcut(strDesktop & "\ Raccourci classeur Excel.lnk")     oShellLink.TargetPath = CheminCible     oShellLink.Description = "Calcul Mental"     oShellLink.WindowStyle = 1     oShellLink.Save End Sub   'Activer Sub TestRaccourci()     'On cherche le fichier     CreerRaccourci (ActiveWorkbook.Path & "\" & " Raccourci classeur Excel " & ".xls") End Sub   'Supprimer Sub DeleteRaccourci()     Set WSHShell = CreateObject("WScript.Shell")     BureauPath = WSHShell.SpecialFolders("Desktop")     'pour supprimer un raccourci du bureau     Kill (BureauPath & "\ Raccourci classeur Excel.lnk") End Sub  

Snippets en rapport avec : Bureau, Raccourci, Créer, Desktop



Codes sources en rapport avec : Bureau, Raccourci, Créer, Desktop

{C# / C#.NET} LINKY : GESTIONNAIRE DE ROOTS
Je n'aime pas que mon bureau Windows soit surchargé en raccourcis.Cet apllication permet d'afficher ...

{Visual Basic, VB6, VB.NET, VB 2005} WINBUR VERSION 1.0.2
Profitez pleinement de votre fond d'écran et beaucoup d'autres choses à découvrir. Une approche dif...

{C / C++ / C++.NET} RACOURCI SHORTCUT
un autre source sur la creation de racouci 2 fonction facile pour creer un racourci ou on veut ...

{C# / C#.NET} DESKTOP WINDOWS
Ceci est un bureau Windows, sur lequel on peut mettre des icônes images, on peut également protéger ...

{Visual Basic, VB6, VB.NET, VB 2005} __LINKMULE
Petit programme simple qui s'adresse au joueurs prend en charge les emulateurs de jeux suivant: ...

{Visual Basic, VB6, VB.NET, VB 2005} FROSTDESKTOP 2007 - DES ÉCRANS VIRTUELS À LA LINUX
Bonjour à tous, je poste ici ma première source sur VBFrance.com. Il sagit d'un logiciel qui permet...

{Visual Basic, VB6, VB.NET, VB 2005} DESSINER EN ARRIERE PLAN DU BUREAU
Bonjour sui te a ma derniere source shadowmoy m'a fait remarquer qu'il etait possible de dessiner "e...

{Visual Basic, VB6, VB.NET, VB 2005} VB6 - FONCTION QUI BLOQUE LE BUREAU
Pour les besoins de mon soft, les utilisateurs ne devaient pas avoir accès à autre chose que mon app...

{Javascript / DHTML} PLACER UN RACCOURCI VERS VOTRE SITE OÙ VOUS LE VOULEZ SUR L'ODINATEUR DE VOTRE VISITEUR. (WINDOWS)
Salut a tous !! En fait, avant de poster ce code, j'avais longement réfléchit comment faire retenir...

{IRC} WALLPAPERS POUR VOTRE BUREAU
N'ayant plus d'idées de scripts à développer voici la seule chose que j'ai trouvé à faire : Cet a...