IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB 6 et antérieur Discussion :

Ecrire un fichier texte avec LF comme fin de ligne


Sujet :

VB 6 et antérieur

  1. #1
    Membre averti Avatar de megamario
    Homme Profil pro
    VB6/VB.net/C/C++/C#
    Inscrit en
    Septembre 2008
    Messages
    927
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 53
    Localisation : France, Indre et Loire (Centre)

    Informations professionnelles :
    Activité : VB6/VB.net/C/C++/C#
    Secteur : Industrie

    Informations forums :
    Inscription : Septembre 2008
    Messages : 927
    Points : 312
    Points
    312
    Par défaut Ecrire un fichier texte avec LF comme fin de ligne
    Bonjour à tous,

    J'ai un petit souci que je n'arrive pas à résoudre pour le moment.

    J'ai un fichier de type texte qui me sert de fichier de configuration. il sera implanté dans une machine embarqué sous linux. La fin de ligne sous ce linux étant le LF, mes lignes se termine donc par FL et non CRLF.

    Le souci c'est que sur Windows, avant l'envoie du fichier, l'utilisateur sera amener à changer des paramètres.

    J'arrive sans souci à lire le fichier à l'aide de ( Open file For Binary As #f ). Je recherche LF dans ma lecture et nickel.

    Pour l’écriture je suis plus embêter.

    Auriez-vous une idée. Je continue à faire des essais et recherche.

    Merci

  2. #2
    Membre averti Avatar de megamario
    Homme Profil pro
    VB6/VB.net/C/C++/C#
    Inscrit en
    Septembre 2008
    Messages
    927
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 53
    Localisation : France, Indre et Loire (Centre)

    Informations professionnelles :
    Activité : VB6/VB.net/C/C++/C#
    Secteur : Industrie

    Informations forums :
    Inscription : Septembre 2008
    Messages : 927
    Points : 312
    Points
    312
    Par défaut
    J'ai trouvé, on peut aussi écrire en binary, ce que je connaissais pas en vb, a l'aide de Put



    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    Private Sub WriteBinaryText(ByVal f As Integer, ByVal txt As String)
        Dim ln As Integer
        Dim Octet As String * 1
        Dim i As Integer
        ln = Len(txt)
        For i = 1 To ln
            Octet = Mid(txt, i, 1)
            If Octet <> vbLf Then
            Put f, , Octet
            End If
        Next i
        Put f, , vbLf
     
    End Sub
    Chaque ligne que j'ai gardée, je les envoie dans cette méthode aprés avoir ouvert le fichier bien-sûr en mode binary. Les lignes modifier viendront s’insérer le moment venue, et à chaque fin de ligne j'ajout le vbLf.

    Sans oublier de fermer le fichier à la fin.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 3
    Dernier message: 03/04/2015, 11h54
  2. Réponses: 0
    Dernier message: 26/09/2014, 12h44
  3. fichier texte avec comme nom une variable
    Par olobo dans le forum Débuter
    Réponses: 4
    Dernier message: 04/01/2010, 16h55
  4. [WD 11] ecrire dans un fichier texte avec foAjout
    Par WDKyle dans le forum WinDev
    Réponses: 3
    Dernier message: 29/04/2009, 16h08
  5. [Débutant] Ecrirer un fichier texte avec les numéros de ligne ?
    Par Krillz dans le forum MATLAB
    Réponses: 14
    Dernier message: 26/02/2009, 00h09

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo