VBS遍历文件或文件夹路径输入文件的所有绝对路径（附源码）
源码如下： Function listFilesPath(filepath) t1=Timer() Debug.WriteLine "****现在开始执行计数，用时："+CStr(t1) Set fso=CreateObject("scripting.filesystemobject") Set myfolder=fso.GetFolder(filepath)
其他编程 2023年09月13日 89
TAGS:夹路
源码如下： Function listFilesPath(filepath) t1=Timer() Debug.WriteLine "****现在开始执行计数，用时："+CStr(t1) Set fso=CreateObject("scripting.filesystemobject") Set myfolder=fso.GetFolder(filepath)
其他编程 2023年09月13日 89
用微信“扫一扫”