Get last updated value of an excel file in a field in access

[virencm]

Hi,
Can someone help me with some vba code which is able to get the last updated or last modified value of an excel file stored in a folder in a shared drive and update a field on a form in ms access.

Thanks

Viren

 

[nathansav]

Function GetLastModDate(strFilePath as string) as date
Dim f As Scripting.FileSystemObject
Dim fl As Scripting.file
Dim dtM As Date
Set f = New Scripting.FileSystemObject
Set fl = f.GetFile(strPath)
dtDM = fl.DateLastModified
GetLastModDate=dtDM
end function

 

[virencm]

Perfect.Thanks!!!!