当我需要复制整个文件夹时,我可以使用 `copy file()` 函数逐步复制该文件夹中的每个文件。使用 `Files In Directory()` 函数获取文件夹中所有文件的名称,并循环复制文件。
但是,如果我需要复制的文件夹包含子文件夹,使用“复制文件”会导致错误。事实上,如果我需要复制的文件夹内有多层子文件夹,那么编写 JSL 代码就会变得很困难。
有没有什么好的建议可以解决复制包含多层子文件夹的问题?
您没有足够详细地描述该问题,因此无法找到解决方案。
处理子文件夹时遇到什么错误?您是尝试将子文件夹文件复制到不同驱动器上的同一子文件夹,还是所有文件最终都会放在一个文件夹中?
// Create Sample Flie in Document folder (a folder with one text file and a sub folder which also have a text file)
baseDir = "$DOCUMENTS";
dir = baseDir || "/" || Substitute( MDYHMS( Today() ), "/", "-", ":", "." );
Create Directory( dir );
theText = "Copy Test";
Save Text File( dir || "/0_Test Copy1.txt", theText );
dir2 = dir || "/" || Substitute( MDYHMS( Today() ), "/", "-", ":", "." );
Create Directory( dir2 );
Save Text File( dir2 || "/Test Copy2.txt", theText );
//Copy Sample Files
Wait( 1 );
CopyFilesList = Files In Directory( dir );
CopyPath= baseDir || "/" || Substitute( MDYHMS( Today() ), "/", "-", ":", "." );
//The error message appears when the copy target is a folder.
For( Count = 1, Count <= N Items( CopyFilesList ), Count++,
Copy File( dir || "/" || CopyFilesList[Count], CopyPath || "/" || CopyFilesList[Count] )
);
运行上述示例后出现错误信息。当复制目标是文件夹时,会出现错误信息。