Funktion zum Kopieren von DateienIch verwende JMP 12.
Ich möchte nur fünf CSV-Dateien mit unterschiedlichen Namen aus dem Ordner A kopieren und im Ordner B speichern.
Der A-Ordner enthält viele CSV-Dateien.
Mit der Funktion „Datei kopieren“ (siehe unten) kann ich jeweils nur eine Datei kopieren.
Ich muss das folgende Skript fünfmal schreiben, um alle fünf Dateien zu kopieren
Copy File( "C:\A\data1.csv", "C:\B\data1.csv" );
Copy File( "C:\A\data2.csv", "C:\B\data2.csv" );
Copy File( "C:\A\data3.csv", "C:\B\data3.csv" );
Copy File( "C:\A\data4.csv", "C:\B\data4.csv" );
Copy File( "C:\A\data5.csv", "C:\B\data5.csv" );
Gibt es eine Möglichkeit, mehrere Dateien mit einer Funktion zum Kopieren von Dateien zu kopieren?
Oder gibt es eine andere Funktion/ein anderes Skript, mit dem ich dieses Ziel erreichen kann?
Ich danke Ihnen für Ihre Hilfe.
InhaltsorganisationBetreff: Funktion zum Kopieren von DateienDanke schön.
Betreff: Funktion zum Kopieren von Dateiennur ein weiterer Ansatz mit einer Dateilisten- oder Verzeichniskopiefunktion,
Allerdings getestet unter JMP 15 mit Windows, ich habe kein JMP12.
Names Default To Here( 1 );
source_dir = "$TEMP\ADIR";
destination_dir = "$TEMP\BDIR";
// Prepare a directory and some files
If( !Directory Exists( source_dir ),
Create Directory( source_dir )
);
Save Text File( source_dir || "\afile.txt", "afile content" );
Save Text File( source_dir || "\bfile.txt", "bfile content" );
Save Text File( source_dir || "\cfile.txt", "cfile content" );
// Generate list of files
file_list = Files In Directory( source_dir );
// Prepare destination directory
If( !Directory Exists( destination_dir ),
Create Directory( destination_dir )
);
// Copy all files from list
For( i = 1, i <= N Items( file_list ), i++,
Copy File( source_dir || "\" || file_list[i], destination_dir || "\" || file_list[i] )
);
// Copy directory
Copy Directory( source_dir, "$HOME", recursive( 1 ) );
// see results
Open( "$TEMP" );
Open( "$HOME" );
Betreff: Funktion zum Kopieren von Dateienfor (i = 1, i <= 5, i++,
file1 = evalinsert("C:\A\data^i^.csv");
file2 = evalinsert("C:\B\data^i^.csv");
copy file(file1, file2);
);