Check Modification Date of single file?

[Sivakatirswami]

What can I say? You are all such beautiful souls... thank you! This  
goes in my scrapbook...

Sivakatirswami


On Nov 14, 2005, at 3:21 PM, Richard Gaskin wrote:

> on mouseUp
>   put 1000 into n
>   put the millisecs into t
>   repeat n
>     get GetModDate("/Users/richardgaskin/Documents/EPSON OS X  
> booklet.pdf")
>   end repeat
>   put (the millisecs - t)/n
> end mouseUp
>
>
> function GetModDate pPath
>   set the itemdel to "/"
>   put urlEncode(last item of pPath) into tFile
>   delete last item of pPath
>   put the directory into tSaveDir
>   set the directory to pPath
>   put the detailed files into tFileList
>   set the directory to tSaveDir
>   --
>   set the itemdel to comma
>   get lineoffset(cr&tFile&comma, tFileList)
>   if it > 0 then
>     return item 5 of line it of tFileList
>   end if
> end GetModDate