FILE

Bonsoir,

Je veus effacer des fichiers en série, dont on ne connait pas la quantité futur.
Je m'explique:
Le fichier cf10907.cfp contient le numéro de l'utilisateur (1) et une date (0907) pour juillet 2009. Si un jour je demande au logiciel d'éffacer tout les fichiers de cette utilisateur, je ne connais pas à l'avance le nombre de fichier qui aura été générer (Ex: en juillet 2010 il y en aura 12).
Avec QB j'utilisais la commande FILES pour visualiser tout les fichiers de cette façon: fi$="cf1*.cfp":FILES fi$ et ensuite KILL fi$
Peut-on faire pareil avec FILE_DELETE. Et comment afficher la liste des fihiers
Au passage a combien est limité le nombre de caractères d'un fichier avant et après le point pour les noms de fichiers et application ?

J'espère avoir été clair dans ma demande.

A+

Effectivement, des commandes comme FILES ou KILL seraient bien utiles. Elles n'existent pas actuellement. Ton problème est en fait de parcourir le contenu d'un répertoire, et cela est possible et est même donné en exemple dans le manuel de référence.

On fait cela en 4 temps:
- on se place dans le répertoire voulu avec la commande DIR_CHANGE
- on initialise la lecture des noms de fichier du répertoire avec FILE_FIND_FIRST$
- on lit tous le fichiers du répertoire avec la commande FILE_FIND_NEXT$ placé dans une boucle WHILE qui boucle tant qu'il y a des fichiers à lire (il n'y a plus de fichiers à lire quand les fonctions FILE_FIND_xxx retournent "_")
- on arrête la fonction de balayage d'un répertoire par FILE_FIND_CLOSE

Voici un exemple qui répond à ta question en affichant les fichiers dont le nom commence par "cf1" dans le répertoire "abc";

Code:

dim nom$
label action_sur_fichier

rem on se place dans c:/abc
dir_change "c:/abc"


rem début lecture des noms de fichier
nom$=file_find_first$

rem action en fonction du nom de fichier
if nom$ <> "_" then gosub action_sur_fichier

rem lecture des autres noms
while nom$ <> "_"
  nom$=file_find_next$
  if nom$ <> "_" then gosub action_sur_fichier
end_while

rem fin lecture des noms de fichier
file_find_close

end

action_sur_fichier:
if left$(nom$,3)= "cf1"
  rem on affiche, mais on peut aussi détruire le fichier
  print nom$
end_if
return

Il n'y a pas de limitation par PANORAMIC du nombre de caratères d'un fichier, ni de son extension. Les limites sont donc celles du système d'exploitation, c'est à dire Windows.

Le parcours d'un répertoire, c'est un de ces "trucs utiles" qui devrait faire partie de la page conseil du logiciel, et aussi de la page FAQ du site.

J'ai compris l'astuce et je vais la mettre en application.
Merci PANORAMIC
A+