Discussion :

[Eratos]

Bonjour à tous,
j'aimerais copier un fichier - provenant des ressources - sur le bureau pour tous les utilisateurs. J'ai testé ces 2 lignes de codes, mais elles ne fonctionnent pas (il me semble que WriteAllBytes ne développe pas les variables d'environnement). Je ne connais pas la bonne formule.
Merci pour votre aide.
(Fichier txt dans les ressources.)

Code :

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

1
2
WriteAllBytes("C:\Users\%UserName%\Desktop\Fichier.txt",My.Resources.Fichier.txt)
WriteAllBytes("C:\Users\%UserProfile%\Desktop\Fichier.txt",My.Resources.Fichier.txt)

[Miska59]

Bonsoir,

vous pouvez faire ceci pour copier le fichier texte dans My.Resources sur le bureau :

Code :

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

File.WriteAllBytes(Path.Combine(My.Computer.FileSystem.SpecialDirectories.Desktop, "Fichier.txt"), System.Text.Encoding.UTF8.GetBytes(My.Resources.fichier_test))

Cordialement,

[wallace1]

Bonsoir,

Le bureau de tous les utilisateurs :

Code :

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

Dim AllUsersDesktop As String = System.Environment.GetFolderPath(Environment.SpecialFolder.CommonDesktopDirectory)

[Eratos]

Merci à vous deux de me répondre (Miska59 et Wallace1). Si j’essaie cette déclaration : Dim AllUsersDesktop As String, quel code j'associe pour copier le fichier texte se trouvant dans les ressources ?

[popo]

WriteAllBytes ne fonctionne plus ?

[Eratos]

Oui, en VB.net, WriteAllBytes ne développe pas les variables d'environnement.