Haftada bir defa bütün önemli dosya ve klasörlerinizi harici sabit diskinize yedekliyorsunuz. Yinede güvenlikten ödün vermemek için devam etmekte olan projelerinizi her gün bir başka klasöre kopyalıyorsunuz. Fakat art arda o kadar çok dosya birikiyor ki bunların birçoğuna bir sonraki yedekleme işleminde hiç ihtiyacınız kalmıyor. İşte bu durumda en iyi çözüm ise bu dosyaları otomatik ve zamanlı bir biçimde silmek. İPUCU Bu işlemi otomatiğe bağlamak için klasörün yaratılma tarihini belirleyen ve sizin silmenizi sağlayan bir script'e ihtiyacınız var. Görev zamanlayıcısını kullanarak bu script'in otomatik olarak çalıştırılmasını sağlayabilirsiniz. Şimdi bir metin dosyası açın ve aşağıdaki kodları girin: Kod:Panoya kopyala Dim i, fso, flag, f, ff, sf, Pfad, Alter, MinAlter, fNameArray If WScript. Arguments. Count =0 Then Pfad = InputBox MinAlter = InputBox Else Pfad = WScript. Arguments(0) MinAlter = WScript. Arguments(1) End If flag=0 If instr then flag=1 If instr then flag=1 If or then flag=1 Set fso = CreateObject Set f = fso. GetFolder Set sf = f. SubFolders For Each ff in sf Alter = DateDiff If Alter-MinAlter > 0 then ReDim preserve fNameArray fNameArray = ff. Name i = i + 1 end if Next If flag=0 then For Each ff in fNameArray FSO. DeleteFolder Next End If Şimdi bu dosyayı "eskiklasorler. vbs" olarak kaydedin. Script'in otomatik çalışması için temel klasörün tam yolunu ve ne kadar eski dosyaların silineceğini girmeniz gerekiyor. Örneğin: eskiklasorler. vbs D:\Güvenlik 8 Bu komutu isterseniz görev zamanlayıcısı ile isterseniz de sistem başlangıcına yerleştirerek otomatik olarak çalıştırabilirsiniz. DİKKAT: Mümkün olduğunca kısa bir klasör yolunuz olsun ve mümkünse aracı ilk defa kullanırken geçici bir klasörde denmeler yapmanızı öneriyoruz. Herhangi bir yanlışlıkta scirpt'in klasörleri herhangi bir soru sormadan sileceğiniz unutmayın. Programcılar için ise script'imizi yönetme imkanı veriyoruz: script ilk olarak kullanıcının girmesi gereken verileri kontrol ediyor. Eğer değerler verilmediyse bir pencere açılıyor ve silinecek klasörlerin bulunduğu klasörlerin yolunu girmeniz isteniyor. Arından da bu klasörde ne kadar eksi dosyaların silineceği soruluyor. Tanımlanan istisnalar sayesinde script'in sistem dosyalarını silmesi de engellenmiş oluyor. Bu bağlamda belirtilen yol izleniyor ve uyum anahtarı "1"e alınıyor. Bu satırları isterseniz kendiniz de değiştirilirsiniz. Bu işlemlerde sonra ise script klasörün içindeki alt klasörleri de inceliyor ve bu klasörlerin tarihlerini okuyor. Eğer klasörlerde biri belirtilen süreden daha uzun sürede oluşturulmuş bir alt klasör mevcutsa script bu klasörün adını bir yere kaydediyor. Son olarak toplanan bu verilerin bulunduğu listedeki klasörlerin hepsi topluca silinmesi için işaretleniyor. Son olarak ta işaretlenen bu klasörler silinerek gereksi yer kaplamaları engellenmiş oluyor.