0

次の問題を解決するように依頼されました: 新しく作成されたフォルダーに 3 つのバッチでファイルをコピーします。例: フォルダーに「D:/TEST_CF/」としましょう。20 個の txt ファイルがあります。それらを 3 で割って (バッチは 6 残り 2 を与える)、7 つのフォルダーを作成します (3 つのバッチを 6 つのフォルダーに配置し、残りの 2 つのファイルを 7 番目のフォルダーに配置するため)。これまでに行ったことは、必要なフォルダーを作成することです。しかし、新しく作成されたフォルダーにファイルを 3 つのバッチにコピーすることはできません。上記の問題にどのように取り組むべきですか?

コードブロック

<html>
<body>

<cfprocessingdirective pageencoding="UTF-8">

<cfset directory = "D:/TEST_CF/">
<cfdirectory directory="#directory#" name="files" action="list" type="file">
<cfset filecount = #files.RecordCount#>
<cfset divisor = 3>
<cfset division = #filecount# / #divisor#>
<cfset remainder = #filecount# MOD #divisor#>
<cfset folders_to_create = Ceiling(#division#)>

<cfoutput>

    <cfif directoryExists(directory)>
        <cfdirectory action="list" directory="#directory#" name="directories" recurse="true" type="dir" />
        <cfloop query="directories">
            <cfdirectory action="delete" directory="#directory#/#directories.name#" recurse="yes">
        </cfloop>
    </cfif>

    <cfloop from="1" to="#folders_to_create#" index="i">
        <cfdirectory
          action="create"
          directory="#directory#newfolder#i#">
    </cfloop>

    <cfif folders_to_create EQ 1>
        #folders_to_create#&nbsp;folder created
    <cfelse>
        #folders_to_create#&nbsp;folders created
    </cfif>

</cfoutput>

</body>
</html>
4

1 に答える 1

0

Steve が言ったように、fileMove アクションを実行するには、関数の 2 つ以上のループが必要です。

ノート

  • ロジックは単なる POC です。より良いものに仕上げることができます。
  • CF10でこのコードを試しました。Open DB でも問題なく動作するはずです。

    <cfprocessingdirective pageencoding="UTF-8">
    
    <cfscript>
        oDirectoryPath      = "D:/test_cf/"; //original Directory path
        files               = DirectoryList(oDirectoryPath, false, 'name', '*.*');
        filecount           = Arraylen(files);
        filePerFolder       = 3;
        numfoldersToCreate  = Ceiling(filecount/filePerFolder);
    
        function moveFilesToThisDirectory(dir,index){
            var beginAt = 1;
            var endAt   = begin + 2;
            var newDir  = ARGUMENTS.dir;
    
            beginAt = ARGUMENTS.index;
    
            if(beginAt neq 1){
                endAt = index * VARIABLES.filePerFolder;
                beginAt = endAt - (VARIABLES.filePerFolder - 1);
                if(endAt GT VARIABLES.fileCount){
                    endAt = VARIABLES.fileCount;
                }
            }
    
            while(beginAt LTE endAt){
                FileMove(oDirectoryPath & '\' & files[beginAt], newDir & '\' & files[beginAt]);
                beginAt = beginAt + 1;
            }
    
        }
    </cfscript>
    
    <cfif directoryExists(oDirectoryPath)>        
            <cfdirectory action="list" directory="#oDirectoryPath#" name="directories" recurse="true" type="dir" />
            <cfloop query="directories">
                    <cfdirectory action="delete" directory="#oDirectoryPath#/#directories.name#" recurse="yes">
            </cfloop>
    </cfif>
    
    <cfscript>
    
        i = 1;
        while(i LTE numfoldersToCreate){
            newDirectoryName = "#oDirectoryPath#newfolder#i#";
            DirectoryCreate(newDirectoryName);
            moveFilesToThisDirectory(dir:newDirectoryName,index:i );
            i = i + 1;
        }
    
        switch(numfoldersToCreate){
            case 0:
                WriteOutput(' No folder created');
                break;
            case 1:
                WriteOutput(' 1 folder created');
                break;
            default:
                WriteOutput(numfoldersToCreate & ' folders created');
        }
    </cfscript>
    

于 2013-04-08T04:49:52.923 に答える