358026_zh-CN

liliconcom

如何在从数据库中提取的表上自动运行附加脚本

以下代码会将c：\ work目录中的所有jsl脚本附加到表dt。

 

您知道任何可以使它在桌子上自动运行的功能/命令吗？

 

dt = Current Data Table();
dir = "C:\work";
fileNames = Files In Directory( dir );
if (dir!="",
 For( iFile = 1, iFile <= N Items( fileNames ), iFile++,
   filename = fileNames[iFile];
   show(filename);
   
   If( Ends With( filename, ".jsl" ),
    file_path = dir || "\" || filename;
    show(file_path);
    x = Load Text File( file_path );
    Eval( Parse( "dt << new script(filename," || x || ")" ) );
   );
  );
);

脚本编写回复：如何在从数据库中提取的表上自动运行附加脚本

的

dt << run scripts( filename );

将脚本保存到数据表后，它将运行脚本。

dt = Current Data Table();
dir = "C:\work";
fileNames = Files In Directory( dir );
if (dir!="",
 For( iFile = 1, iFile <= N Items( fileNames ), iFile++,
   filename = fileNames[iFile];
   show(filename);
   
   If( Ends With( filename, ".jsl" ),
    file_path = dir || "\" || filename;
    show(file_path);
    x = Load Text File( file_path );
    Eval( Parse( "dt << new script(filename," || x || ")" ) );
    dt << run scripts( filename );
   );
  );
);

如果要在打开数据表时运行所有脚本，则可以添加一个名为OnOpen的表脚本，您可以在其中指定运行每个表脚本。