1个回答
展开全部
下面的代码是读取当前文件夹的所有文件:
'══代══码══开══始════
set fso=CreateObject("Scripting.FileSystemObject")
set fs=fso.getfolder(".").files
for each f in fs
msgbox f.path
next
'══代══码══结══束════
说明:
使用folder对象中的files属性,获取文件集合,然后用for each枚举。
枚举到的都是一个file对象,当然可以直接应用其属性和方法。
'══代══码══开══始════
set fso=CreateObject("Scripting.FileSystemObject")
set fs=fso.getfolder(".").files
for each f in fs
msgbox f.path
next
'══代══码══结══束════
说明:
使用folder对象中的files属性,获取文件集合,然后用for each枚举。
枚举到的都是一个file对象,当然可以直接应用其属性和方法。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询