Script that will copy a file based on the date modified

scriptingwindows-server-2003

I need to run a script which will copy a file from one directory to another based on the date it was modified. Basically I have a database dumped into a directory on a daily basis and I want to be able to copy the database from the first of each month to a different directory so that I can delete have all the other files in the folder deleted.

Can anybody help me out?

This is a script which I would like to run on Windows Server 2003.

Thanks in advance.

Best Answer

Use Robocopy it's a built in function of the operating system the syntax should be something along the lines of this.

Robocopy “\source” "\destination" /mir /mon:1 /mot:1 /R:3 /W:10 /COPY:DAT /log:c:\tools\robolog.txt /NDL /NP /Z

create and save this as a batch file have a scheduled task run it 23 hours a day and the process kill and restart it afterwards.

here is the technet reference for all commands and functions http://technet.microsoft.com/en-us/library/cc733145(WS.10).aspx

Related Solutions

Sql-server – How to restore a SQL Server database file from a shadow copy

i read your question a few days ago & stumbled across this blog by a computer forensics guy who is using robocopy to pull files out of shadow copy volumes & remembered your question!

No idea if this will work for you, you can try copying out the data/log files & see how it goes!

Delete files older that 2 days with some exceptions

Quick and dirty VBScript here, it assumes UK date format for enumerating if the file is from the 1st of the month. If you use a different date format then change the trim command to grab the appropriate number positions. For example, a US date would be Mid(objFile.DateLastModified, 4, 2) = 01 rather than Left(objFile.DateLastModified, 2) = 01

Anyway, sorry for the dirty code... but it should get you started.

strFolder = "C:\DeleteTest"
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(strFolder)
Set colFiles = objFolder.Files
strDaysOld = 2
'Get files from target folder
For Each File in colFiles
set objFile = objFSO.GetFile(strFolder & "\" & File.Name)
'Enumerate last modified date/time and delete if older than 2 days but where the date doesn't start with '01'
If objFile.DateLastModified < (Date() - strDaysOld) AND NOT Left(objFile.DateLastModified, 2) = 01 Then
objFSO.DeleteFile objFile, true
End If
Next

Best Answer

Related Solutions

Sql-server – How to restore a SQL Server database file from a shadow copy

Delete files older that 2 days with some exceptions

Related Topic