CREER DES RACCOURCIS

cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 - 15 mai 2004 à 18:23
sousoulebarbu Messages postés 101 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 11 janvier 2009 - 6 janv. 2006 à 20:12
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/22839-creer-des-raccourcis

sousoulebarbu Messages postés 101 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 11 janvier 2009
6 janv. 2006 à 20:12
ok merci
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 20
6 janv. 2006 à 19:36
C'est à cause de fCreateShellLink qui ne l'accepte pas.
sousoulebarbu Messages postés 101 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 11 janvier 2009
6 janv. 2006 à 17:02
Ok merci, en fait c'était tout simple, mais pourquoi tu ne met pas directement strGroupName=GetSpecialfolder(CSIDL_DESKTOP) ?
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 20
5 janv. 2006 à 20:23
GetSpecialfolder renvoie le chemin complet des dossiers "spéciaux". Dans l'exemple de source que j'ai posté, je récupère seulement le groupe (ligne 84 et 85) donc :

Un exemple pour deleter le raccourci "bloc notes" sur le bureau :

Kill GetSpecialfolder(CSIDL_DESKTOP) & "" & "Bloc notes.lnk"

Bien entendu, si tu veux utiliser la fonction GetSpecialfolder et la constante CSIDL_DESKTOP ailleurs que dans le module, il faudra les déclarer en public au lieu de private. Je pense que tu l'a déjà compris mais ce n'est jamais inutile de le rappeler.
sousoulebarbu Messages postés 101 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 11 janvier 2009
5 janv. 2006 à 17:17
Déja bravo pour ce code très propre, mais comment fait-on pour supprimé un raccourcis créé avec cette méthode? j'ai essayé kill strGroupName & "" & strLinkName & ".lnk" mais j'ai l'impression que la fonction kill n'aime pas les "..\.."
187bundy Messages postés 172 Date d'inscription mardi 18 mars 2003 Statut Membre Dernière intervention 10 juin 2004
19 mai 2004 à 08:28
Merci bcp pour tes recherches !!!
Je testerai ça dès que j'ai un peu de tps.

++
187
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 20
18 mai 2004 à 20:13
G repéré plusieurs points de différence possibles :

1 - La constante 'vbNullChar' ( = Chr(0) ) n'est peut-être pas prise en charge par vb.net.

2 - La création des raccourcis se fait grâce à la DLL 'vb6stkit.dll' qu'on n'a qu'avec vb6 mais sans doute téléchargeable (en .net il y a peut-être l'équivalent mais je ne sais pas laquelle et si les api's sont les mêmes).
En vb6, on peut le savoir en allant voir SETUP1.VBP situé dans :
C:\Program Files\Microsoft Visual Studio\VB98\Wizards\PDWizard\Setup1
Pour .net, je ne sais pas.

3 - Les librairies de base de vb6 (msvbvm60.dll et vb6.olb) quoique je ne crois pas ce ça ait une incidence.


Les autres dll utilisées ne dépendent que de l'OS et pas de l'environnement de prog.

Pour les diff de prog et/ou migration g vu des tutos :

http://dotnet.developpez.com/articles/migration/#L3.1.1

http://dotnet.developpez.com/tutoriels/migration/vb6_vers_dotnet/

Mais je ne peux pas tester.

@+
CanisLupus
187bundy Messages postés 172 Date d'inscription mardi 18 mars 2003 Statut Membre Dernière intervention 10 juin 2004
18 mai 2004 à 08:25
J'ai essayé le code en .NET (2003) et bien entendu il ne marche pas, mais il n'y a que quelques erreurs et souvent les même...
A mon avis il suffit d'ajouter certaines librairies, mais je sais pas vraiment lesquelles et j'ai pas trop de tps pour m'y pencher...

Si qqun trouve, qu'il nous fasse signe ;-)

++
187
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 20
17 mai 2004 à 19:13
<187bundy> Désolé, pour l'instant, je n'ai vu vb.net qu'en démo.
As-tu essayé ce code en .net ?
J'ai trouvé d'autres moyens en wscript, jscript, ASP, C#, C/C++, il suffit de faire une tite recherche avec google mais en VB.NET : que pouic.
Il doit bien y avoir quelqu'un sur vbfrance qui sait le faire.

@+
CanisLupus
187bundy Messages postés 172 Date d'inscription mardi 18 mars 2003 Statut Membre Dernière intervention 10 juin 2004
17 mai 2004 à 15:03
Dis moi Croc blanc, saurais tu adapter ton code pour vb.NET ? Ca m'aiderait pas mal ...

++
187
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 20
15 mai 2004 à 18:23
Heu, j'ai oublié de préciser qu'il faut avoir la dll : Vb6stkit.dll pour que ça fonctionne.
Rejoignez-nous