Bon g trouvé une alternative en procédant par bricolage :
la fonction 'Application.UserAppDataPath' retourne en partie ce que je recherche, j'me suis donc amusé à spliter :
temp = Split(Application.UserAppDataPath, "\", 4, CompareMethod.Text)
chemin_acces_bureau = temp(0) & "\" & temp(1) & "\" & temp(2) & "\Bureau"
|
et j'obtiens bien C:\Documents and Settings\Corbier\Bureau
J'ai aussi essayé en utilisant les variables d'environnement de windows, mais la variable %userprofile% n'est pas reconnue...
Donc je vais me contenter de ça...
Voilà voilà
---------------
Sans ma barbe, quelle barbe !