专注于互联网--专注于架构

如何定义一个数组:读取目录下的文件得到一个数组

filename=dir(\"盘符:\\*.*\") i = 0 do while filename = \"\" array1 (i)=filename i = i + 1 filename = dir(\"c:\\*.*\") loop VB好象也有比较好的方法，但是我不太清楚了 VBScript Set fs = CreateObject(\"Scripting.FileSystemObject\") Set f = fs.GetFolder(\"盘符:\\\") Set fc = f.Files i = 0 For Each f1 in fc ar [阅读全文] [PDF]