Dos-spørgsmål

http://www.computerhope.com/xcopyhlp.htm

Prøv følgende i et VBA modul i Word, Excel eller Access:

Sub FlytNogleFiler()
Dim A As String, FromPath As String, ToPath As String
Dim FilDate As Date

      FromPath = "J:\EnEllerAndenMappe\"
      ToPath = "K:\enEllerAndenMappe\"
      A = Dir(FromPath & "*.*")
      Do While A <> ""
        FilDate = FileDateTime(FromPath & A)
        If FilDate < Date Then
            Kill FromPath & A
        Else
            FileCopy FromPath & A, ToPath & A
        End If
        A = Dir()
      Loop

End Sub

Tak for svar, men jeg skal have det kørende i en bat.fil således, jeg kan lave et scheduled task.
Er du mand for det?

Er vokset op med DOS, så jeg har lavet mange .bat filer, men det med datoerne er kompliceret.
Men når det skal køre som som sceduled task kunne du gøre følgende:

Gem nedenstående kode (som er næsten magen til ovenstående) i et Excelarks This_Workbook / Denne_Projektmappe modul.

Du sætter din scedule til at åbne regnearket når det passer dig. Koden kører automatisk, når filen åbnes - og regnearket lukker automatisk når koden er eksekveret.


Private Sub Workbook_Open()

Dim A As String, FromPath As String, ToPath As String
Dim FilDate As Date

      FromPath = "J:\EnEllerAndenMappe\"
      ToPath = "K:\enEllerAndenMappe\"
      A = Dir(FromPath & "*.*")
      Do While A <> ""
        FilDate = FileDateTime(FromPath & A)
        If FilDate < Date Then
            Kill FromPath & A
        Else
            FileCopy FromPath & A, ToPath & A
        End If
        A = Dir()
      Loop
      Application.Quit

End Sub

Okay, men nu har jeg ikke office pakken installeret på min sql-server ;-)
desværre, så jeg gør det lige lidt besværligt

jeg ville nok lave det i vbs, prøv at spørge der

Super...jeg prøver det, men tak for dine svar.

VBS eller hvis lidt nyere server saa Windows PowerShell!