学步园

static void Jimmy_FindFileType(Args _args)<br /> {<br /> #File<br /> #WinAPI<br /> Dialog dlg = new Dialog("Please selected Path and file Extension");<br /> DialogField dlgFile = dlg.addField(typeid(filePath));<br /> DialogField dlgType = dlg.addField(typeid(filenameType));<br /> filePath filePath;<br /> int i;</p> <p> FileName fullFileName(FileName _path, FileName _fileName)<br /> {<br /> FileName pathName;<br /> FileName fileName;<br /> FileName fileExtension;<br /> ;<br /> [pathName,fileName,fileExtension] = fileNameSplit(_fileName);<br /> return _path + '//' + fileName + fileExtension;<br /> }</p> <p> void findFiles(FileName _path,<br /> FileName _fileName,<br /> boolean _inclSubDir = true,<br /> FileName _prefix = fullFileName(_path,_fileName))<br /> {<br /> FileName fileName;<br /> int hdl;<br /> ;<br /> setprefix(_prefix);<br /> if (WinAPI::folderExists(_path))<br /> {<br /> [hdl,fileName] = WinApi::findFirstFile(fullFileName(_path,_fileName));<br /> while (fileName)<br /> {<br /> if (WinAPI::fileExists(fullFileName(_path,fileName)))<br /> {</p> <p> i++;<br /> info(strfmt("File Name: %1,Path: %2, %3, %4",fileName,_path,i,Conpeek(fileNameSplit(_fileName),3)));<br /> }<br /> fileName = WinApi::findNextFile(hdl);<br /> }<br /> WinApi::findClose(hdl);<br /> if (_inclSubDir)<br /> {<br /> [hdl, fileName] = WinAPI::findFirstFile(_path + '//' + #AllFiles);<br /> while (fileName)<br /> {<br /> if (strlwr(fileName) != strlwr(_fileName) &&<br /> strlwr(fileName) != strlwr('.') &&<br /> strlwr(fileName) != strlwr('..') &&<br /> WinAPI::pathExists(fullFileName(_path,fileName)))<br /> findFiles(fullFileName(_path,fileName), _fileName, _inclSubDir, fileName);<br /> fileName = WinApi::findNextFile(hdl);<br /> }<br /> WinApi::findClose(hdl);<br /> }<br /> }<br /> }</p> <p> dlgFile.value(Winapi::getFolderPath(#CSIDL_PERSONAL));<br /> dlgType.value("*.doc");</p> <p> dlg.doInit();<br /> if(!dlg.run())<br /> return ;</p> <p> filePath = dlgFile.value();<br /> findFiles(filePath,dlgType.value());<br /> }<br /> /*<br /> Axapta’s WinAPI class has a bunch of static methods to handle files.<br /> The code example below shows how to utilize some of these methods to find files.<br /> The two methods used to fetch all files matching the search criteria are findFirstFile() and findNextFile().<br /> Don’t forget to clean up after yourself with findClose().<br /> The code also uses three different find methods:</p> <p>1)fileExists(_name) returns true, if _name is an existing file<br /> 2)folderExists(_name) returns true, if _name is an existing file or folder<br /> 3)pathExists(_name) returns true, if _name is an existing folder</p> <p>The example uses the infolog for output. As with any infolog beware of performance and limitation to 10.000 lines.<br /> */</p> <p>