Problème de connexion FTP-VB

Bonjour à tous,

Dans le cadre d'un projet perso, je souhaite réaliser un launcher permettant de télécharger des fichiers en utilisant le FTP (pour l'exemple une image appelée armalife.jpg).

Voici mon code :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub BT_DOWNLOAD_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_DOWNLOAD.Click
        'Code de téléchargement FTP avec WebClient
        Dim request As WebClient
 
        request = New WebClient()
        'Encodage des identifiants de connexion au compte FTP
        request.Credentials = New NetworkCredential("xxx", "xxx")
        'Un tableau de Bite
        Dim fileData() As Byte
        'Le résultat est un tableau de bites que tu dois ensuite retranscire dans un fichier
        fileData = request.DownloadData("ftp://xxx.xxx.xxx.xxx/xxx/@xxx/xxx/xxx/armalife.jpg")
 
        Dim file As FileStream
        file = New FileStream("/Users/<mon_nom>/Desktop/<un_dossier>/test", FileMode.Create)
        File.Write(fileData, 0, fileData.Length)
        File.Close()
 
    End Sub

Pour info, ce code est tiré d'ici et j'ai essayé de le réadapter à mon besoin.

Je précise que je débute en VB.NET.

Merci d'avance,

Alexis