Zum Inhalt springen
View in the app

A better way to browse. Learn more.

Fachinformatiker.de

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

FTP Programm mehrere Dateien auf einmal herunderladen und hochladen

Empfohlene Antworten

Veröffentlicht

Hey,

bin dabei ein FTP Programm mit VB.NET zu programieren nun hab ich folgendes Problem ich möchte mehrere Dateien von dem FTP Server herunterladen.

Einzelne Dateien herunterzuladen ist kein Problem nur mit mehreren auf einmal wird es für mich schwierig...

Ich lasse mir bis jetzt die Dateien die auf dem Server liegen in einer ListBox anzeigen und möchte jetzt halt das er alle einzelnen Dateien herunterläd.

Hier ma ein Bild von meinem Programm:

unbenannt.jpg

hab schon mehrere Möglichkeiten probiert...


 ' For Each Zeile As String In ListBox1.Items

'My.Computer.Network.DownloadFile(ftpserver & Zeile,

'txtdownpath.Text + "/" + Zeile, Benutzername, passwort)

' Exit For

' My.Computer.Network.DownloadFile(ftpserver & Zeile,

'txtdownpath.Text + "/" + Zeile, Benutzername, passwort)

'Next
und

 Dim i As Single

For i = 0 To x Step 1

lbeinträge = ListBox1.Items(i).ToString()

My.Computer.Network.DownloadFile(ftpserver & lbeinträge,

txtdownpath.Text + "/" + lbeinträge, Benutzername, passwort)

Next
und


 Dim wc As New WebClient

wc.Credentials = New NetworkCredential(Benutzername, passwort)

wc.Encoding = System.Text.Encoding.Default

wc.Headers.Add("Content-Type", "binary/octet-stream")

Dim uri As New Uri(ftpserver) '& TextBox2.Text)

Dim Datei

For Each Datei In My.Computer.FileSystem.GetFiles(path, FileIO.SearchOption.SearchAllSubDirectories, "*.txt")

wc.UploadFile(uri, "POST", Datei)

Next


' Dim wc As New WebClient



' For Each foundFile As String In My.Computer.FileSystem.GetFiles _

'(My.Computer.FileSystem.SpecialDirectories.MyDocuments)

' wc.UploadFile("ftpserver", "POST", foundFile)

' Next

Das funktioniert aber alles nicht richtig ist auch warscheinlich vollkommen falsch...

Schleifen sind auch nicht so mein Ding :D

Muss auch nicht unbedingt mit einer Schleife gearbeitet werden, aber geht warscheinlich nicht anders.

könnt ihr mir vielleicht helfen wäre echt cool!

Danke schon mal!

Hat geklappt die Lösung war ganz einfach ... :D

        For Each Zeile As String In ListBox1.Items

            My.Computer.Network.DownloadFile(ftpserver & Zeile,

            txtdownpath.Text + "/" + Zeile, Benutzername, passwort)



        Next

Das sieht irgendwie ein bisschen strange aus.

An deiner stelle würde ich ne eigene client klasse für ftp schreiben inder du dann das Protokoll implementierst, da es im .net keine solche klasse gibt.

Mit dem WebClient wirst du irgendwann an deine Grenzen stoßen.

Beispielsweise wenn es darum geht ein directory vom ftp server aufzulisten.

Gibt aber bestimmt auch schon im internet maßig vorgeschriebene Klassen, die alle Funktionalitäten abdecken.

lg

Gateway

Archiv

Dieses Thema wurde archiviert und kann nicht mehr beantwortet werden.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.