你好，有人可以帮我修改这段代码吗？我正在尝试连接每个文件夹的 csv 文件。 用户必须选择一个文件夹，所有符合条件的 csv 文件夹将根据文件夹名称连接并保存。 此方法使用户在每次脚本运行时选择一个文件夹。
但是，我现在想做的是让用户选择主文件夹，然后运行脚本并连接每个子文件夹的数据（像前面的方法一样，使用其文件夹名称作为文件名单独保存它们）。
但通过这些代码，所有 csv 文件都被连接成一个文件。 你能帮忙修改和解释递归是如何工作的吗？ 如何通过打开主文件夹来单独保存这些文件（连接每个文件夹的数据）。 我正在使用 JMP 15。 谢谢
p = pick Directory("Select a Folder");<BR />//f = Files In Directory(p);
f = Files In Directory(p, recursive(1));
Dir = Word(-1, p, "/"); //get filename
saveDir = Substr( p, 1, Length( p ) - Length( Word( -1, p, "\/" ) ) - 1 ); //save file outside main folder
/* Removes the file names from the list f which are not CSV files */
for(j=1,j<=N Items(f),j++,
If (Substr(f[j],Length(f[j])-2,3)!= "CSV",
RemoveFrom(f,j,1);
j=j-1;
);
);
A = {}; /* creates a empty list for storing the names of each data table */
B = {};
C = {};
D = {};
k = {};
m = {};
/*Opens each one of the CSV files and deletes all unwanted rows */
for(j=1,j<=N Items(f),j++,
CSV = Open(Concat(p,f[j]), End of Field(comma), Strip Quotes(1), Labels(1),
Column Names Start(3), Data Starts(4), Columns(:MRR=Numeric));
colname = {};
colname = CSV<<GET column="" names="">20 & Contains(colname,"Weight")>50,
InsertInto(A,CSV);
CSV<<SELECT where="">1,
dt2 = dt1<<CONCATENATE>1,
dt3 = dt1<<CONCATENATE></CONCATENATE></CONCATENATE></SELECT></GET>