<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />此示例使用 Files In Directory 获取目录中所有文件的列表。然后它会查找所有 .jmp 文件，一个一个地打开（然后关闭）它们，并在此过程中制作一个汇总表。$sample_data 目录有子目录，这些子目录将在列表中，但会被 EndsWith 测试跳过。EndsWith 区分大小写；你可能想要EndsWith（小写（文件名），“.jmp”）获取以 .JMP 和 .jmp 结尾的文件。
目录中的文件不需要尾随的 /，但也不介意。但是当列表中的文件名连接到目录时，尾随 / 很重要。JMP 负责处理 windows vs mac / 和 \ 问题。
目录 = "$sample_data/";
fileNames = 目录中的文件（目录）；
摘要 = 新表（“摘要”，新列（“名称”，字符），新列（“行”，数字））；
对于（iFile = 1，iFile <= N 项（文件名），iFile++，
文件名 = 文件名 [iFile];
如果（结束于（文件名，“.jmp”），
dt = 打开（目录 || 文件名）；
摘要 << addrows( 1 );
摘要：名称=文件名；
摘要：rows = N Rows(dt);
关闭（dt，“nosave”）；
);
);
如果你也想要这些文件，还有一个递归选项......
