Concatener un Chemin Relatif avec un autre chemin

Bonjour,
Je suis débutant en vbs et j'ai besoin de votre aide :)
Voilà j'ai deux chemin à ma disposition, le premier est un chemin absolu du type D:\Test\Jeux et le deuxième est un chemin relatif par rapport au premier du type .\Jeu1.exe, ainsi le chemin réel de jeux1 est D:\Test\Jeux\Jeu1.exe.
De la même façon je peux avoir un chemin relatif ..\..\Test2\toto\Jeu2.exe, le chemin du jeu2 est alors D:\Test2\toto\Jeu2.exe.

Je cherche un bout de code qui me permet de "concaténer" ces deux chemin pour avoir le chemin absolue de mon fichier.
Merci pour votre futur aide.
Cordialement, Psykomusic.

Salut !

Code:

---

1 2 3 4 5 6

abs_path = "C:\rep1" rel_path = ".\rep2\file.exe"   tmp_path = Right(rel_path, len(rel_path) - (instr(rel_path,"\") - 1)) new_path = abs_path & tmp_path msgbox new_path

---

++

EDIT : Je n'avais pas lu ton 2ème exemple pour lequel le code ci-dessus ne fonctionnera pas !

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

abs_path = "C:\rep1\rep2" rel_path = "..\..\rep3\file.exe"   ' test ..\ Do while left(rel_path,2) = ".." rel_path = Right(rel_path, len(rel_path) - (instr(rel_path,"\"))) abs_path = Left(abs_path, instrrev(abs_path,"\") - 1) loop   ' test .\ if left(rel_path,1) = "." Then rel_path = Right(rel_path, len(rel_path) - (instr(rel_path,"\")))   msgbox abs_path & "\" & rel_path

---