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

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

<p>如题</p>

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

<p>用 Scripting.FileSystemObject 的 Folder对象，</p><p>属性:</p><p>　　DateCreated <br/>　　返回该文件夹的创建日期和时间 <br/>　　DateLastAccessed <br/>　　返回最后一次访问该文件夹的日期和时间 <br/>　　DateLastModified <br/>　　返回最后一次修改该文件夹的日期和时间 </p>

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

<p>呼呼累死我了<br/>在版主的提示下编出下面这段代码</p><p>(defun c:getfileATT()<br/>&nbsp;(setq filename (getfiled "选择文件" "" "*" 0))<br/>&nbsp;(setq fso (vlax-Create-Object "Scripting.FileSystemObject"))<br/>&nbsp;(setq file (vlax-invoke-method fso 'Getfile filename))<br/>&nbsp;(setq d1 (vlax-get-property folder 'DateCreated))<br/>&nbsp;(setq d2 (vlax-get-property folder 'DateLastAccessed))<br/>&nbsp;(setq d3 (vlax-get-property folder 'DateLastModified))<br/>&nbsp;(prin1 (list d1 d2 d3))<br/>(princ)<br/>)</p><p>最后的结果是(40054.7 40286.6 40054.7)</p><p>这个日期格式似乎叫儒略日期？？</p><p>那么</p><p>再怎么转换成公元呢？</p><p>或者如何直接读出公元制呢</p>

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

<p>setq d1 、d2 、d3 那几句里的folder应为file</p><p>笔误啊</p>

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再转换

加上了如何转换呢？
页: [1]
查看完整版本: 想获取某个文件的创建时间、修改时间、访问时间，应该怎么做？