358026_de-DE

liliconcom

So führen Sie angehängte Skripte für eine aus der Datenbank gezogene Tabelle automatisch aus

Der folgende Code hängt alle jsl-Skripte im Verzeichnis c: \ work an die Tabelle dt an.

 

Kennen Sie eine Funktion / einen Befehl, mit der / der er auch automatisch auf dem Tisch ausgeführt werden kann?

 

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 || ")" ) );
   );
  );
);

SkriptingBetreff: So führen Sie angehängte Skripts für eine aus der Datenbank gezogene Tabelle automatisch aus

Das

dt << run scripts( filename );

führt das Skript aus, nachdem es in der Datentabelle gespeichert wurde.

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 );
   );
  );
);

Wenn Sie möchten, dass alle Skripts ausgeführt werden, wenn die Datentabelle geöffnet wird, können Sie ein Tabellenskript namens OnOpen hinzufügen, in dem Sie angeben können, dass jedes der Tabellenskripts ausgeführt werden soll.