Discussion :

[Bastien_Witczak]

Bonjour,

Je suis débutant dans ce langage et je rencontre beaucoup de difficultés pour faire certaines choses qui pour vous vont vous paraitre simple.

Voila j'aimerais en faite que lorsque je clique sur un bouton le programme telecharge un fichier sur internet et qu'apres il me le deplace dans un dossier bien spécifique (Appdata).
J'ai essayer de multiples fois mais je n'ai toujours pas réussi a le coder a cause du dossier appdata car j'aimerais utiliser la variable d'environnement %appdata% pour avoir un chemin variables en fonction de OS.

Si quelqu'un saurait comment faire pour résoudre mon probleme alors je suis tout ouïe.

Voila ce que j'ai deja essayer de faire:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
 
Public Class Form1
 
 
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        Dim appdata As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData)
 
        My.Computer.Network.DownloadFile("https://www.dropbox.com/s/t66tc7qdylgppm7/01net_Hamachi.exe", _
 
    "hamachi.exe")
 
        My.Computer.FileSystem.MoveFile("hamachi.exe", (je suis bloquer ici))
 
    End Sub
 
End Class

Merci d'avance

[Invité]

Je n'ai pas trop bien compris ton problème. Le chemin de AppData tu le récupères déjà dans la variable appData.
Tu bloques à la copie du fichier ?

[Bastien_Witczak]

Merci d'avoir repondu, mon problème se trouve lorsque que je veux deplacer le fichier precedement telechargé dans le dossier appData\Test j'aimerais savoir comment faire pour le programme reconnaissent la variable appData et le dossier test pour qu'il puisse deplacer le fichier dans le dossier Test.

[ebastien]

Bonjour,

Je n'ai pas trop bien compris ton problème. Le chemin de AppData tu le récupères déjà dans la variable appData.

Moi non plus je ne vois pas vraiment le problème. Pour déplacer le fichier vers appData\Test, il suffit de définir le chemin de destination. Est-ce là le problème ?

Code :

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

1
2
3
4
Dim appdata As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData)
  ' Depuis la version 4 du Framework, Io.path.combine accepte plus de 2 arguments :
  Dim DestFile as String = Io.Path.Combine(appData,"Test","Hamachi.exe")
  My.Computer.FileSystem.MoveFile("Hamachi.exe", DestFile)

J'ai défini des variables uniquement pour des raisons de lisibilité. Tout pouvait être codé directement dans le MoveFile...
eb.

[Bastien_Witczak]

Merci ebastien et h2s84 grâce a vous j'ai reussi efectivement c'etait lors du deplacement de fichier ou j'etais bloqué.

Merci.