Gracias.
Principiante

| |||
Re: Ayuda por favor Eliminar Archivo y subFolder de una carpeta ---------------------------------------- DirTemp = Request.ServerVariables("APPL_PHYSICAL_PATH&q uot;) & "\Admin\Documentos\Temp" Dim fs, f, f1, fc, s Set fs = Server.CreateObject("Scripting.FileSystemObje ct") Set f = fs.GetFolder(DirTemp) Set fc = f.Files For Each f1 in fc Response.Write f1.delete Next Set fc = f.SubFolders For Each f1 in fc Response.Write f1.delete Next Session("VarTemp") = "0" Set fc = Nothing Set f = Nothing espero que te sirva, te recomiendo que busques ejempos en search.microsoft.com y que busques por FSO (File System Objects) |