<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />この例では、ディレクトリ内のファイルを使用して、ディレクトリ内のすべてのファイルのリストを取得します。 その後、すべての.jmpファイルを探し、それらを1つずつ開いて(後で閉じます)、その間に要約テーブルを作成します。 $ sample_dataディレクトリにはサブディレクトリがあり、それらはリストに含まれますが、EndsWithテストではスキップされます。 EndsWithは大文字と小文字を区別します。あなたが望むかもしれません EndsWith(LowerCase(filename)、"。jmp") .JMPと.jmpで終わるファイルを取得します。
ディレクトリ内のファイルは、末尾の/を必要としませんが、どちらでも構いません。 ただし、リスト内のファイル名がディレクトリに連結されている場合、末尾の/は重要です。 JMPはwindows / mac / and \の問題を処理します。
directory = "$ sample_data /";
fileNames =ディレクトリ内のファイル(directory)。
summary =新しいテーブル( "summary"、新しい列( "name"、character)、新しい列( "rows"、numeric));
(iFile = 1、iFile <= Nアイテム(fileNames)、iFile ++、
filename = fileNames [iFile];
((ファイル名、".jmp"で終わる)
dt = Open(ディレクトリ||ファイル名);
要約<< addrows(1);
概要:名前=ファイル名。
要約:行= N行(dt)。
閉じる(dt、"nosave");
;
;

これらのファイルも必要な場合は再帰的なオプションがあります。
