329671_zh-CN

liliconcom

复制文件功能

我正在使用 JMP 12。

我只想从 A 文件夹复制五个不同名称的 csv 文件并将其保存在 B 文件夹中。

A 文件夹包含许多 csv 文件。

使用复制文件功能（如下），我一次只能复制一个文件。

我需要编写下面的脚本五次才能复制所有五个文件

 

 

Copy File( "C:\A\data1.csv", "C:\B\data1.csv" );
Copy File( "C:\A\data2.csv", "C:\B\data2.csv" );
Copy File( "C:\A\data3.csv", "C:\B\data3.csv" );
Copy File( "C:\A\data4.csv", "C:\B\data4.csv" );
Copy File( "C:\A\data5.csv", "C:\B\data5.csv" );

 

 

有没有一种方法可以使用一个复制文件功能复制多个文件？

或者，我可以使用其他函数/脚本来实现此目标吗？

 

感谢您的帮助。

内容组织回复：复制文件功能

谢谢。

回复：复制文件功能

只是使用文件列表或复制目录功能的另一种方法，

但是在 Windows 下的 JMP 15 下进行测试，我没有 JMP12。

 

Names Default To Here( 1 );

source_dir = "$TEMP\ADIR";
destination_dir = "$TEMP\BDIR";

// Prepare a directory and some files
If( !Directory Exists( source_dir ),
 Create Directory( source_dir )
);
Save Text File( source_dir || "\afile.txt", "afile content" );
Save Text File( source_dir || "\bfile.txt", "bfile content" );
Save Text File( source_dir || "\cfile.txt", "cfile content" );

// Generate list of files
file_list = Files In Directory( source_dir );

// Prepare destination directory
If( !Directory Exists( destination_dir ),
 Create Directory( destination_dir )
);

// Copy all files from list
For( i = 1, i <= N Items( file_list ), i++,
 Copy File( source_dir || "\" || file_list[i], destination_dir || "\" || file_list[i] )
);

// Copy directory
Copy Directory( source_dir, "$HOME", recursive( 1 ) );

// see results
Open( "$TEMP" );
Open( "$HOME" );

 

 

 

回复：复制文件功能

for (i = 1, i <= 5, i++,
 file1 = evalinsert("C:\A\data^i^.csv");
 file2 = evalinsert("C:\B\data^i^.csv");
 copy file(file1, file2);
);