1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

<%

  Dim sFichero
  sFichero = "c:\temp\dir2\a.txt"

  Set fso = Server.CreateObject("Scripting.FileSystemObject")
   
  if (fso.FileExists(sFichero)) then
    fso.DeleteFile sFichero,true
    Response.Write "Borrado el fichero " & sFichero
  else
    Response.Write "No existe el fichero " & sFichero
  end if

%>