FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  ­FAQFAQ  ­RechercherRechercher  ­S'enregistrerS'enregistrer  ­MembresMembres  ­GroupesGroupes  ­ConnexionConnexion  
Derniers sujets
» BIN_INV BIN_SHL BIN_SHR
Aujourd'hui à 23:45 par cosmos70

» Comment sélectionner du texte automatiquement ?
Aujourd'hui à 23:38 par vicmac

» Création d'un script image pour page web
Aujourd'hui à 22:59 par vicmac

» gestion d'une attente
Aujourd'hui à 20:50 par Jean Claude

» Fichiers HTML
Aujourd'hui à 20:29 par jjn4

» Bienvenu
Aujourd'hui à 16:11 par JL35

» Petit problème d'éditeur
Aujourd'hui à 15:44 par JL35

» Centrer les fenêtres
Aujourd'hui à 15:28 par jjn4

» RÉSOLU (pas de queue de files des sub) aucun bug
Aujourd'hui à 0:19 par Klaus

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Mars 2010
LunMarMerJeuVenSamDim
1234567
891011121314
15161718192021
22232425262728
293031    
CalendrierCalendrier
Partager | 
 

 FILE

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
Jean Claude



Nombre de messages: 782
Date d'inscription: 07/05/2009

MessageSujet: FILE   Jeu 2 Juil 2009 - 16:50

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+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jack
Admin


Nombre de messages: 559
Date d'inscription: 28/05/2007

MessageSujet: Re: FILE   Ven 3 Juil 2009 - 6:22

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.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://panoramic.free-boards.net
Delannoy



Nombre de messages: 9
Age: 54
Localisation: Paris
Date d'inscription: 16/03/2008

MessageSujet: Re: FILE   Sam 4 Juil 2009 - 10:24

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.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude



Nombre de messages: 782
Date d'inscription: 07/05/2009

MessageSujet: RE: FILES   Sam 4 Juil 2009 - 13:06

J'ai compris l'astuce et je vais la mettre en application.
Merci PANORAMIC
A+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
 

FILE

Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: Un bug dans PANORAMIC?-