joehuaba
Goto Top

ComboBox - Except FileType

Guten Morgen face-smile

Ich komme leider nicht weiter, obwohl es wieder nur mal ne Kleinigkeit ist.
Ich entwickle etwas in VB.NET.
Eine Combo-Box ließt aus einem Ordner alle Files aus.
Jetzt will ich aber dass die Box alles ausließt, außer z.b. "*.txt"!
Kann mir jemand weiterhelfen ?

Dim dir = txtConfigurationFolder.Text
For Each file As String In System.IO.Directory.GetFiles(dir)
cmbDeleteGroup.Items.Add(System.IO.Path.GetFileNameWithoutExtension(file))
cmbAddComputer.Items.Add(System.IO.Path.GetFileNameWithoutExtension(file))
Next

Content-ID: 271443

Url: https://administrator.de/forum/combobox-except-filetype-271443.html

Ausgedruckt am: 25.12.2024 um 04:12 Uhr

colinardo
Lösung colinardo 08.05.2015 aktualisiert um 11:25:42 Uhr
Goto Top
Hallo joehuaba,
da gibt es einige Möglichkeiten ... hier zwei davon mit Linq-Expressions:
For Each file As String In System.IO.Directory.GetFiles(dir).Where(Function(s) System.IO.Path.GetExtension(s).toLower() <> ".txt")  
     cmbDeleteGroup.Items.Add(System.IO.Path.GetFileNameWithoutExtension(file))
     cmbAddComputer.Items.Add(System.IO.Path.GetFileNameWithoutExtension(file)) 
Next
Die Zuweisung zu einer ComboBox geht aber auch ohne Schleife und damit schneller.
cmbDeleteGroup.Items.AddRange(System.IO.Directory.GetFiles(dir).Where(Function(s) System.IO.Path.GetExtension(s).toLower() <> ".txt").Select(Function(s) System.IO.Path.GetFileNameWithoutExtension(s)).ToArray())  
Grüße Uwe
joehuaba
joehuaba 08.05.2015 um 11:25:29 Uhr
Goto Top
Danke für die Antwort, klappt face-smile
Super !

Ich wünsche ein schönes Wochenende ! face-smile
colinardo
colinardo 08.05.2015 um 11:26:06 Uhr
Goto Top
Zitat von @joehuaba:
Ich wünsche ein schönes Wochenende ! face-smile
Gleichfalls face-smile