Eliminazione record e file

[avatar]

alla esecuzione della quesry controlli che il file esiste sul server con il suo percorso e se esiste lo cancelli

if oper = "DEL" then
    Set FSO = CreateObject("Scripting.FileSystemObject")
    if fileExist(pathPhoto & id_articolo & ".jpg") then
        FSO.DeleteFile(pathPhoto & id_articolo & ".jpg")
    end if
end if