我的JLS工作正常,但是速度慢,有什麼方法可以改善嗎?
1.導入多個文件
2.依檔名規則分組為a、b、c、d、e
3. 根據檔案名稱規則決定檔案數量並設定為每組的行數
Names Default To Here(1);
dir = Pick Directory( "Select a directory" );
Multiple File Import(
<<SET folder=""> 0, 插入(a_filelist,filelist[i]) ); if ( b_files > 0, 插入(b_filelist,filelist[i]) ); if ( c_files > 0, 插入(c_filelist,filelist[i]) ); if ( d_files > 0, 插入(d_filelist,filelist[i]) ); if ( e_files > 0, 插入(e_filelist,filelist[i]) ); ); for (i = 1, i <= N items(a_filelist), i++, is_reset_file = contains(a_filelist[i],"NULL"); if( is_reset_file >= 1, selrows = dt << 取得行Where(Contains(char ) (a_filelist[i]), :檔名)); column(dt,"file_lable")[selrows] = 0; b_count = 0; ); if (is_reset_file == 0, a_count = a_count + 1; selrows = dt < < 取得行Where(包含(char(a_filelist[i]), :檔案名稱)); 欄位(dt,"file_lable")[selrows] = a_count ) ); for (i = 1, i <= N items(b_filelist), i++, is_reset_file = contains(b_filelist[i],"NULL"); if( is_reset_file >= 1, selrows = dt << 取得行Where(Contains(char ) (b_filelist[i]), :檔名)); column(dt,"file_lable")[selrows] = 0; b_count = 0; ); if (is_reset_file == 0, b_count = b_count + 1; selrows = dt < < 取得行Where(包含(char(b_filelist[i]), :檔案名稱)); 欄位(dt,"file_lable")[selrows] = b_count ) ); // 以下是 C 、 D 、 E 的循環</SET>