Moin,
habe schon ein schlechtes gewissen da ich mom ja dauerkunde bin 
aber da ist noch ein problem das ich habe:
Warum funktionier die Datumsprüfung nicht ?
Es werde keine Files Kopiert obwohl der Ordner Leer ist
Public Source As String
Public Desti As String
Public Testi2 As date
Public dtest As Long
Public DrDate As String
dtest = 4 'Monate
Source = „C:\source.src“
Desti = „C:\Desti.dst“
If GFTM(Source) GFTM(Desti) Then
DrDate = GFTM(Source)
Testi2 = Left(DrDate, InStrRev(DrDate, „.“) - 1)
If DateDiff(„m“, Testi2, Date)
Was fehl ist die
If PathFileExists(Desti) = False Then
prüfung oder ? der rest ist ok ?
erst denken …
Hi Joe,
Was fehl ist die
If PathFileExists(Desti) = False Then
prüfung oder ?
ja, sieht danach aus.
der rest ist ok ?
Die Zeile …
Testi2 = Left(DrDate, InStrRev(DrDate, „.“) - 1)
würde ich ersetzen durch:
Testi2 = DateValue(DrDate)
Die Stringoperation ist ‚unsauber‘ und langsam.
Gruß, Rainer
Hi Joe,
habe schon ein schlechtes gewissen da ich mom ja dauerkunde
bin 
*gg* dafür ist das Brett doch da.
Wenn das Problem gelöst ist kannst Du ja trotzdem auch mal mitlesen …
Gruß, Rainer
hmmmpf
ich habe nun
DrDate = GFTM(Source)
Testi2 = DateValue(DrDate)
DrDate As Date geht nicht wegen GFTM(Source) oder ?
Testi2 As Date
Wenn DrDate ein String ist bekomme ich nen fehler von Testi2
und wenn DRdate ein Date ist bekomme ich nen fehler vom GFTM(Source)
danke , mfg joe
Testi2 = Left(DrDate, InStrRev(DrDate, „.“) - 1)
würde ich ersetzen durch:
Testi2 = DateValue(DrDate)
Die Stringoperation ist ‚unsauber‘ und langsam.
Gruß, Rainer
Hi Joe,
ich habe nun
DrDate = GFTM(Source)
was ist das?
Testi2 = DateValue(DrDate)
Hier ist Testi2 ein Datum, DrDate ein String, der ein Datum enthält. DateValue wandelt den String in das Datumsformat.
DrDate As Date geht nicht wegen GFTM(Source) oder?
Ich verstehe kein Wort.
Testi2 As Date
Wenn DrDate ein String ist bekomme ich nen Fehler von Testi2
Nein, bekommst Du nicht. Hab ich getestet, DateValue funktioniert. 
Gruß, Rainer
Ergänzung
Hi Joe,
Wenn DrDate ein String ist bekomme ich nen fehler von Testi2
Korrektur, Du bekommst einen Fehler, wenn der String nichts enthält, was man in ein Datum umwandeln kann. Das kann man aber mit IsDate() vorher prüfen, damit man nicht am Ende noch ‚On Error‘ verwendet. 
Gruß, Rainer