Discussion :

[antoineboy75]

Bonjour,

Désolé je suis perdu dans les recherches pour créer un raccourci en VBNET.

Je suis en train de migrer une application VBA vers VBNET.
J'ai une procédure qui créait un raccourci vers un dossier.
Or depuis la conversion en VBNET le raccourci se fait en fichier et non en dossier....
Quelqu'un peut-il m'aider à résoudre.

Code :

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

1
2
3
4
5
6
7
8
Dim scrHst, raccourci As Object
        scrHst = CreateObject("WScript.Shell")
        'Dim emplacementrac As String
        raccourci = scrHst.CreateShortcut("c:\Users\nifux\Documents\canoe\historique-dossiers\20VE02191.lnk")
 
        raccourci.targetpath = "C:\Users\nifux\Documents\Affaires en traitement\General\20VE02191 M Idbaha\"
        raccourci.WindowStyle = 1
        raccourci.Save

Le raccourci créé


Le raccourci souhaité

[Phil Rob]

Bonjour,

Ne te suffit-il pas de changer le targetpath ?

Par exemple pour un raccourci qui ouvre le dossier "General" :

Code :

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

raccourci.targetpath = "C:\Users\nifux\Documents\Affaires en traitement\General

Je vois la différence entre les 2 illustrations que tu as postées, simplement ton raccourci pointe un fichier et non un dossier ...

[antoineboy75]

merci pour ta réponse.

En fait oui quand je fais général

Code :

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

raccourci.targetpath = "C:\Users\nifux\Documents\Affaires en traitement\General"

cela fait bien un raccourci vers un dossier
Mais
20VE02191 M Idbaha
est bien un dossier et pas un fichier....
Et quand je fais le raccourci vers cela ne marche pas....

Ahhh en fait ce sont les espaces qui ne sont pas compris. La création d'un dossier marche avec
20VE02191_M_Idbaha ....

C'est bizarre car en VBA il y avait pas besoin d'espace...

[antoineboy75]

Ce n'est pas l'instruction qui pose soucis mais le nom du dossier. L'erreur vient ailleurs dans le code. Merci

[antoineboy75]

Il y avait un "\" de trop dans le chemin....

Parfois on perd du temps vraiment pour des broutilles....

[Phil Rob]

Allons, tout va bien ...

A propos d'espace dans les chaînes destinées au système, il faut parfois utiliser des guillemets. C'est notamment le cas des paramètres en ligne de commande, ou encore pour exécuter une commande Process.Start(...) avec paramètres pour la commande Dos lancée.

Plus personne n'y fait guère attention aujourd'hui pourtant l'idéal (qui passe partout) reste l'emploi des caractères non accentués, des chiffres et du underscore pour les noms des fichiers et des dossiers, à l'exclusion de tout autre caractère. Cette règle reste d'application pour tout ce qu'un programmeur peut nommer dans son code.

Bonne soirée ...