TC官方合作论坛

标题: 用正则表达式搜索文件 [打印本页]

作者: ief675037    时间: 2013-11-22 12:03
标题: 用正则表达式搜索文件
空间 FR文件
功能 正则式搜(目录,正则式=".+")
   变量 文件夹名,文件名,数i,数j,字符串a=""
   文件.遍历(目录,文件夹名,文件名)
   if(文件名[0]!=null)
      数组空间.大小(文件名,数j)
      for(数i=0;数i<数j;数i++)
         if(字符串.正则表达式匹配(正则式,文件名[数i],"")>0)
            字符串a=字符串a&";"&目录&"\\"&文件名[数i]
         endif
      endfor
   endif
   if(文件夹名[0]!=null)
      数组空间.大小(文件夹名,数j)
      for(数i=0;数i<数j;数i++)
         字符串a=字符串a&FR文件.正则式搜(目录&"\\"&文件夹名[数i],正则式)
      endfor
   endif
   返回 字符串a
功能结束
空间结束






欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1