|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
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 array1(i)=f1.name i=i+1 Next 返回类别: 教程 上一教程: LEN(),LIFT(),RIGHT()不能正常识别中文的解决方式 下一教程: 关于IE缓存的解决方案 您可以阅读与"读取目录下的文件得到一个数组"相关的教程: · 取得一个目录下的文件 · 读取目录下的所有文件(源码) · 读取目录下的所有文件(源码) · 列出指定目录下的所有文件和目录 · 检查当前目录下是否存在指定的文件,假如存在就重新命名 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |