Crear carpeta con la fecha actual ???

[dellarts]

Hola

Estoy intentando crear una carpeta con la siguiente instruccion pero no lo consigo. Lo he conseguido poniendo un nombre cualkiera x cuando añado la hora no me lo hace y no sale ningun error siquiera.

var
  data:tdatetime;
  a:string;
begin
  a := 'aa1';
  data := now();
  createDir('C:\ciclistes\image#'+datetimetostr(data)+'#'+'');
end;

Saludos

[dec]

Hola,

Lo que ocurre es que la cadena que retorna "datetimetostr()" incluye caracteres ("/") que no se permiten para los nombres de archivos o carpetas. Tendrás que sustituirlos, o formatear la fecha de manera que no incluya esos caracteres.

[ContraVeneno]

Código Delphi [-]
CreateDir('C:\UnaCarpeta\'+FormatDateTime('yyyymmdd', Now));

[dellarts]

Gracias voy ha intentarlo

[dellarts]

Ya lo consegui muchas gracias

[Cañones]

Empezado por ContraVeneno

Código Delphi [-]CreateDir('C:\UnaCarpeta\'+FormatDateTime('yyyymmdd', Now));

Hola ContraVeneno, tengo un problema con tu código.
Si dentro de C:\no existe "UnaCarpeta" no funciona.
Desde ya muchas gracias

[ecfisa]

Hola

Sacá el '\' despues de 'C:\UnaCarpeta':

Código Delphi [-]
  CreateDir('C:\UnaCarpeta'+FormatDateTime('yyyymmdd', Now));

Si no la cadena que enviás es: 'C:\UnaCarpeta\20100813' ( si hablamos de hoy... ),
y como 'C:\UnaCarpeta', aún no fue creada, lógicamente no puede crear la carpeta '20100813' que depende de la anterior.


Saludos.

[ContraVeneno]

Obvio, mi querido Watson

lo de "unaCarpeta" era solo por ejemplo... así com utilizo "UnQuery", "UnGrid", "UnaTabla", etc., etc... era solo para el ejemplo.

Saludos.

[rgstuamigo]

Empezado por Cañones

..., tengo un problema con tu código.
Si dentro de C:\no existe "UnaCarpeta" no funciona.
...

En ese caso para obligar la creacion de los directorios(Carpeta) padres, puedes utilizar la funcion "ForceDirectories" en lugar de "CreateDir".
Saludos...

[ecfisa]

Empezado por rgstuamigo

En ese caso para obligar la creacion de los directorios(Carpeta) padres, puedes utilizar la funcion "ForceDirectories" en lugar de "CreateDir".
Saludos...

Ya estoy cambiando el refran:
"todos los días se aprende algo nuevo"

por:
"todos los días se aprende una función nueva" ...

Saludos.

[Cañones]

Empezado por rgstuamigo

En ese caso para obligar la creacion de los directorios(Carpeta) padres, puedes utilizar la funcion "ForceDirectories" en lugar de "CreateDir".
Saludos...

Muchas gracias. Justo lo que necesitaba. Gracias nuevamente por entender lo que necesitaba.

Saludos de Cañones.

[manujimenez]

Y como se renombra una carpeta que ya tienen ficheros y directorios con la fecha????
por que esto no me funciona?

CreateDir('C:\www'+ 'FormatDateTime'('yyyymmdd', Now));

:|

[Casimiro Noteví]

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración

Recuerda poner los tags al código fuente, ejemplo:



Gracias

[ecfisa]

Empezado por manujimenez

Y como se renombra una carpeta que ya tienen ficheros y directorios con la fecha????
por que esto no me funciona?

CreateDir('C:\www'+ 'FormatDateTime'('yyyymmdd', Now));

:|

Hola manujimenes.

Por favor, no dupliques las consultas. Ya realizaste esa pregunta en este hilo.

Saludos.