329671_zh-CN

liliconcom

复制文件功能

我正在使用JMP 12。

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

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

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

我需要在脚本下面写五遍来复制所有五个文件

 

复制文件（“ C：\ A \ data1.csv”，“ C：\ B \ data1.csv”）；

复制文件（“ C：\ A \ data2.csv”，“ C：\ B \ data2.csv”）；

复制文件（“ C：\ A \ data3.csv”，“ C：\ B \ data3.csv”）；

复制文件（“ C：\ A \ data4.csv”，“ C：\ B \ data4.csv”）；

复制文件（“ C：\ A \ data5.csv”，“ C：\ B \ data5.csv”）；

 

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

或者，还有其他功能/脚本可用于实现此目标吗？

 

谢谢您的帮助。

脚本编写回复：复制文件功能

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

回复：复制文件功能

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

但是在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" );

 

 

 

回复：复制文件功能

谢谢。