<html>
<head> <title>file_e_directory</title> </head> <body> <% dir="mdb-Database/vecchi database" Set file1 = CreateObject("Scripting.FileSystemObject") Set file2 = file1.GetFolder(server.mappath("mdb-Database/vecchi database")) Set file3 = file2.Files For Each file in file3 response.write "<A HREF='" response.write file.name response.write "'>" response.write file.name response.write "</A><br>" Next %> </body> </html> |