ok

diventa cosi giusto?

codice:
dim fs
Set fs=Server.CreateObject("Scripting.FileSystemObject") 
fs.ImageFile Server.MapPath("/images/"& elimina.Fields.Item("ICONA").Value &".jpg",True)
if fs.FileExists Server.MapPath("/images/"& elimina.Fields.Item("ICONA").Value &".jpg") then
  fs.DeleteFile Server.MapPath("/images/"& elimina.Fields.Item("ICONA").Value &".jpg")
end if
set fs=nothing