Automatisch "oude" files verwijderen

[Verwijderd]

Ben op zoek naar een script of tooltje (bij voorkeur gratis) dat het volgende doet:
automatisch files die minimaal 1 maand oud zijn verwijderen. Het moet draaien op een w2k server.

Ik heb dit nodig om een scratchdisk automatisch op te schonen. Mensen mogen er data opzetten maar data ouder dan 1 maand wordt verwijderd (de gebruikers zijn hiervan op de hoogte).

Ik hou me aanbevolen voor elke suggestie...

[TheVMaster]

Hmm...ff vbscriptje bouwen?

[littledreamer]

Als je alle files in een en dezelfde map zet, kan je dit ook met een simpel bat bestandje realiseren.

[Verwijderd]

Ok, ik ben er inmiddels uit dat ik moet gaan scripten. Ik heb gezien dat ik mbv een vbscript zowel de "DateCreated" als de "DateLastModified" kan uitlezen van een bestand. Ik heb echter nog nooit met vbscript gewerkt. Weet er iemand een goede online handleiding? Of kan iemand me vertellen hoe ik in vbscript door de gehele directory structuur navigeer en van elk bestand bovenstaande properties kan opvragen?

[sverzijl]

Verwijderd schreef op 22 september 2004 @ 08:10:
Ok, ik ben er inmiddels uit dat ik moet gaan scripten. Ik heb gezien dat ik mbv een vbscript zowel de "DateCreated" als de "DateLastModified" kan uitlezen van een bestand. Ik heb echter nog nooit met vbscript gewerkt. Weet er iemand een goede online handleiding? Of kan iemand me vertellen hoe ik in vbscript door de gehele directory structuur navigeer en van elk bestand bovenstaande properties kan opvragen?

