FAQ's del foro de ASP

[DanX03]

Eliminar el contenido total de una carpeta dentro del servidor

Código ASP:

set fso=server.CreateObject("Scripting.filesystemobject")
  'si existen las carpetas se eliminan para despues volver a crearlas
  if fso.folderexists(server.MapPath("graficas")) then
    fso.deletefolder(server.MapPath("graficas"))
    set nfolder=fso.createfolder(server.MapPath("graficas"))    
  else
    'caso contrario solo se crean las carpetas
    set nfolder=fso.createfolder(server.MapPath("graficas"))
  end if
 
  if fso.folderexists(server.MapPath("graficas2")) then
    fso.deletefolder(server.MapPath("graficas2"))
    set nfolder=fso.createfolder(server.MapPath("graficas2"))   
  else
    set nfolder=fso.createfolder(server.MapPath("graficas2"))
  end if
  
  set fso=nothing
  set nfolder=nothing