Discussion :

[jypjyp]

Bonjour,

Avec CreateShortCut , il est possible de créer un raccourci vers une URL, un fichier et même un dossier.
La création de raccourci d'un dossier dans Menu démarrer/Programmes fonctionne bien mais l'utilisation du raccourci provoque l'ouverture d'une fenetre explorateur de fichier vers le dossier concerné.

Ce que je souhaite faire c'est un raccourci qui apparait avec une fleche droite dans le menu programme et qui déroule un nouveau menu qui est le contenu du dossier concerné.

Dans Windows cela revient à ne pas coller le dossier mais coller le raccourci.

Merci

[ced600]

Ha c'est bien, et tu as déjà fait du code ?
Tu as un problème sur celui ?
Ou tu t'es trompé de section ? (Section emplois peut être ?)



Excuse moi, mais j'ai oublié une question : Peux tu montrer ton code ? Je ne suis pas devin, je ne vois pas comment je pourrais savoir ce que tu as ecris !!!

Pour répondre à ton mail, je ne suis pas expert VBS, j'ai quelque connaissance dessus car j'ai développé pendant 7 mois un script de 1200 lignes. Rien de très exceptionnelle.
Les titres sur ce forum tu les acquierts grâce aux nombres de messages que tu postes !!!

[jypjyp]

Voici le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim Shell, DirPath, Rac
Set Shell = CreateObject("WScript.Shell")
DirPath = Shell.SpecialFolders("AllUsersPrograms")
Set Rac = Shell.CreateShortcut(DirPath & "\test.lnk")
Rac.TargetPath = "\\serveur\partage\dossier"
Rac.Save

J'obtiens bien dans "menu démarrer" / "programmes" pour tous les utilisateurs du poste le raccourci mais qui n'ai pas présenté en sous-mennu.

[ced600]

Ho tiens comme c'est bizzare. C'est exactement le même fonctionnement que si tu déplaces un raccourci dans "Tous les programmes" !!!!

D'ailleurs le répertoire "C:\Documents and Settings\All Users\Start Menu\Programs" ne doit surement pas exister !!!!