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]

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

[dellarts]

Gracias voy ha intentarlo

[dellarts]

Ya lo consegui muchas gracias

[Cañones]

Código Delphi [-] (http://www.clubdelphi.com/foros/#)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':

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 :D:D

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

Saludos. :)

[rgstuamigo]

..., 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]

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]

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 Notevi]

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo (http://www.clubdelphi.com/foros/guiaestilo.php)?, gracias por tu colaboración :)

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

http://www.clubdelphi.com/images/UtilizarTAGs.png

Gracias :)

[ecfisa]

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 (http://www.clubdelphi.com/foros/showthread.php?t=82902).

Saludos.