AX查找文件遍历文件夹 

 1 static void findFiles(Args _args)
 2 {
 3     void findFile(str path,str filesExt,boolean subFolder=false)
 4     {
 5         int         hdl;
 6         Filename    filename;
 7         ;
 8         [hdl, filename] = WinAPI::findFirstFile(path+filesExt);
 9         while (filename)
10         {
11             info(path+filename);
12             filename = WinAPI::findNextFile(hdl);
13         }
14         
15         if(subFolder)
16         {
17             [hdl, filename] = WinAPI::findFirstFile(path+"*");
18             while (filename)
19             {
20                 if(filename != "." &&filename != ".."&&WinAPI::folderExists(path+filename))
21                     findFile(path+filename+"\\",filesExt,subFolder);
22                 filename = WinAPI::findNextFile(hdl);
23             }
24 
25         }
26         WinAPI::findClose(hdl);
27     }
28     ;
29     findFile("D:\\","*.zip",true);
30 
31 
32 }

 

posted @ 2013-07-10 09:50  止在入门  阅读(427)  评论(0)    收藏  举报