[R] FileCopy et @UserName

[albu68]

Avant de poster j'ai regardé environ 50 topic anglais.. français sans trouver de réponse à mon problème.
Je souhaite copier un fichier sur le bureau de la session courante,

If FileExists("C:\Users\@UserName\AppData\...\") Then
FileCopy("C:\Users\@UserName\AppData\...\", "C:\Users\@UserName\Desktop\")
EndIf

Forcément ça ne fonctionne pas, à la place du "@UserName" j'aimerais qu'il mette le nom de la session courante, comme le %username%.
Comment insérer le "@UserName" dans un chemin ?
Merci d'avance.

[zeshrek]

Code : Tout sélectionner

If FileExists(@AppDataDir&"\...\") Then
    FileCopy(@AppDataDir&"\...\", @DesktopDir)
EndIf

jette un oeil du coté des macro dans l'aide d'autoit !

[albu68]

Ok merci ! je met [R] quand le script fonctionne !

[albu68]

La copie ne fonctionne pas,
J'ai essayé ça :

FileCopy(@AppDataCommonDir&"\1\2\test.txt", @DesktopDir)

ou

FileCopy(@AppDataDir&"\1\2\test.txt", @DesktopDir)

Le @DesktopDir fonctionne car quand je met le chemin complet à la place du @AppDataDir ça fonctionne.
Une idée ?

[ricky]

Hello,

je viens d'essayer chez moi :
FileCopy(@AppDataDir&"\1\2\test.txt", @DesktopDir)

Et ça marche sans aucun problème. Que mets tu à la place de @AppDataDir ?

[albu68]

Je met rien à la place, j'expliquai juste qu'en mettant le chemin complet ça fonctionnait.

FileCopy("C:\Users\nomdelasession\AppData\1\2test.txt", @DesktopDir)

J'ai Win 7 et toi ?

[zeshrek]

C'est bizare...
Si tu fais un

Code : Tout sélectionner

msgbox(0,"",@AppDataDir)

qu'est ce que ca te donne dans la messagebox ?
Normalement ca devrait te donner C:\Users\[nomdelasession]\AppData

[ricky]

Je suis sur XP.

Je viens de tester sur windows 7 et ça donne : @AppDataDir = C:\Users\[nomdelasession]\AppData\Roaming

Et ça marche toujours autant bien.

[albu68]

Merci pour vos aide ! Ça fonctionne maintenant !

Je viens de tester sur windows 7 et ça donne : @AppDataDir = C:\Users\[nomdelasession]\AppData\Roaming

Pareil, donc @AppDataDir ça pointe vers Roaming et non la racine de AppData ! Normal ??
----------------------------------------------------------------------
----------------------------------------------------------------------
Merci zeshrek,
en fait,

msgbox(0,"",@AppDataDir)

ça donne C:\User\nomdelasession\AppData\Roaming

Du coup ça fonctionne j'ai enlever "Roaming" dans le chemin.

Avant [FAUX]

If FileExists(@AppDataDir&"Roaming\IBM\...\blabla.txt") Then
FileCopy(@AppDataDir&"Roaming\IBM\...\blabla.txt", @DesktopDir)

Arprès [JUSTE]

If FileExists(@AppDataDir&"\IBM\...\blabla.txt") Then
FileCopy(@AppDataDir&"\IBM\...\blabla.txt", @DesktopDir)

Bon c'est beaucoup pour pas grand chose mais au moins c'est clair.

Merci encore