fso delete virker ikke hvorfor ????
HejEr ved at lave et admin modul hvor admin kan
slette jpg billeder .....
Jeg får hele tiden ...
file not found .....
NB hvis i teste sletter så slet KUN fatgofer.jpg på forhånd tak
MIN KODE:
<form method=post action=deletion.asp>
<%
imgdir = Server.Mappath("/flash/adminn/")
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder(imgdir)
For each file in folder.files
response.write "<img border=0 src='/flash/adminn/" & file.name & "'>"
response.write file.name
file=file.name
fs="http://iceb.ljnet.dk/flash/adminn/"
response.write fs & file
i=fs & file
response.write i
%>
<INPUT TYPE="checkbox" NAME="ima" value="<%response.write i %>" > <br><br>
<%
next
%>
<br><input type="submit" value="Slet dem"><br>
</form>
DELETION KODE:
<%
s=request.form("ima")
response.write s
'Create the FileSystemObject
Dim objFSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
'Delete the file
objFSO.DeleteFile "& s &", False
%>
<center>Record(s) Deleted!</center>
</body>
</html>
