想获取某个文件的创建时间、修改时间、访问时间，应该怎么做？

masterlong · 发表于 2010-4-17 00:43:00

如题

caoyin · 发表于 2010-4-17 05:15:00

用 Scripting.FileSystemObject 的 Folder对象，

属性:

　　DateCreated
　　返回该文件夹的创建日期和时间
　　DateLastAccessed
　　返回最后一次访问该文件夹的日期和时间
　　DateLastModified
　　返回最后一次修改该文件夹的日期和时间

masterlong · 发表于 2010-4-18 14:42:00

呼呼累死我了
在版主的提示下编出下面这段代码

(defun c:getfileATT()
(setq filename (getfiled "选择文件" "" "*" 0))
(setq fso (vlax-Create-Object "Scripting.FileSystemObject"))
(setq file (vlax-invoke-method fso 'Getfile filename))
(setq d1 (vlax-get-property folder 'DateCreated))
(setq d2 (vlax-get-property folder 'DateLastAccessed))
(setq d3 (vlax-get-property folder 'DateLastModified))
(prin1 (list d1 d2 d3))
(princ)
)

最后的结果是(40054.7 40286.6 40054.7)

这个日期格式似乎叫儒略日期？？

那么

再怎么转换成公元呢？

或者如何直接读出公元制呢

masterlong · 发表于 2010-4-19 21:10:00

setq d1 、d2 、d3 那几句里的folder应为file

笔误啊

cqu20104225 · 发表于 2022-2-21 14:16:15

请问一下，楼主知道怎么将这个日期转换成公元日期了么？

灰石Jeremy · 发表于 2022-2-21 15:30:20

+2416481再转换

cqu20104225 · 发表于 2022-2-22 13:52:02

灰石Jeremy 发表于 2022-2-21 15:30
+2416481再转换

加上了如何转换呢？

账号		自动登录	找回密码
密码			注册

[讨论] 想获取某个文件的创建时间、修改时间、访问时间，应该怎么做？