begin process at 2008 07 05 14:28:14
1 205 204 membres
180 nouveaux aujourd'hui
14 119 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

RACCOURCI SUR LE BUREAU EN VB6


Information sur la source

Catégorie :API Niveau : Débutant Date de création : 18/09/2003 Date de mise à jour : 19/09/2003 04:50:46 Vu / téléchargé: 5 100 / 1 036

Note :
8,6 / 10 - par 5 personnes
8,60 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (9)
Ajouter un commentaire et/ou une note

Description

Utilisation de la fonction API fCtreateShellLink de vb6stkit.dll pour placer sur le bureau de Windows (trouvé grâce à SHGetSpecialFolderPathA).

Petit programme autonome.

Changer File1.Pattern pour faire des raccourcis vers des fichiers autres que des  .exe  

Conclusion

Pour tenir compte des remarques de PROGRAMMIX et TheHacker, une mise à jour plus commentée et avec possibilité de
- choisir le nom du raccourci
- préciser les paramètres de la ligne de commande.
Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

  • signaler à un administrateur
    Commentaire de PROGRAMMIX le 18/09/2003 21:54:14

    Salut Rene38

    Voilà une idée qu'elle est bonne...

    J'ai téléchargé ta source et je sens qu'elle va souvent me servir...

    Toutefois, voici 2 sugestions :
    - Ajouter un second TextBox qui permettrait d'indiquer le nom que l'on voudrait voir apparaître sous le raccourcis (je n'aime pas les "Application.EXE") ;
    - Ne vaudrait-il pas mieux tester l'existence d'un raccourcis avant de le créer ?

    9/10 parce que... ;-)

  • signaler à un administrateur
    Commentaire de TheHacker le 18/09/2003 22:23:10

    salut, ouai c sympa comme prog, mais j'comprend pas trop pourquoi il faut indiquer ".../.../Bureau" ??? comment il connait le repertoire du bureau alors ??? il ets un peu bizarre cet API, tu peux expliquer les arguments a passer en parametres stp, merci @+

  • signaler à un administrateur
    Commentaire de rene38 le 19/09/2003 04:46:26

    Mise à jour tenant compte de vos suggestions.
    sauf test d'existence : si on crée 2 fois le même (même nom, même cible, mêmes arguments), le dernier écrase le précédent.

  • signaler à un administrateur
    Commentaire de DARKSIDIOUS le 22/09/2003 09:01:43 administrateur CS

    Salut Rene38,

    C'est une superbe source en effet qui est vraiment pratique !

    Ca vaut 9/10 !

    DarK Sidious

  • signaler à un administrateur
    Commentaire de Nicolas75 le 12/02/2004 18:49:22

    Salut

    Effectivement source excellente. Mais j'ai tout de même un petit souci.

    Lorsque je change la valeur 16 pour pouvoir créer mon raccourci dans le dossier Démarrage de windows (Valeur 7 ou 24) il ne se passe absolument rien.

    Pas de message d'erreur et pas de raccourci non plus.

    Quelqu'un peut t'il m'expliquer ?

    J'utilise windows 2000 Pro et VB6


    Mille merci

  • signaler à un administrateur
    Commentaire de rene38 le 13/02/2004 01:57:03

    Bonsoir Nicolas75

    petites modifications à faire dans ton cas :

    1) Comme tu l'as trouvé toi-même,
    Réponse = SHGetSpecialFolderPath(Me.hWnd, NomDuBureau, &H7, 0)
    7 pour le dossier de démarrage à la place de 16 (&H10) pour le bureau.

    2) 3 lignes avant la fin du Sub, remplacer

    Bureau = "..\.." & Mid$(NomDuBureau, Compteur)

    par

    Bureau = Mid$(NomDuBureau, Compteur)

  • signaler à un administrateur
    Commentaire de rene38 le 13/02/2004 02:05:00

    ... et j'ai oublié l'explication :
    le chemin du raccourci n'est pas correct. La fonction OSfCreateShellLink renvoie donc RetourFonction = 0
    Il faudrait tester la valeur de RetourFonction :
    - 0 => ça n'a pas marché (le raccourci n'est pas créé)
    - autre que 0 => le raccourci a été créé.

  • signaler à un administrateur
    Commentaire de Nicolas75 le 14/02/2004 18:27:02

    Salut Rene38

    Mille merci pour ta réponse.

    J'ai essayé et ça marche super.

    A+

  • signaler à un administrateur
    Commentaire de patrice_b le 23/05/2006 18:01:06

    Excellente source.

Ajouter un commentaire

Pub



Appels d'offres

Plugin Dialer outlook
Budget : 2 000€
Travail graphique- ill...
Budget : 1 000€
creation de marque et ...
Budget : 1 000€

CalendriCode

Juillet 2008
LMMJVSD
 123456
78910111213
14151617181920
21222324252627
28293031   

VS Express FR Gratuit !

VS Express en français et 100% gratuit !

Boutique

Boutique de goodies CodeS-SourceS