Versuche mal das
function f_listFiles()
sDirectory = request("value")
dim aFiles(),aSubfolders()
if len(sDirectory) = 0 then
sDirectory = "c:\"
end if
set objFSO = Server.CreateObject("Scripting.FileSystemObject")
set selectFolder = objFSO.GetFolder(sDirectory)
iFiles = selectFolder.Files.count
i = 0
redim aFiles(iFiles)
for each objFile in selectFolder.Files
aFiles(i) = objFile.name
i = i + 1
next
i = 0
iSubfolders = selectFolder.subfolders.count
redim aSubfolders(iSubfolders)
for each objSubfolders in selectFolder.subfolders
aSubfolders(i) = objSubfolders
i = i + 1
next
end function
Gruss
Roman Pittroff
Consulting
Bangkok, Thailand
-----Original Message-----
From: Arkor Randor [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, September 26, 2001 6:13 PM
To: ASP Diskussionsliste fuer Anfaenger
Subject: [aspdebeginners] Re: Files aus Ordner auflisten - Wie?
Hallo Liste,
ich denke mal das meine Nachricht �berlesen wurde, denn sonst geht es
hier doch immer sehr fix (*Lob*) vonstatten.
Oder wei� niemand etwas?
Gru�,
Arkor
----- Original Message -----
From: "Arkor Randor" <[EMAIL PROTECTED]>
To: "ASP Diskussionsliste fuer Anfaenger"
<[EMAIL PROTECTED]>
Sent: Wednesday, September 26, 2001 1:09 AM
Subject: [aspdebeginners] Files aus Ordner auflisten - Wie?
> Hallo Liste,
>
> mal eine Frage... ich wei�, das man mit
>
> Set fs = Server.CreateObject("Scripting.FileSystemObject")
> Set f = fs.GetFolder(folderspec)
> Set sf = f.SubFolders
> For Each f1 in sf
> s = s & f1.name
> s = s & vbCrLf
> Next
>
> die Unterordner eines Ordners auflisten kann, doch wie m��te ich das
machen,
> um alle Files aus einem Ordner aufgelistet zu kriegen ohne die
Unterordner,
> also nur die Files? Bastle jetzt seid zwei Stunden mit GetFile und so
> rum, kriegs aber nicht gebacken...
>
> Wei� jemand, wie ich das machen mu�?
>
> Gru�,
>
> Arkor
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv Sie
| knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
