Comment Obtenir le nom d'un fichier à partir d'un raccourci

Le
flomen
Bonjour,

Je suis à la recherche du code vba pour retrouver le nom d'un fichier à
partir d'un raccourci, c'est à dire : la cible d'un raccourci

D'avance merci
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Gloops
Le #6372231
flomen a écrit, le 16/12/2007 20:14 :
Bonjour,

Je suis à la recherche du code vba pour retrouver le nom d'un fich ier à
partir d'un raccourci, c'est à dire : la cible d'un raccourci

D'avance merci


Salut,

Peut-être en adaptant ceci ?

http://faq.vb.free.fr/index.php?question=5


Il se peut que ceci aide :

http://groups.google.fr/group/microsoft.public.vb.general.discussion/brow se_thread/thread/2f1d554f4f9c3f73/ceea7e966e699e54?lnk=st&q=GetShortc ut#ceea7e966e699e54

ainsi que ceci :

http://msdn2.microsoft.com/en-us/library/aew9yb99.aspx


Il y a eu il y a quelques mois (ou deux à trois ans) dans un newsgro up
un sujet là-dessus, mais je ne réussis pas à le retrouver. Il ne serait
pas absurde de trouver ça dans microsoft.public.fr.scripting

Les puristes préféreront peut-être proposer une solution q ui ne fasse
pas appel aux objets de script.

Michel_D
Le #6371631
Bonjour,

Bonjour,

Je suis à la recherche du code vba pour retrouver le nom d'un fichier à
partir d'un raccourci, c'est à dire : la cible d'un raccourci

D'avance merci


Voici ce que contient par exemple un raccourci (en binaire) :

-d 100 l1f5

0D05:0100 4C 00 00 00 01 14 02 00-00 00 00 00 C0 00 00 00 L...............
0D05:0110 00 00 00 46 9B 00 00 00-20 00 00 00 00 C4 54 67 ...F.... .....Tg
0D05:0120 DB AD C7 01 00 D8 E9 8C-00 41 C8 01 00 5E 63 01 .........A...^c.
0D05:0130 EB 08 C0 01 00 0E 06 00-00 00 00 00 01 00 00 00 ................
0D05:0140 00 00 00 00 00 00 00 00-00 00 00 00 FD 00 14 00 ................
0D05:0150 1F 50 E0 4F D0 20 EA 3A-69 10 A2 D8 08 00 2B 30 .P.O. .:i.....+0
0D05:0160 30 9D 19 00 2F 43 3A 5C-00 00 00 00 00 00 00 00 0.../C:........
0D05:0170 00 00 00 00 00 00 00 00-00 00 00 40 00 31 00 00
0D05:0180 00 00 00 CD 36 B3 86 10-00 4C 41 4E 47 55 41 47 ....6....LANGUAG
0D05:0190 45 00 00 28 00 03 00 04-00 EF BE CD 36 B3 86 90 E..(........6...
0D05:01A0 37 00 B8 14 00 00 00 4C-00 41 00 4E 00 47 00 55 7......L.A.N.G.U
0D05:01B0 00 41 00 47 00 45 00 00-00 18 00 48 00 31 00 00 .A.G.E.....H.1..
0D05:01C0 00 00 00 CD 36 B6 86 10-00 57 49 4E 48 45 58 7E ....6....WINHEX~
0D05:01D0 31 2E 35 33 00 2E 00 03-00 04 00 EF BE CD 36 B6 1.53..........6.
0D05:01E0 86 CC 36 00 B8 14 00 00-00 57 00 69 00 6E 00 48 ..6......W.i.n.H
0D05:01F0 00 65 00 78 00 20 00 39-00 2E 00 35 00 33 00 00 .e.x. .9...5.3..
0D05:0200 00 1A 00 46 00 32 00 00-0E 06 00 12 29 A0 40 20 ...F.2......).@
0D05:0210 00 57 49 4E 48 45 58 2E-45 58 45 00 00 2C 00 03 .WINHEX.EXE..,..
0D05:0220 00 04 00 EF BE CD 36 B7-86 70 37 00 B8 14 00 00 ......6..p7.....
0D05:0230 00 57 00 69 00 6E 00 48-00 65 00 78 00 2E 00 65 .W.i.n.H.e.x...e
0D05:0240 00 78 00 65 00 00 00 1A-00 00 00 5C 00 00 00 1C .x.e...........
0D05:0250 00 00 00 01 00 00 00 1C-00 00 00 38 00 00 00 00 ...........8....
0D05:0260 00 00 00 5B 00 00 00 1C-00 00 00 03 00 00 00 20 ...[...........
0D05:0270 7C 03 64 10 00 00 00 5F-52 31 2D 4C 31 5F 54 2D |.d...._R1-L1_T-
0D05:0280 58 50 00 43 3A 5C 4C 41-4E 47 55 41 47 45 5C 57 XP.C:LANGUAGEW
0D05:0290 69 6E 48 65 78 20 39 2E-35 33 5C 57 69 6E 48 65 inHex 9.53WinHe
0D05:02A0 78 2E 65 78 65 00 00 0C-00 2E 00 5C 00 57 00 69 x.exe.......W.i
0D05:02B0 00 6E 00 48 00 65 00 78-00 2E 00 65 00 78 00 65 .n.H.e.x...e.x.e
0D05:02C0 00 17 00 43 00 3A 00 5C-00 4C 00 41 00 4E 00 47 ...C.:..L.A.N.G
0D05:02D0 00 55 00 41 00 47 00 45-00 5C 00 57 00 69 00 6E .U.A.G.E..W.i.n
0D05:02E0 00 48 00 65 00 78 00 20-00 39 00 2E 00 35 00 33 .H.e.x. .9...5.3
0D05:02F0 00 00 00 00 00 .....
-q

Et donc on se rend compte que toutes les informations intéressantes sont
situées à la fin, par contre c'est parfois comme ici en unicode, il reste
plus qu'a faire la fonction qui analyse la chose.

Gloops
Le #6370581
Michel_D a écrit, le 18/12/2007 15:24 :
Bonjour,

Bonjour,

Je suis à la recherche du code vba pour retrouver le nom d'un fichie r
à partir d'un raccourci, c'est à dire : la cible d'un raccourci


Et donc on se rend compte que toutes les informations intéressantes s ont
situées à la fin, par contre c'est parfois comme ici en unicode, i l reste
plus qu'a faire la fonction qui analyse la chose.


Salut,

Par un traitement octet par octet sans s'occuper de l'existant ?

Bon courage.


Michel_D
Le #6342881
Michel_D a écrit, le 18/12/2007 15:24 :
Bonjour,

Bonjour,

Je suis à la recherche du code vba pour retrouver le nom d'un fichier
à partir d'un raccourci, c'est à dire : la cible d'un raccourci


Et donc on se rend compte que toutes les informations intéressantes sont
situées à la fin, par contre c'est parfois comme ici en unicode, il
reste
plus qu'a faire la fonction qui analyse la chose.


Salut,

Par un traitement octet par octet sans s'occuper de l'existant ?

Bon courage.


Il n'y a plus à chercher, la solution est ci-dessous :

http://www.microsoft.com/technet/scriptcenter/resources/qanda/dec04/hey1208.mspx



Gloops
Le #6342821
Michel_D a écrit, le 25/12/2007 14:37 :
Il n'y a plus à chercher, la solution est ci-dessous :

http://www.microsoft.com/technet/scriptcenter/resources/qanda/dec04/hey 1208.mspx



C'est quand même plus raisonnable, non ? ;)

Publicité
Poster une réponse
Anonyme