FSO & DeleteFile
HejsaJeg er igang med et opgave-arkiv, hvor hver opgave har sin egen filmappe. Det er filer i disse filmapper jeg ønsker mulighed for at slette. I koden nedenfor er den mappen "metode" jeg har hardcoded, men det fedeste ville være at det kunne blive dynamisk. Det jeg har indtil videre er en form, der lister filerne i mappen (her "metode") med en checkbox ud for hver fil. Det der var planen var at man kan markere de filer man ønsker at slette ved at klikke på Slet markerede filer.
Kan man det og hvordan gøres det ?
Hilsner
Janus
Lidt kode:
Dim sFso, sFolder, sFile
Set sFso = Server.CreateObject("Scripting.FileSystemObject")
Set sFolder = sFso.getFolder(Server.Mappath("../../metode"))
Response.Write "<html><body><table>"
Response.Write "<tr><td><p>Markér filer der ønskes slettet og klik derefter på Slet markerede filer.</td></tr>"
Response.Write "<tr><td><p><br>Aktuel fil-oversigt:</td></tr>"
For Each sFile In sFolder.Files
Response.Write "<tr><td><p><form method=get action=slet_fil.asp><INPUT TYPE='checkbox' NAME='sletfil' value=' "& sFile &" '><a href=""../../metode/" & sFile.Name & """ target='_blank'>" & sFile.name & "</a></td></tr>"
next
Response.Write "<tr><td><p><br><input type='submit' value='Slet markerede filer'></td></tr>"
Response.Write "</form></table>"
