Opérations sur les fichiers et fichiers textes (sans api)

Soyez le premier à donner votre avis sur cette source.

Vue 11 786 fois - Téléchargée 1 854 fois

Description

j'ai retrouvé ca alors je l'ai un peu mis a jour ( j'avais fait ca y'a + d'un an ) et je l'ai commenté... Si ca peux aider quelqu'un...
c'est un module (FileIO.bas) qui contient qques fonctions utile
désolé y'avait un ou deux bugs, donc j'ai tout retesté et normalement ca marche....

Liste des fonctions
gestion de fichiers
copie de fichier
suppresson d'un ou plusieurs fichiers
informations sur les fichiers
teste si le fichier existe
renvoie des infos sur le fichier
compte le nombre de ligne dans un fichier texte
lecture / écriture d'un fichier texte (1 seule opération)
+ lecture ligne par ligne d'un fichier texte avec retour des données dans un tableau dynamique

existe aussi en DLL (livrée)

Source / Exemple :


pour utiliser la DLL rien de plus simple, vous la mettez en tant que référence
menu projet/références
puis
Dim File_IO As Dll_TextFile.FileIo
Set File_IO = New Dll_TextFile.FileIo

puis pour utiliser les fonctions (ici la lecture d'un fichier texte-> msgbox)

MsgBox File_IO.ReadText("c:\setup.log").Text

la dll et le module (*.bas) sont dans le zip.

Conclusion :


je m'était peut-être inspiré de quelques sources qui trainent donc merci a leurs auteurs respectifs ( si il y en a ). si vous trouvez un bug ou si vous avez une question vous pouvez me mailer (djnono17@free.fr)

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Proger
Messages postés
248
Date d'inscription
vendredi 10 novembre 2000
Statut
Membre
Dernière intervention
19 décembre 2008
-
l'idée est bonne, mais on peut optimiser tout ca.
Il y a (surement?) un bogue dans la fonction IsExist : elle renvoie True si le fichier n'existe pas (voir dans le select case). Tu peux également utilisé la fonction "dir()" plutôt que faire une gestion d'erreur.

préçise : cette source n'utilise pas d'api.
le code est claire.
Proger
Messages postés
248
Date d'inscription
vendredi 10 novembre 2000
Statut
Membre
Dernière intervention
19 décembre 2008
-
arg gaffe aussi quand tu ferme un fichier : tu utilises Close au lieu de Close #fp, ce qui ferme *tout* les fichiers ouvert!
djnono17
Messages postés
2
Date d'inscription
mercredi 19 février 2003
Statut
Membre
Dernière intervention
2 août 2003
-
proger> thanks
j'vais verifier ca mais c'est bizarre, quand je l'ai testé isexist, ca a marché. j'verifie tout ...
djnono17
Messages postés
2
Date d'inscription
mercredi 19 février 2003
Statut
Membre
Dernière intervention
2 août 2003
-
Voila c'est fait j'ai corrigé un ou deux bugs et ca a l'iari de marché....

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.