Modules: Lecteur de fichier texte	Author(s) Chuck Grimsby

Lecture de fichier texte.

Cette classe fournie ci-dessous consiste en ce que j'ai utilisé au cours de la dernière année tant en VB qu'en Access et combine des méthodes que j'ai développé au fil des années. Comme pour toutes choses du genre, cela tend à devenir complexe, mais une fois la classe incluse dans votre projet, les appels sont vraiment rapides et simples.

Prendre note que cette classe ne couvre que la lecture, ce que vous faites par la suite avec cette lecture n'est pas abordé par la classe fournie.

En plus des opérations standard de fichier, la classe permet de jeter un coup d'oeil sur la ligne de texte qui suit et se rappelle de celle qui précède, ce qui s'avère utile dans les cas où il faut aborder plusieurs formats de lignes ou de type d'étiquette.

La classe maintient trois lignes auxquelles le développeur peut accéder:

.Text, la ligne actuelle

.PreviousLine

.NextLiine, la ligne qui s'en vient, qui suit la ligne actuelle

Téléchargement:

© 2000, Chuck Grimsby, All Rights Reserved.

clsReadTextFile.txt

 

Information pour utilisation:

1. La classe utilise une propriété EndOfFile plutôt que le traditionnel EOF. Prière d'utiliser cette propriété pour s'assurer d'un comportement adéquat.
   


2. BytesLeft ainsi que LeftOver sont des propriétés utilisées internement et il est préférable de ne pas y toucher!
   


3. BufferSize peut être spécifié selon vos besoins. Si votre fichier contient des lignes de plus de 4096 caractères, il faut accroître la taille du dit tampon en conséquences.


4. Utiliser StripLeadingSpaces et StripTrailingSpaces selon vos besoins et selon le format approprié.
   


5. La propriété NoBlankLines permet de passer par dessus des lignes entièrement blanches. Ce paramètre ne s'applique pas à NextLine ni à PreviousLine.
   


6. La propriété StripNulls permet d'oublier les caractère Null, Chr$(0), quelques fois utilisés par certains systèmes pour remplir des espaces non imprimables. Laisser à OFF si non requis d'éliminer ces caractères car à ON, la lecture est un peu ralentie.


7. La propriété OnlyAlphaNumericCharacters permet de ne retourner que des caractères dans la plage ASCII 32 à 127.
   


8. CountOnlyNonBlankLines décompte automatiquement pour vous le nombre de lignes.
   


9. Dépendamment de la séquence de caractères utilisés comme fin de ligne, vous pouvez assigner la propriété LineDelimiter en conséquence. Utile si votre système utilise autre chose que Cr, Lf, or CrLf as line delimiters. Si laissé blanc, la classe essaie de déterminer quel caractère(s) est (sont) appropriés, en privillégiant Carridge Returns (Chr$(13)), Line Feeds (Chr$(10)) et ces deux caractères ensembles. La classe regarde automatiquement pour un FormFeeds et les utilise comme délimiteurs additionnels.
   


10. Si vous utilisez cette classe avec des largeurs fixes, paramétrez FixedWidthLineLength selon la longueur de la ligne. Lorsque cette propriété est >0, les délimiteurs de ligne sont ignorés.
    


11. Utiliser les méthodes:
      .cfOpen pour ouvrir le fichier dont le nom est dans .FileName
      .csGetALine pour obtenir la prochaine ligne
    and 
      .cfCloseFile pour fermer le fichier quand vous en avez fini.
    Surveiller la propriété EndOfFile pour savoir si vous avez terminé.

 

Contact:

Prière de contacter Chuck Grimsby pour toutes questions additionnelles.