Was macht dieser Code?

CatchTheBird · 7. September 2012, 21:03

Was macht dieser Code?:

VB.NET-Quellcode

ImageList1.Images.Add("image", Image.FromFile(My.Computer.FileSystem.SpecialDirectories.CurrentUserApplicationData.ToString & "\Hallo\" & ToolStripStatusLabel1.Text & "\" & strFolder))

Eistee · 7. September 2012, 21:11

Der Code fügt einer ImageList ein Bild hinzu.

DE: ImageList.Images-Eigenschaft --> ImageList.ImageCollection-Klasse --> ImageList.ImageCollection.Add-Methode --> ImageList.ImageCollection.Add-Methode (String, Image)

CatchTheBird · 7. September 2012, 21:13

für was sind imagelist da?

Eistee · 7. September 2012, 21:15

ImageList-Klasse

MSDN schrieb:

Stellt Methoden zur Verwaltung einer Auflistung von Image-Objekten bereit. Die Klasse kann nicht vererbt werden.

PS: Links kann man anklicken...

xtts02 · 7. September 2012, 21:16

Auszug aus MSDN

Die ImageList wird üblicherweise von anderen Steuerelementen der wie ListView, der TreeView oder der ToolBar verwendet. Sie können der ImageList Bitmaps oder Symbole hinzufügen, die von den anderen Steuerelementen nach Bedarf verwendet werden können.

CatchTheBird · 7. September 2012, 21:26

cool danke.
Achja noch was warum funktioniert mein code zum downloaden in ein Ordne nicht?:

VB.NET-Quellcode

Try
My.Computer.Network.DownloadFile("http://*************/" & ToolStripStatusLabel1.Text & "/" & strFolder, "C:\Dokumente und Einstellungen\*****\Desktop\*******\")
Catch ex As Exception
MsgBox("Fehler")
End Try

kommt immer Fehler.

possible31776 · 7. September 2012, 21:28

Wenn du das Try raus lässt, erfährst du mehr.

EDIT:
Es sieht so aus, als ob du einen Ordner downloaden möchtest. Stimmt das?

xtts02 · 7. September 2012, 21:30

DownloadFile - benötigt den Pfad zu einer Datei.

CatchTheBird · 7. September 2012, 21:34

eben nicht ich möchte eine datei aus einem ordner laden lassen.
Wisst ihr was ich zeig euch mal den kompletten Code:
Und sagt bitte nicht direkt über ftp ist unsicher... ich weiß.

VB.NET-Quellcode

Private Sub Bilder_laden()
Me.Cursor = Cursors.WaitCursor
ListView1.Items.Clear()
Dim request As Net.FtpWebRequest = Net.FtpWebRequest.Create("ftp://ftp-web.funpic.de/" & ToolStripStatusLabel1.Text & "/")
request.Method = Net.WebRequestMethods.Ftp.ListDirectory
request.Credentials = New Net.NetworkCredential("*****", "*****")
Dim response As Net.FtpWebResponse = request.GetResponse()
Using myReader As New IO.StreamReader(response.GetResponseStream())
Do While myReader.EndOfStream = False
Dim strFolder As String = myReader.ReadLine()
If strFolder = "." Or strFolder = ".." Or strFolder = "..." Or strFolder = "" Then
Else
Try
Dim WebClient As New Net.WebClient
WebClient.DownloadFile("http://**********/" & ToolStripStatusLabel1.Text & "/" & strFolder, "C:\Dokumente und Einstellungen\******\Desktop\******\")
Catch ex As Exception
MsgBox("Fehler")
End Try
ImageList1.Images.Clear()
ImageList1.Images.Add("image", Image.FromFile("C:\Dokumente und Einstellungen\*****\Desktop\******" & "\" & ToolStripStatusLabel1.Text & "\" & strFolder))
ListView1.Items.Add(strFolder, "image")
End If
Loop
End Using
Me.Cursor = Cursors.Default
End Sub

possible31776 · 7. September 2012, 21:37

Wie gesagt: Lass das Try raus, dann kommt eine genaue Fehlerbeschreibung.

CatchTheBird · 7. September 2012, 21:40

es kommt der fehler:
Der angegebene Pfad endet mit einem Verzeichnistrennzeichen.

CiiNaxx · 7. September 2012, 21:41

Dann werf das Trennzeichen raus

CatchTheBird · 7. September 2012, 21:44

wo seht ihr ein trennzeichen?

xtts02 · 7. September 2012, 21:46

"C:\Dokumente und Einstellungen\******\Desktop\******\"

Seit wann endet der Dateipfad mit einem "\" ?

CatchTheBird · 7. September 2012, 21:50

und ohne kommt der fehler:
In destinationFileName muss ein Dateiname enthalten sein.

possible31776 · 7. September 2012, 21:52

Da steht doch der Fehler.
Du musst den Dateinamen (test.txt) angeben, unter die er die Datei dann speichert.

EDIT:
Benutz für Pfade wie den Desktop lieber "Environment" und SpecialFolders, da der Order von OS zu OS verschieden ist.

xtts02 · 7. September 2012, 21:52

Im übrigen muss der Order (******) bereits vorhanden sein.

CatchTheBird · 7. September 2012, 22:01

Oki danke funktioniert.
Wisst ihr wie man prüfen kann ob in einem ordner schon ein ordner namens test existiert und wenn nicht dann erstellt es einen?

BeefyX · 7. September 2012, 22:05

IO.Directory.Exists bzw IO.File.Exists

CatchTheBird · 7. September 2012, 22:13

so hat nun auch funktioniert

jetz die aller letzte frage für heute:
Wie geht es, dass es überprüft ob die dateien die gedownloadet werden wollen schon in dem ordner existieren und wenn dann wird die nächste gedownloadet. Quasi die wo schon in dem ordner ist wird übersprungen und es schaut ob die nächste schon verfügbar ist bis zum ende.
Weiß da jemand weiter?

Was macht dieser Code?

Was macht dieser Code?

VB.NET-Quellcode

MSDN schrieb:

VB.NET-Quellcode

VB.NET-Quellcode

Ähnliche Themen

2 Benutzer haben hier geschrieben