Para eliminar viejos archive logs de las BD de oracle en windows, que ya fueron enviados a cinta, podemos utilizar el siguiente script de VBS. Para generar el arhivo vbs simplemente pegar en un notepad el codigo, modificarlo de acuerdo a nuestros requerimientos y guardar con extension vbs.
El codigo es:
para ejecutarlo en la linea de comandos seria
Saludos.
El codigo es:
Set objFSO = CreateObject("Scripting.FileSystemObject")
objStartFolder = "[ruta a borrar]"
set objfolder = objFSO.GetFolder(objStartFolder)
Set colFiles = objFolder.Files
For Each objFile in colFiles
if objFile.DateCreated < (date - [dias que se desea conservar]) then
fullpath = objFile.Path
objFSO.DeleteFile(fullpath)
end if
Next
para ejecutarlo en la linea de comandos seria
cscript [nombre del script]
Saludos.
Comentarios
Publicar un comentario