in plaats van zelf te gaan scripten zou je ook de eeuwenoude (maar nog steeds functionerende) tool TDEL kunnen gebruiken (http://tutils.cjb.net/tdel.htm).
met een simpele TDEL path\*.* /DAYS:31.. /S /Q /Y wis je vervolgens alle files ouder dan 31 dagen (inc subdirs)

[Verwijderd]

Het sleutelwoord bij gebruik van VBScript is hier 'FileSystemObject'.
Kijk eens op http://www.devguru.com

[ Voor 20% gewijzigd door Verwijderd op 22-09-2004 08:23 ]

[Verwijderd]

sverzijl schreef op 22 september 2004 @ 08:22:
[...]

in plaats van zelf te gaan scripten zou je ook de eeuwenoude (maar nog steeds functionerende) tool TDEL kunnen gebruiken (http://tutils.cjb.net/tdel.htm).
met een simpele TDEL path\*.* /DAYS:31.. /S /Q /Y wis je vervolgens alle files ouder dan 31 dagen (inc subdirs)

Ik heb ook naar Robocopy en Forfiles (resource kit tools) gekeken maar deze kijken alleen maar naar de "file modified date" terwijl ik ook naar de "file created date" wil kijken (biede dus). Als je nl data van de ene naar de andere disk kopieert (of moved) dan is de "file created date" nieuwer dan de "file modified date". Ik wil geen gezeik krijgen van gebruikers die zeggen: "ik heb de data er pas eergisteren opgezet en nu is hij al weg" (disk wordt nl niet gebackuped). Ik ben bang dat TDEL ook naar slechts 1 datum kijkt, vandaar dat ik wil gaan scripten

[ Voor 8% gewijzigd door Verwijderd op 22-09-2004 08:35 ]

[sverzijl]

Verwijderd schreef op 22 september 2004 @ 08:33:
[...]


Ik heb ook naar Robocopy en Forfiles (resource kit tools) gekeken maar deze kijken alleen maar naar de "file modified date" terwijl ik ook naar de "file created date" wil kijken (biede dus). Als je nl data van de ene naar de andere disk kopieert (of moved) dan is de "file created date" nieuwer dan de "file modified date". Ik wil geen gezeik krijgen van gebruikers die zeggen: "ik heb de data er pas eergisteren opgezet en nu is hij al weg" (disk wordt nl niet gebackuped). Ik ben bang dat TDEL ook naar slechts 1 datum kijkt, vandaar dat ik wil gaan scripten

TDEL kijkt inderdaad alleen naar de date modified.

[Verwijderd]

Ik weet nu dat ik met de subfolders property subfolders kan verzamelen echter subsubfolders is weer een ander verhaal. Dat moet ik zelf regelen en daar komt weer een uitdaging: Hoe weet ik op voorhand hoeveel nivo's ik diep moet? Is daar een standaard stukje code voor ofzo?

[Jazzy]

Je kunt ook Windows Services for Unix installeren, dan heb je alle standaard Unix tools aan boord. Dat maakt het een stuk makkelijker.

http://www.microsoft.com/windows/sfu/default.asp

[NetForce1]

Verwijderd schreef op 22 september 2004 @ 10:17:
Ik weet nu dat ik met de subfolders property subfolders kan verzamelen echter subsubfolders is weer een ander verhaal. Dat moet ik zelf regelen en daar komt weer een uitdaging: Hoe weet ik op voorhand hoeveel nivo's ik diep moet? Is daar een standaard stukje code voor ofzo?

De subfolders property geeft een verzameling val alle subfolders terug, dat zijn ook weer Folder-objecten. Je kunt dus door die verzameling subfolders wandelen, en van elke folder zijn subfolders opvragen.
In principe hoef je van te voren niet te weten hoe diep je moet gaan (dat kan ook helemaal niet). Je weet nl. dat je in het diepste niveau zit als de subfolders property niets meer teruggeeft.

[ritsjoena]

Jazzy schreef op 22 september 2004 @ 10:21:
Je kunt ook Windows Services for Unix installeren, dan heb je alle standaard Unix tools aan boord. Dat maakt het een stuk makkelijker.

http://www.microsoft.com/windows/sfu/default.asp

En welke tool moet je dan hebben?

[Jazzy]

ritsjoena schreef op 22 september 2004 @ 11:55:
[...]

En welke tool moet je dan hebben?

find

[Spider.007]

ritsjoena schreef op 22 september 2004 @ 11:55:
[...]

En welke tool moet je dan hebben?

Er zijn flink wat tools; maar ik vraag me inderdaad ook af waar Jazzy precies op doelt. Een betere link zou die naar Native Win32 ports of some GNU utilities zijn Dan kun je gebruik maken van find; alhoewel die bij mij geen -exec optie accepteerde (fork errors)

Ik laat dit topic hier nog even staan aangezien de TS niet perse wil programmeren en een externe tool ook een oplossing zou kunnen bieden

[The Eagle]

Met XCOPY kun je bestanden kopieren die nieuwe zijn als een bepaalde datum. Als je nou zo'n kopie uitvoert, vervolgens de rest wegknikkert en dan de gekopieerde bestanden weer terugzetn, ben je er ook. Dat kan volgens mij met een batch-bestand van nog geen 10 regels
Dat ding schedulen en klaar. Zit je alleen nog met de invoer van de peildatum, maar that's it

[Spider.007]

The_Eagle schreef op 22 september 2004 @ 12:02:
Met XCOPY kun je bestanden kopieren die nieuwe zijn als een bepaalde datum. Als je nou zo'n kopie uitvoert, vervolgens de rest wegknikkert en dan de gekopieerde bestanden weer terugzetn, ben je er ook. Dat kan volgens mij met een batch-bestand van nog geen 10 regels
Dat ding schedulen en klaar. Zit je alleen nog met de invoer van de peildatum, maar that's it

Tjah.. leuk bedacht.. alleen wat als je het over 50.000 mappen en 7.500.000 files in een productieomgeving hebt? Lijkt me niet zo'n strak plan

[Jazzy]

Spider.007 schreef op 22 september 2004 @ 12:01:
[...]

Er zijn flink wat tools; maar ik vraag me inderdaad ook af waar Jazzy precies op doelt.

code:

find . -mtime +30 -exec rm -f {} \;

Omdat nu voor iedere file rm aangeroepen word, kun je het beter zo doen:

code:

find . -type f -mtime +30 -print | xargs rm -f

Edit: of zit find niet in SFU?

[ Voor 20% gewijzigd door Jazzy op 22-09-2004 12:10 ]

[sverzijl]

Verwijderd schreef op 22 september 2004 @ 10:17:
Ik weet nu dat ik met de subfolders property subfolders kan verzamelen echter subsubfolders is weer een ander verhaal. Dat moet ik zelf regelen en daar komt weer een uitdaging: Hoe weet ik op voorhand hoeveel nivo's ik diep moet? Is daar een standaard stukje code voor ofzo?

voorbeeldje : http://www.visualbasicscript.com/topic.asp?TOPIC_ID=1200

[pinball]

ik had pas precies hetzelfde probleem, toen maar wat in perl gebouwd:

(op een lokale machine kan $dir natuurlijk makkelijker)

code:

#!/usr/bin/perl
# lees dir, vergelijk tijd van elk bestand met huidige tijd,
# oude bestanden worden verwijderd
# 20040805 mailme (at} dkit {punt) nl

use strict;
use Time::Local;

my $oud = 29;
my $dir = "\\\\server02\\c\$\\Program Files\\bla\\bla\\MMSArchive";

my $cur_time = time;

leesdir($dir);

sub leesdir {

    my($ldir) = @_;
    opendir(DIR, "$ldir") || die "can't opendir: $ldir \n";
    my @inhoud = grep { !/^\./ } readdir(DIR);
    closedir DIR;
    
    foreach my $element (sort @inhoud) {
    
        next unless ( $element =~ /\.msg/ );
        my $fullelement = "$ldir\\$element";
        my $file_time = (stat($fullelement))[9];
        unlink $fullelement if ((teoud($file_time)) && ( -f $fullelement));
    }
}

sub teoud {
    
    my($file_time) = @_;
    my $secdiff = $cur_time - $file_time;
    my $daydiff = int($secdiff / 24 / 60 / 60);
        
    if ($daydiff >= $oud) {
        return 1;
    } else {
        return 0;
    }
}

edit:

deze verwijdert trouwens alleen oude mailtjes, verwijder de regel:
next unless ( $element =~ /\.msg/ );
om ook andere bestanden weg te halen

[ Voor 16% gewijzigd door pinball op 22-09-2004 13:11 ]