L'INFORMATION EST FOURNIE TEL QUEL, DE MÊME QUE L'OBJET FILESYSTEMEX, SANS
GARANTIE DE QUELQUE SORTE QUE CE SOIT, IMPLICITE OU EXPLICITE. L'UTILISATEUR
ASSUME L'ENTIÈRE RESPONSABILITÉ DES RISQUES ENCOURUS PAR L'UTILISATION DE CE
LOGICIEL.
Ó Dev Ashish and Terry Kreft (1998-1999), All
Rights Reserved
Le File Search and Properties Object (FileSystemEx) est une
amélioration du FileSearch de Microsoft Office. Il permet de
chercher, récursivement, un fichier sur un disque rigide et d'en extraire des
informations additionnelles (tel que les attributs, dimension, dernière temps
d'accès, date de création, etc.) pour des fichiers spécifiés, ou pour tous les
fichiers rencontrant les critère spécifiés par une recherche.
S'il vous plaît, vous assurer de prendre connaissance du code distribution
guidelines.
Prendre note que cette version de FileSystemEx est une
publication bêta. Veillez fournir toutes suggestions,
commentaires, bugs, en anglais si possible, via email.
Contenu du fichier Zip.
- Dossier Build : Contient le fichier COM dll requis pour
enregistrement sur votre système, en utilisant RegSvr32 et pour
redistribution, si requis.
- Dossier Release : Contient une copie du fichier dll qui
peut être utilisé pour maintenir une compatibilité binaire avec les
prochaines versions. Ne rien modifier dans ce répertoire.
- Dossier Src : Contient le code source VB6 pour le fichier
dll.
- Dossier Test : Contient une application de test en VB6 (avec
source) et une base de données Access 97 qui démontre la
fonctionnalité de l'objet.
Dépendances
- Les fichiers d'exécution Visual Basic 6 (runtime files), qui peuvent
être téléchargés ici.
Points à signaler.
- Si vous désirez créer une procédure événementielle de correspondance en
vis-à-vis de l'objet, dans un objet d'une classe d'Access 97 (incluant le
cas de code derrière un formulaire) en utilisant le mot clé
WithEvents, la déclaration pour l'événement Found
peut contenir une caractère de soulignement précédant la référence à l'objet
File:
Private Sub mclsFO_Found(ByVal FileInfo As FileSystemEx._File)
End Sub
Pour corriger ce problème, utiliser la référence à File
entre parenthèses carrées:
Private Sub mclsFO_Found(ByVal FileInfo As FileSystemEx.[_File])
End Sub
- Une recherche ne peut être annulée que si vous créez une correspondance
de vis-à-vis en utilisant le mot clé WithEvents. Le statut
SearchStatus peut alors être assigné à Vrai pour annuler la
recherche.
- Folder et la collection Folders sont inclus dans le
projet pour fins d'améliorations futures seulement.