[RESOLVED] determine if file changed

[isnoend07]

Thanks guys found this little function that seems to do what i need:

Public Function FileUpToDate(sPath As String, sDest As String) As Boolean
Dim a, b, c As Variant
FileUpToDate = Len(Dir$(sPath)) > 0
If FileUpToDate = False Then Exit Function
'Already False if not exist so just exit
'Here is where I need more code to compare file Tmie/Dates
a = FileDateTime(sPath)
b = FileDateTime(sDest)
c = DateDiff("s", a, b)
If c < 0 Then FileUpToDate = False Else FileUpToDate = True

End Function