zoukankan      html  css  js  c++  java
  • Using X++ Code found out files list

    static void Jimmy_FindFilesWinAPI(Args _args)
    {
        #File
        int i;
    
        FileName fullFileName(FileName _path, FileName _fileName)
        {
            FileName pathName;
            FileName fileName;
            FileName fileExtension;
            ;
            [pathName,fileName,fileExtension] = fileNameSplit(_fileName);
            return _path + '\\' + fileName + fileExtension;
        }
    
        void findFiles( FileName    _path,
                        FileName    _fileName,
                        boolean     _inclSubDir = true,
                        FileName    _prefix     = fullFileName(_path,_fileName))
        {
            FileName    fileName,FullName;
            int         hdl;
            ;
            setprefix(_prefix);
            if (WinAPI::folderExists(_path))
            {
                [hdl,fileName] = WinApi::findFirstFile(fullFileName(_path,_fileName));
                while (fileName)
                {
                    FullName = fullFileName(_path,fileName);
                    if (WinAPI::fileExists(FullName))
                    {
                        i++;
                        info(strfmt("%3 , %1 - %2",FullName,fileName,i));
                    }
                    fileName = WinApi::findNextFile(hdl);
                }
                WinApi::findClose(hdl);
                if (_inclSubDir)
                {
                    [hdl, fileName] = WinAPI::findFirstFile(_path+'\\'+#AllFiles);
                    while (fileName)
                    {
                        if (strlwr(fileName) != strlwr(_fileName) &&
                        strlwr(fileName) != strlwr('.') &&
                        strlwr(fileName) != strlwr('..') &&
                        WinAPI::pathExists(fullFileName(_path,fileName)))
    
                        findFiles(fullFileName(_path,fileName), _fileName, _inclSubDir,
                        fileName);
                        fileName = WinApi::findNextFile(hdl);
    
                    }
                    WinApi::findClose(hdl);
                }
            }
        }
    ;
        findFiles('c:\\Program Files','*.doc');
    }
    
  • 相关阅读:
    技术学习沙龙
    mysql升级5.5
    mysql用户权限管理的问题
    dwz(jui)刷新当前dialog的方法
    perl进程管理一例
    cron执行service
    tp数据库表大写命名的一些问题
    php执行多个存储过程
    thinkphp使用中遇到的问题
    html5 ajax 文件上传
  • 原文地址:https://www.cnblogs.com/Fandyx/p/2104491.html
Copyright © 2011-2022 走看看