Mit folgenden Zeilen kann der Text aller Dateien in einem Ordner eingelesen werden.
FOR EACH objFile IN objFO.Files
… OpenTextFile …
… ReadAll …
… Response.Write x …
NEXT
Wie heisst es, wenn nur der Inhalt der ersten Datei des Ordners eingelesen werden soll ???
Daniel
SET objFO = CreateObject(„Scripting.FileSystemObject“)
SET objFolder = objFO.GetFolder(server.mappath(„news“))
SET objFiles = objFolder.Files
datum = „“
newsfile = „“
FOR EACH file IN objFiles
if datum="" then
datum = file.DateCreated
newsfile = file.Name
else
if file.DateCreated > datum then
datum = file.DateCreated 'oder DateModified
newsfile = file.Name
end if
end if
NEXT %>
neustes file: vom
hat natürlich den nachteil, dass immer alle Dateien durchgegangen werden müssen.
Besser wärs, du legst die eine index Datei an, in der immer der Name der neusten Datei oben steht, dann kannst du diesen einfach auslesen.
Gruß
Enno