Hallo,
Ich möchte mit einem einfachen VB-Script mehrere Dateien auswählen und später diese Dateien auslesen. Folgenden Code habe ich schon dazu gefunden:
_option explicit
Dim Auswahl
Dim sBrowsePath, sBrowseFilter, oBrowseDialog
Auswahl = fBrowseForFile
msgbox Auswahl
Function fBrowseForFile()
sBrowsePath = „C:“
sBrowseFilter = „All Files|*.*“
Set oBrowseDialog = CreateObject(„UserAccounts.CommonDialog“)
oBrowseDialog.Filter = sBrowseFilter
oBrowseDialog.InitialDir = sBrowsePath
oBrowseDialog.Flags = &H80000 + &H4 + &H8 + &H200
oBrowseDialog.ShowOpen
fBrowseForFile = oBrowseDialog.FileName
End Function_
Leider bekomme ich so immer nur eine Datei zurückgegeben, bzw. bei erfolgter Mehrfachauswahl nur den Pfad.
Ich möchte aber alle Dateinamen angezeigt bekommen. Vielleicht auch in einem Array.
Danke schonmal für Deine Hilfe
Gruß
Arnold