Lire/ecrire un fichier texte en vb.net

Soyez le premier à donner votre avis sur cette source.

Vue 31 546 fois - Téléchargée 1 857 fois

Description

ce petit code apparament simple peut servir.
Je dis apparement car les retours a la ligne ds vb.net n'ont plus de retour chariot.(vblf au lieu de vbcrlf) or pour enregistrer le fichier il faut les deux. enfin voilà :

Source / Exemple :


Public Function LireFichier(ByVal CheminFichier As String) As String
        Dim MyChaine As String
        Dim FreeF As Integer

        FreeF = FreeFile() 'Possibilité de mettre 1
        FileOpen(FreeF, CheminFichier, OpenMode.Input)
        MyChaine = InputString(FreeF, FileLen(CheminFichier))
        FileClose(FreeF)
        Return MyChaine
    End Function

    Public Sub EcrireFichier(ByVal CheminFichier As String, ByVal Texte As String)
        Dim FreeF As Integer

        FreeF = FreeFile() 'Possibilité de mettre 1
        Texte = Replace(Texte, vbLf, vbCrLf)
        FileOpen(FreeF, CheminFichier, OpenMode.Output)
        Print(FreeF, Texte)
        FileClose(FreeF)
    End Function

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

NicoProg
Messages postés
26
Date d'inscription
lundi 2 avril 2001
Statut
Membre
Dernière intervention
28 mars 2005
-
Tout à fait ce que je cherchais, c 'est parfait, merci beaucoup.
Belsteak
Messages postés
6
Date d'inscription
dimanche 4 juillet 2004
Statut
Membre
Dernière intervention
18 novembre 2004
-
Hello,

Plutôt que d'utiliser vbLf et vbCr, tu peux utiliser la constante vbnewline.
Le nom est assez explicite... :)
SupraDolph
Messages postés
196
Date d'inscription
samedi 12 janvier 2002
Statut
Membre
Dernière intervention
1 septembre 2008
1 -
Merci Belsteak pour ta remarque constructive.
je ne connaisais pas vbnewline et je ne l'ai pas encore essayée mais il est fort peobable que cela soit similaire a vbLf+vbCr soit vbCrLf.

Perso : si vbnewline n'est pas plus rapide au niveau de l'exécution que vbCrLf je continuerai d'utiliser ce dernier car il est plus rapide a écrire :) (je sais je suis un fainéant... lol)
Belsteak
Messages postés
6
Date d'inscription
dimanche 4 juillet 2004
Statut
Membre
Dernière intervention
18 novembre 2004
-
En fait c'est simplement une constante qui a été rajoutée et qui est la combinaison des 2 autres.
Donc normalement la vitesse doit être identique.

Il ya plusieurs constantes qui ont été rajoutées (vbtab, ...). Fais une recherche sur vbnewline, tu les auras toutes.

tu peux les utiliser dans les msgbox par exemple pour formater ton message. C'est très pratique, explicite et évite de tapper les 2....
mortiis
Messages postés
120
Date d'inscription
mardi 11 février 2003
Statut
Membre
Dernière intervention
9 mars 2008
-
Personellement je me dit que si tu est a te demander si vbLf+vbCr est plus rapide que vbnewline, alors tu devrait peut-etre te mettre a programmer en c++ plutot qu'en vb.
Avec c++ tu pourrait optimiser ton code au niveau de la vitesse , mais aussi au niveau de l'espace mémoire et ce beaucoup plus qu'avec vb qui a mon avis est très lent et gourmand en mémoire et limité pour plusieurs actions (pointeurs, hook système , ...).

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.