|
Registrieren
Login
Autor
Teyhouse_
Poster
Anmeldedatum: 11.02.2007
Beiträge: 100
Ordnerinhalt in Listview bezogen von String
Verfasst am: 30.03.2008, 17:26
Hallo,
ich möchte den Ordnerinhalt welcher durch eine Variable (String) bezogen wird in einer ListView anzeigen lassen. Leider klappt das ganze noch nicht hier mein Code:
Die Funktion:
Code: Public Function listadd(ByVal spalte1 As String)
Dim Item As New ListViewItem
With Item
.Text = spalte1
.Name = spalte1
End With
My.Forms.Form1.ListView1.Items.Add(Item)
End Function
Hier der code zum abfrufen:
Code: Dim pfad As String = "c:\"
For Each strFile As String In pfad
Dim f As New IO.FileInfo(strFile)
Dim s() As String = f.Name.Split(".")
listadd(s(0))
Next
Die Zeile
scheint noch Probleme zu machen - hoffe das mein einziger Fehler.
Code: Dim f As New IO.FileInfo(strFile)
Danke schon mal für alle Antworten - Mfg. Teyhouse
_________________
Marduk_
« Moderator »
Anmeldedatum: 17.06.2007
Beiträge: 389
Verfasst am: 30.03.2008, 21:52
http://nopaste.dbhost.info/index.php?id=bfc73c2d01
So sollte es funktionieren.
Die listadd() Funktion ist richtig.
Liegt vllt dran, dass du die Dateiinfo von einem Ordner haben willst, die FileInfo aber nur eine Datei annimmt.
_________________
Teyhouse_
Poster
Anmeldedatum: 11.02.2007
Beiträge: 100
Verfasst am: 30.03.2008, 23:00
Danke für deine Antwort aber das hilft mir nicht, ich möchte den Pfad aus einer Variable übernehmen - bei deinem Beispiel wird aber einfach "c:" angegeben und das hilft mir nicht ich muss das irgendwie mit ner Variable hinbekommen?
Mfg. Teyhouse
_________________
tr4st_
« Moderator »
Anmeldedatum: 17.12.2007
Beiträge: 315
Wohnort: Private Class _ Villa()
Verfasst am: 30.03.2008, 23:02
Mal das hier probiert?
http://vb-magazin.de/forums/forums/thread/15505.aspx
_________________
Avoid Suspicion, Manipulate your friends, Eliminate your enemies.
Teyhouse_
Poster
Anmeldedatum: 11.02.2007
Beiträge: 100
Verfasst am: 30.03.2008, 23:06
ja hab ich geht net
_________________
tr4st_
« Moderator »
Anmeldedatum: 17.12.2007
Beiträge: 315
Wohnort: Private Class _ Villa()
Verfasst am: 30.03.2008, 23:09
Dann schreibe ich dir im laufe des heutigen Tages etwas, bin gerade von der Arbeit gekommen und muss erstmal schlafen.
_________________
Avoid Suspicion, Manipulate your friends, Eliminate your enemies.
Teyhouse_
Poster
Anmeldedatum: 11.02.2007
Beiträge: 100
Verfasst am: 30.03.2008, 23:17
@tr4st:
Ich danke dir!
Schlaf gut ^^
Mfg. Teyhouse
_________________
Marduk_
« Moderator »
Anmeldedatum: 17.06.2007
Beiträge: 389
Verfasst am: 31.03.2008, 09:13
Code: Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
dim deinepfade() as string
for in as integer = 0 to deinepfade.length -1
Dim strFiles As Collections.ObjectModel.ReadOnlyCollection(Of String) = My.Computer.FileSystem.GetFiles(deinepfade(in), FileIO.SearchOption.SearchTopLevelOnly)
For i As Integer = 0 To strFiles.Count - 1
Dim filename As String() = strFiles(i).Split("")
listadd(filename(1))
Next
next
End Sub
So kannst du auch mehrerer Pfade überprüfen. Per Schleife der GetFiles Funktion einen neuen Pfad angeben.
_________________
Teyhouse_
Poster
Anmeldedatum: 11.02.2007
Beiträge: 100
Verfasst am: 31.03.2008, 19:19
Ich danke dir vielmals!
Mfg. Teyhouse
_________________
Verwandte Themen
Aufrufe
Letzter Beitrag
Problem mit always on top funktion
1039
30.10.2009, 11:26
IntStr()funktion
1177
11.10.2007, 08:49
TopMost Funktion unter DirectX
921
27.07.2007, 10:48
Wie Funktion nutzen ?
1102
29.06.2007, 20:59
update funktion einbauen
1341
28.01.2007, 23:11
