Ordnerinhalt immer wieder autom. verschieben

Mirage_X

Grünschnabel
Hallo,
wie kann ich den Inhalt eines Ordners (ca. alle 60s kommen ein paar neue Daten in den Ordner) alle 60s immer wieder automatisch in einen anderen Ordner verschieben ?
Bin für eure Hilfe dankbar....
 
Hallo

Also ich würde das folgendermaßen machen:
- eine FileListBox (ich nenne sie jetzt mal "Files")
- einen Timer (mit Namen "DelayTim")

Die Eigenschaften "Files.Path" solltest du auf den gewüschten Pfad und "DelayTim.Interval" auf 60.000 stellen und dann noch in die Timer Prozedur:

Code:
 Private Sub DelayTim_Timer()
  For X = 0 To Files.ListCount - 1
   FileCopy Pfad1$ + Files.List(X), Pfad2$ + File1.List(X)
   Kill Pfad1$ + Files.List(X)
  Next X
 End Sub

wobei du für Pfad1$ den Orderpfad des zu leerenden Ordners angibst (mit "\" am Ende) und für Pfad2$ den Pfad des Zielordners.
 
Zurück