How to get file info from visual fox pro 6?

[venado]

I need know the date and time a file was last modified?

How do I do that from within visual foxpro 6. Is there any function that I can use?

ANY SUGGESTION?

Thanks,
venado

 

[jimstarr]

Hi venado,

One way is to use ADIR().

Jim

 

[rgbean]

Another using WSH:

oFS=CreateObject('Scripting.FileSystemObject')
lcFileName ='c:\tempfiles\bb.dbf'
With oFS
  If .FileExists(lcFileName)
    ? .GetFile(lcFileName).DateLastModified
  Endif
Endwith
Release oFS

Rick

 

[ramani]

HI
=ADIR(aFile,myFileWithExtension)
? aFile(1,1) && shows file name
? aFile(1,2) && shows the size
? aFile(1,3) && shows the date last modified
? aFile(1,4) && shows the time last modified
? aFile(1,5) && shows the file attribute

Hope this helps you ramani :-9
(Subramanian.G)
FoxAcc
ramani_g@yahoo.com
LET KNOW IF THIS HELPED. ENOUGH EXPERTS ARE HERE TO HELP YOU OUT! BEST OF LUCK