Créer un repertoire avec une date de création dans le nom

**colombe** · 02/05/2007, 11h14

Bonjour,

je cherche à créer par code, un répertoire avec ses sous repertoires
c'est un repertoire de sauvegarde.
si j'ecris code suivent:

ForceDirectories('c:\Paie_8RA\PERM\Table\fig') le repertoir il se crée
mais si le code est comme suit:

ForceDirectories('c:\Paie_8RA\PERM\Table\fig'+datetostr(date))
le repertoir ne se crée pas

car je veut créer un repertoir qui contient dans le nom la date de sauvegarde .

comment fair SVP

Merci d'avance.

Cordialement

**neilbgr** · 02/05/2007, 11h20

DateToStr() donnera un truc du genre 02/05/2007.
Or un nom de dossier ou de fichier ne peut pas contenir, entre autre, de /
Donc, il faudrait plutot utiliser FormatDateTime("yyyy-mm-dd", Now).

**colombe** · 02/05/2007, 11h35

merci pour la reponse,
le repertoir avec la date se crée mais si je veux ajouter l'heure s a ne se crée pas

mon code et le suivent

ForceDirectories('c:\Paie_8RA\PERM\Table\fig_'+FormatDateTime('yyyy mm dd_hh:mm', Now))

merci

**banban54** · 02/05/2007, 11h36

bonjour

je confirme la solution de neilbgr
personnellement je formate la date dans l'ordre suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
var
ChoixRepertoire : string
begin
  ChoixRepertoire := 'c:\Paie_8RA\PERM\Table\fig\'
    + FormatDateTime('yyyy-mm-dd " à " hhmmss', Now);
  ForceDirectories(ChoixRepertoire);
end;

ce qui permet d'avoir un tri croissant par date des dossiers dans 'choixRepertoire'
et avec 'hhmmss' de ne pas écraser la sauvegarde précedente (si même jour)

à plus!

**banban54** · 02/05/2007, 11h41

re
le '_' dans ton code!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
ForceDirectories('c:\Paie_8RA\PERM\Table\fig_'+FormatDateTime('yyyy mm dd"_"hh:mm', Now))

à plus!

**couiss** · 02/05/2007, 11h45

Salut,

les charactères \ / : * ? " < > | sont interdits dans les noms de dossier/fichier.

Donc c'est normal que le répertoire ne se crée pas !!!

A bientôt, Couiss.