文件_枚举W 例程

项目部004

枚举目录

  

变量名	类 型	静态	数组	备 注
aryPath	字节集		0
dwCount	整数型
i	整数型

dwCount ＝ 文件_枚举W (编码_Ansi到Unicode (“D:\e”, ), 编码_Ansi到Unicode (“*”, ), aryPath, 真, 真, 真)
计次循环首 (dwCount, i)
输出调试文本 (编码_Unicode到Ansi (aryPath [ i ]))  ' 确定名称完全不含Unicode时可以这样转，否则不能转Ansi！
计次循环尾 ()

.版本 2<br /> .局部变量 aryPath, 字节集, , "0"<br /> .局部变量 dwCount, 整数型<br /> .局部变量 i, 整数型<br /> dwCount ＝ 文件_枚举W (编码_Ansi到Unicode (“D:\e”, ), 编码_Ansi到Unicode (“*”, ), aryPath, 真, 真, 真)<br /> .计次循环首 (dwCount, i)<br />     输出调试文本 (编码_Unicode到Ansi (aryPath [ i ]))  ' 确定名称完全不含Unicode时可以这样转，否则不能转Ansi！<br /> .计次循环尾 ()

是否枚举文件夹为真时等于目录_枚举W

---

枚举文件并移动

  

变量名	类 型	静态	数组	备 注
szPathOld	字节集
szPathNew	字节集
aryPath	字节集		0
dwCount	整数型
i	整数型

szPathOld ＝ 编码_Ansi到Unicode (“D:\e”, 真)  ' 旧
szPathNew ＝ 编码_Ansi到Unicode (“D:\e_new”, 真)  ' 新
dwCount ＝ 文件_枚举W (szPathOld ＋ { 0, 0 }, 编码_Ansi到Unicode (“*”, ), aryPath, 假, 假, 假)
计次循环首 (dwCount, i)
文件_移动W (szPathOld ＋ aryPath [ i ], szPathNew ＋ aryPath [ i ])
计次循环尾 ()

.版本 2<br /> .局部变量 szPathOld, 字节集<br /> .局部变量 szPathNew, 字节集<br /> .局部变量 aryPath, 字节集, , "0"<br /> .局部变量 dwCount, 整数型<br /> .局部变量 i, 整数型<br /> szPathOld ＝ 编码_Ansi到Unicode (“D:\e”, 真)  ' 旧<br /> szPathNew ＝ 编码_Ansi到Unicode (“D:\e_new”, 真)  ' 新<br /> dwCount ＝ 文件_枚举W (szPathOld ＋ { 0, 0 }, 编码_Ansi到Unicode (“*”, ), aryPath, 假, 假, 假)<br /> .计次循环首 (dwCount, i)<br />     文件_移动W (szPathOld ＋ aryPath [ i ], szPathNew ＋ aryPath [ i ])<br /> .计次循环尾 ()

注：欲寻找的文件名 即使指定 .txt，但是有文件后缀是 .txtx 会照样匹配，因为本身就是模糊匹配！

king1999

感谢大神开源,支持分享

斩月Aphack

只能查找所有文件  不能分类   而且返回的文件名不带后缀   

彦晞

感谢，一直不知道字节是怎么转