Albert Schneider: Mit ASP Dateistruktur vom Server auslesen

Beitrag lesen

hi,

weiß jemand eine Möglichkeit mit ASP eine Verzeichnisstruktur auszulesen, die dann in einer Explorerähnlichen Struktur dargestellt werden kann.
Dabei wäre es wichtig:

  1. Nur ein bestimmtes Verzeichnis mit seinen Unterverzeichnissen auszulesen,
  2. Der Anwender darf keinen Zugriff auf andere Verzeichnisse bekommen
  3. Es sollen immer alle Verzeichnisse sichtbar sein.

hoffentlich vielen Dank

Hi Dirk,

viel Spaß damit:

<%@ LANGUAGE="VBSCRIPT" %>
<html>
<head>
</head>
<body>
<SCRIPT LANGUAGE=vbscript RUNAT=Server>
Dim Text,i
Dim fso, fo, fc
Dim Tab
Tab=Chr(9)
Text=""
set fso=CreateObject("Scripting.FileSystemObject")
'Hier virutellen Pfad des Verzeichnis eintragen: z.B .\meinVerz
set fo=fso.GetFolder(Server.MapPath("."))
set fc=fo.SubFolders
For Each i in fc
Text=Text+i.name + Tab
Text=Text+CStr(i.DateCreated) + Tab
Text=Text+FormatNumber(i.size,0)+"<br>"
Next
Response.Write(Text)
</SCRIPT>
</body>
</html>