JMP 16: Script para abrir el archivo .csv más reciente en una carpeta.He estado usando la ruta = Pick File(); comando para seleccionar manualmente el archivo para importar a una tabla de datos. ¿Puede escribir un comando para importar el archivo .csv más reciente en una carpeta a una tabla de datos? Solo hay una hoja de trabajo en estos archivos.
Tabla de datossecuencias de comandosRe: JMP 16: Script para abrir el archivo .csv más reciente en una carpeta.¿Buscó Funciones en Ayuda > Índice de secuencias de comandos y examinó el grupo de funciones Archivo?
Puede basar un script en las funciones Fecha de creación() o Fecha de última modificación().
Re: JMP 16: Script para abrir el archivo .csv más reciente en una carpeta.Marcos: Gracias por la respuesta. No estaba al tanto del índice de secuencias de comandos en la ayuda, por lo que es de gran ayuda en el futuro. Estaba haciendo referencia a una versión en pdf de una Guía de secuencias de comandos JMP15 que no es fácil de buscar. Un problema que tengo con el nombre del archivo es que incluye la marca de tiempo al final del nombre, por lo que es dinámico. El formato es FileName_YYYYMMDDHHMM.csv. Me quedaré con PickFile por ahora y experimentaré con la función LastModificationDate. Gracias de nuevo.
Re: JMP 16: Script para abrir el archivo .csv más reciente en una carpeta.Puede hacer coincidir el nombre del archivo con la función Contiene() si desea ignorar la marca de tiempo.
Re: JMP 16: Script para abrir el archivo .csv más reciente en una carpeta.Simplemente tuve esta necesidad en el pasado y, afortunadamente, guardé un script por si acaso...
Deberá cambiar las cadenas en las líneas 2 y 3.
Names Default To Here( 1 );
searchext = "jmp"; //extension to look for
searchfolder = "$DESKTOP"; //place to search
lstExtensions = {};
lstDates = {};
lstFiles = Files In Directory( searchfolder );
For Each( {i, j}, lstFiles,
lstExtensions[j] = Char( Right( i, 3 ) );
lstDates[j] = As Date( Creation Date( searchfolder || "/" || Char( i ) ) );
);
dt = New Table( "Files",
New Column( "Name", character, set values( lstFiles ) ),
New Column( "ext", character, set values( lstExtensions ) ),
New Column( "Date", numeric, set values( Matrix( lstDates ) ) )
);
dt << Select where( :ext != searchext );
dt << Delete Rows;
newest = Col Min( :Date );
newfile = searchfolder || "/" || :Name[dt << Get Rows Where( :Date == newest )][1];
Close( dt, no save );
Open( newfile );
