how to substract 2 dates in vba

[vahe.holtian]

hey

i want to check if the file was modified in the last 20 seconds.


i have this now:


Dim fileModDate As String

Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(<filenamestringhere>)

fileModDate = f.DateLastModified


what should i do next? thanks

[JapanDave]

Hi, this will subtract 20 seconds from the time now.

Dim tNow As Date

    tNow = DateAdd("s", -20, d)

As for your problem, in what way will the file be modified?