Sletning af uploadede filer
> Jeg forsøger at give begrænsede brugere mulighed for at> uploade billeder. Jeg har i vedlagte kode forsøgt at slette
> de filer som ikke accepteres, men jeg får blot at vide at
> siden ikke kan vises og det der førsøges slettet fiser bare
lige ind. Jeg har vedlagt kode. Kan nogen hjælpe ?
<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.SetMaxSize 100000, False
Upload.OverwriteFiles = False
Upload.Save "d:\home\xxxx\www\upload\framedlem"
For Each File in Upload.Files
If File.ImageType <> "GIF" and File.ImageType <> "JPG" Then
file.Delete
Response.Write "GIF or JPG files only please!"
Exit For
End If
If File.ImageWidth > 400 Then
Response.Write "Image width cannot exceed 400 pixels."
Exit For
End If
If File.ImageHeight > 400 Then
Response.Write "Image height cannot exceed 400 pixels."
Exit For
End If
Next
%>
