Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 20-03-2009
dellarts dellarts is offline
Miembro
 
Registrado: nov 2008
Posts: 15
Poder: 0
dellarts Va por buen camino
Crear carpeta con la fecha actual ???

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.

Código:
var
  data:tdatetime;
  a:string;
begin
  a := 'aa1';
  data := now();
  createDir('C:\ciclistes\image#'+datetimetostr(data)+'#'+'');
end;
Saludos
Responder Con Cita
  #2  
Antiguo 20-03-2009
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
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.
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #3  
Antiguo 20-03-2009
Avatar de ContraVeneno
ContraVeneno ContraVeneno is offline
Miembro
 
Registrado: may 2005
Ubicación: Torreón, México
Posts: 4.738
Poder: 23
ContraVeneno Va por buen camino
Código Delphi [-]
CreateDir('C:\UnaCarpeta\'+FormatDateTime('yyyymmdd', Now));
__________________

Responder Con Cita
  #4  
Antiguo 20-03-2009
dellarts dellarts is offline
Miembro
 
Registrado: nov 2008
Posts: 15
Poder: 0
dellarts Va por buen camino
Gracias voy ha intentarlo
Responder Con Cita
  #5  
Antiguo 20-03-2009
dellarts dellarts is offline
Miembro
 
Registrado: nov 2008
Posts: 15
Poder: 0
dellarts Va por buen camino
Ya lo consegui muchas gracias
Responder Con Cita
  #6  
Antiguo 13-08-2010
Avatar de Cañones
Cañones Cañones is offline
Miembro
 
Registrado: ene 2007
Ubicación: La Paz Entre Ríos
Posts: 354
Poder: 18
Cañones Va por buen camino
Cita:
Empezado por ContraVeneno Ver Mensaje
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
Responder Con Cita
  #7  
Antiguo 13-08-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
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.

Última edición por ecfisa fecha: 13-08-2010 a las 07:04:32.
Responder Con Cita
  #8  
Antiguo 13-08-2010
Avatar de ContraVeneno
ContraVeneno ContraVeneno is offline
Miembro
 
Registrado: may 2005
Ubicación: Torreón, México
Posts: 4.738
Poder: 23
ContraVeneno Va por buen camino
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.
__________________

Responder Con Cita
  #9  
Antiguo 13-08-2010
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Poder: 17
rgstuamigo Va por buen camino
Arrow

Cita:
Empezado por Cañones Ver Mensaje
..., 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...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7
Responder Con Cita
  #10  
Antiguo 13-08-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por rgstuamigo Ver Mensaje
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.
Responder Con Cita
  #11  
Antiguo 14-08-2010
Avatar de Cañones
Cañones Cañones is offline
Miembro
 
Registrado: ene 2007
Ubicación: La Paz Entre Ríos
Posts: 354
Poder: 18
Cañones Va por buen camino
Cita:
Empezado por rgstuamigo Ver Mensaje
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.
Responder Con Cita
  #12  
Antiguo 23-04-2013
manujimenez manujimenez is offline
Miembro
NULL
 
Registrado: abr 2013
Posts: 11
Poder: 0
manujimenez Va por buen camino
Renombrar una carpeta

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

:|
Responder Con Cita
  #13  
Antiguo 23-04-2013
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.022
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
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
Responder Con Cita
  #14  
Antiguo 23-04-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por manujimenez Ver Mensaje
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.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Total=Fecha Actual - Fecha Elegida lKinGl Varios 2 12-09-2008 02:37:04
Obtener fecha actual. JuanErasmo .NET 1 26-12-2006 23:38:05
fecha actual en interbase lledesma Firebird e Interbase 3 29-05-2006 00:34:20
Fecha Actual en DateTimePicker Barzaugc Varios 1 15-11-2005 18:29:20
Comparar una fecha de n campo date contra fecha actual amadis SQL 2 27-06-2005 22:37:41


La franja horaria es GMT +2. Ahora son las 12:41:56.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi