SCANNER DE FICHIERS SUR DES LECTEURS OU DANS DES DOSSIERS
Tilois
Messages postés
721
Date d'inscription
dimanche 10 juin 2001
Statut
Membre
Dernière intervention
27 mars 2011
-
29 févr. 2004 à 22:22
Frank339 Messages postés 164 Date d'inscription mardi 18 décembre 2001 Statut Membre Dernière intervention 19 décembre 2008 - 7 mars 2004 à 22:41
Frank339 Messages postés 164 Date d'inscription mardi 18 décembre 2001 Statut Membre Dernière intervention 19 décembre 2008 - 7 mars 2004 à 22:41
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/20842-scanner-de-fichiers-sur-des-lecteurs-ou-dans-des-dossiers
https://codes-sources.commentcamarche.net/source/20842-scanner-de-fichiers-sur-des-lecteurs-ou-dans-des-dossiers
7 mars 2004 à 22:41
6 mars 2004 à 14:15
Petit à petit j'améliore ce programme.
Je vais vais bientôt mettre en ligne la source avec les commentaires, afin de faciliter la compréhension de mon programme.
YOYO, @+.
3 mars 2004 à 09:35
Visiblement, Yoyo est débutant, il n'a peut-être pas encore découvert
l'utilisation des ListView. de plus le code est destiné, il me semble,
aux débutant. Tu remarqueras que c'est aussi sa première source,
l'indulgeance s'impose. Une note à son travail, pour l'encourager, me
semble sympa si t'as téléchargé et testé cette source.
jppompon :
je suis loin d'être un pro en la matière mais au lieu de :
Dir1.Path = Drive1.Drive & ""
Il suffit de retirer ce qui est visiblement de trop :
Dir1.Path = Drive1.Drive
C'est pas plus simple ?
C'est la base à connaitre pour voyager sur les Disques Dur.
Yoyo269 :
Aucun commentaire dans ta source ==> source inexploitable pour les
débutants, c'est bien dommage. Comment un débutant pourrait il
comprendre ta source ?? Quel enseignement pourra-t-il en tirer ?
Je ne comprends pas pourquoi tu mets un ComboBox pour l'extention.
Dans le cas présent, un simple TextBox est largement suffisant.
Continue comme ça (en n'oubliant pas les commentaires) ;-)
8/10 pour le code et le fait que cela fonctionne.
1/10 pour l'absence de commentaire.
Je te note donc à 7/10 au général.
Fraggy.
1 mars 2004 à 15:18
J'ai pour ma part rencontré une difficulté (une erreur) à la ligne
Dir1.Path = Drive1.Drive & ""
que j'ai remplacé par:
'Ici j'enlève le nom du volume
Dir1.Path = Left$(Drive1.Drive, 2) & ""
et du coup ça marche bien !
JPP
29 févr. 2004 à 22:22