FileCopy every 30 days...

[johnmcloud]

Hi guys,

I need to backup a folder every month, and i don't know if someone can help me to create a script like this:

The .exe will not be autostart

It will copy folder every 1th day of the month

If for example i open the exe the 3th, it create the copy if not exist

From next 1th it create another copy of the same directory

In poor words, from 1th to 30th of every month create only one backup if i open the file, and the old folder copy will be deleted.

Thanks

[Blue_Drache]

a cron job would probably be the best idea, since you're not running the file on start-up.

There are several non-cron ways to do this. What I would do is:

Check the file-date of the back-up archive and compare to today.

If the back-up file doesn't exist, run the back-up function.

If > 30 days, run the back-up function.

Else quit.

Edited July 17, 2011 by Blue_Drache

[somdcomputerguy]

These two functions and the macro are probably not all that will be needed, but they could be used..

FileExists() - a function

FileCopy() - a function

@MDAY - a macro

All this and more in the Helpfile! Welcome to the forum!

Edited July 17, 2011 by somdcomputerguy

[Blue_Drache]

These two functions and the macro are probably not all that will be needed, but they could be used..

FileExists() - a function

FileCopy() - a function

@MDAY - a macro

All this and more in the Helpfile! Welcome to the forum!

Oh, you forgot RunWait() for the 7zip command line archive utility.

[JohnOne]

You could create the program and create a schedualed task in control panel to run it.

[Blue_Drache]

You could create the program and create a schedualed task in control panel to run it.

aka: cron job.

[johnmcloud]

Guys i have foud a solution but i dont know how to write it, so please help me

If backup01 exist then $var1

If @mday is equal to a range to day 1 to 15 day then filecopy test folder to "backup01"

$Var1=if @mday is equal to a range to day 16 to day 31 then filecopy test folder to "backup02" and delete "backup01"

I think the idea is good, someone can convert it in autoit script, expecially for the range part

Thank guys

Edited July 18, 2011 by johnmcloud

[JohnOne]

The forum works like so...

Option A:

1) You Write your own code, for your own needs. (if you dont know how, then ask yourself how you got here), and at least try.

2) Post your code if you are having problems, detailing the problems you are having, any errors, and what you have tried to fix them.

3) Peaple will help you.

4) Win

Option B:

1) Ask for someone to make you code.

2) Wait,... and wait.... and wait...

3) Lose

[johnmcloud]

Ok, understood

This is my script:

$Date = @MDAY
If $Date > 01 And $Date < 15 Then       
DirCreate ( @WorkingDir & "\Backup\File di Backup 01-15" )      
DirRemove ( @WorkingDir & "\Backup\File di Backup 15-31" )                       
FileCopy ( @WorkingDir & "\Origine", @WorkingDir & "\Backup\File di Backup 01-15")
EndIf       

If $Date > 16 And $Date < 31 Then       
DirCreate ( @WorkingDir & "\Backup\File di Backup 15-31" )      
DirRemove ( @WorkingDir & "\Backup\File di Backup 01-15" )      
FileCopy ( @WorkingDir & "\Origine", @WorkingDir & "\Backup\File di Backup 15-31" )
EndIf

The problem is i don't now where insert dir exist, because with this script it create backup everyday and everytime i'll start it, but i need only one time in 15 days.

Another question. It's right >1 <15 and >16 <31 or i'm losing some days?

Thanks

Edited July 18, 2011 by johnmcloud

[JohnOne]

Take a look at this (hard because I have been known to fail) and see what you think

$Date = @MDAY

Local $s_Dir_01_15 = @WorkingDir & "\Backup\File di Backup 01-15"
Local $s_Dir_16_31 = @WorkingDir & "\Backup\File di Backup 16-31"

Switch $Date
    Case 1 To 15 ;if day is 1st to 15th
        If Not FileExists($s_Dir_01_15) Then ;if \Backup\File di Backup 01-15 does not already exist
            DirCreate($s_Dir_01_15);create it
            DirRemove($s_Dir_16_31);delete old
            FileCopy(@WorkingDir & "\Origine", $s_Dir_01_15);backup
        EndIf
    Case Else
        If Not FileExists($s_Dir_16_31) Then
            DirCreate($s_Dir_16_31)
            DirRemove($s_Dir_01_15)
            FileCopy(@WorkingDir & "\Origine", $s_Dir_16_31)
        EndIf
EndSwitch

Edited July 18, 2011 by JohnOne

[johnmcloud]

Thanks JohnOne, it works.

Bye