Gambas France BETA


Pas de compte ? Incription

Verification si un dossier est vide

Ce sujet est résolu.

1
AuteurMessages
DIM900#1 Posté le 31/1/2013 à 20:21:36
Hello :)

Dans mon prog j'aimerai vérifier la présence d'un ou plusieur fichier dans un dossier local..
Mais voila j'ai du mal a trouver la commande ou le bout de code qui pourrait retourné une valeur vrai ou fausse.. J'ai tester avec "Exist" mais mon problème, j'ai des nom de fichiers différents dans mon dossier..
Ce dossier est un espace de travail pour mon prog, a chaque fois que le prog fonction se dossier doit vide..
La commande "Exist" demande un nom exacte et non du type "*.* ; ABC*; ABC*.*" .. :cry: :scratch:

Avez vous une idée ? :?: ? :?: ?
Je voudrai une gambas grillée ;) :lol!:
Merci :cheers: :lol!:
Reivillo#2 Posté le 1/2/2013 à 02:19:30
C' est ici, et nul part ailleurs. « Et pis c'est tout ! »Hello aussi.

C'est ici:
http://gambasdoc.org/help/lang/dir?fr&v3

Reivillo.
Version LinuxMint 13 (1.6.1-1+maya-mate(32-bit)) LTS Noyau 3.14.33-031433-generic (27-02-2015)
LinuxMint 13 Mate Fr ICI, LinuxMint 17 Mate Fr .
Programmation Gambas3 Installé depuis la Console Terminal avec successivement: Les 3 Lignes sudo en Gras ci-dessous...
sudo add-apt-repository ppa:gambas-team/gambas3
sudo apt-get update
sudo apt-get install gambas3 -y
Gambas3.8.4-57.47 (Mise à Jour Auto via mintupdate le 28-01-2016)
Pour la Doc, c'est vers là: Documentation Gambas3 FR
DIM900#3 Posté le 4/2/2013 à 16:29:28
Hello

Merci de l info Reivillo..
Je peux continuer mon projet..
Je voudrai une gambas grillée ;) :lol!:
Merci :cheers: :lol!:
gambix#4 Posté le 6/2/2013 à 08:48:39
Faire simple !La réponse est celle-ci :

1
IF Dir(MonChemin).Count = 0 THEN PRINT "Dossier Vide"



Pour info, dir en réalité retourne un tableau de chaine. Je cherche ensuite juste a savoir si au moins une entrée a été retournée.

On peux bien sur aller plus loin en utilisant les filtres de dir. A savoir le canevas ou les filtres de types.

http://gambasdoc.org/help/lang/dir?fr&v3


--

Re a tous :-)
Moins de texte dans une signature c'est agrandir son espace.
DIM900#5 Posté le 6/2/2013 à 20:54:06
Hello

Je l ai écrie de cette manière

For Each FileName In Dir(MonChemin).Sort()
Kill MonChemin &/ FileName
Message.error("xxxxxxxxx")
Stop Event
Return
Next

Je crois que je vais revoir le code car ton code me semble plus approprier a mon projet.. En tout cas merci de l'info gambix..
Je voudrai une gambas grillée ;) :lol!:
Merci :cheers: :lol!:
gambix#6 Posté le 7/2/2013 à 09:14:19
Faire simple !mon dieu oui ... il est rare de devoir se baser sur une erreur pour effectuer un test.
Moins de texte dans une signature c'est agrandir son espace.
1