vb取文件和文件夹信息

vb取文件和文件夹信息  

'取文件和文件夹信息

'取文件信息
Set fs = CreateObject("Scripting.Filesystemobject") '创建FileSystemObject 对象
Set fsa = fs.GetFile("C:\1.txt")       '取文件信息
Set fsb = fs.getfolder("C:\windows")   '取文件夹信息

MsgBox "文件创建时间：" & fsa.DateCreated
MsgBox "文件夹创建时间：" & fsb.DateCreated



'返回指定路径文件所对应的 File 对象
'DateCreated         属性返回该文件夹的创建日期和时间
'DateLastModified    属性返回最后一次修改该文件的日期和时间
'DateLastAccessed    属性返回最后一次访问该文件的日期和时间

_____________________________________________________________________________ _

中磊UG二次开发教程 梅雷著 qq1821117007
学UG就上UG网 http://www.9sug.com/