Taken uitvoeren

[Santora]

Ik ben bezig met een soort systeem beheer programma die ondermeer een backup maakt van alle belangrijke bestanden naar een externe harde schijf. Nu wil ik dat dit programm 1x per kwartaal alle oude backups weggooid. Kan iemand mij vertellen hoe ik dit in code moet doen.

 

[Jabber]

ff googlen:
- http://www.bubble-media.com/cgi-bin/articles/archives/000026.html
- http://www.helpmij.nl/forum/archive/index.php/t-270904.html


Ik hoop dat je er wat aan hebt?

 

[Santora]

ff googlen:
- http://www.bubble-media.com/cgi-bin/articles/archives/000026.html
- http://www.helpmij.nl/forum/archive/index.php/t-270904.html


Ik hoop dat je er wat aan hebt?

Hier lukt het niet mee. Ik wil weten hoe je backups 1x per kwartaal kan weggooien :thumb: .

 

[destiser]

controleer iedere dag gwn op datum, en als het de datum is, verwijderen die handel

 

[Santora]

controleer iedere dag gwn op datum, en als het de datum is, verwijderen die handel

Ik heb wat computer gebruikers die niet zo ervaren zijn dus zou het handig zijn als we dit zouden kunnen automatiseren.

 

[destiser]

Dat bedoelde ik ook:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim iKwartaalDag As Integer = 1
        Dim iKwartaalMaand1 As Integer = 1
        Dim iKwartaalMaand2 As Integer = 3
        Dim iKwartaalMaand3 As Integer = 6
        Dim iKwartaalMaand4 As Integer = 9

        Dim dtVandaag As Date = Date.Today

        If dtVandaag.Day = iKwartaalDag Then

            Select Case dtVandaag.Month

                Case iKwartaalMaand1 Or iKwartaalMaand2 Or iKwartaalMaand3 Or iKwartaalMaand4

                    'Code om backup te nemen

                Case Else

                    Exit Select

            End Select

        End If

    End Sub

Ik heb hier de formload genomen maarja, je kan ook timer gebruiken