Lire le contenu d'un fichier en une seule fois

Question

Bonjour Mme/Mr.

J'ai dans un fichier texte un script de création d'une base de données.

Je souhaiterais lire dans une variable le contenu du fichier en une seule fois et non le parcourir.

Merci de m'apporter assistance.

NIAMKE Francis

cs_Jack · Answer

Salut
Pour ça, il te suffit de considérer ton fichier comme un fichier binaire.
Pour lire d'un seul coup son contenu, il te suffit de dimensionner une variable dont la taille sera exactement celle du contenu du fichier.
    Dim ff      As Integer
    Dim sBuffer As String
    
    ff = FreeFile
    Open "C:\Mon fichier.txt" For Binary Access Read As #ff
        sBuffer = String(LOF(ff), " ")
        Get #ff, , sBuffer
    Close #ff
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

FNIAMKE · Answer

J'ai essayé ta méthode.
Mais j'ai un problème

dans ma variable j'ai ces caractères en début ÿþ
alors qu'il ne sont pas dans mon fichier.

il faut dire que j'ai obtenu mon fichier générant le script à partir de SQL manager.

Merci de m'apporter assistance.

NIAMKE Francis

cs_Jack · Answer

Peut-être une histoire de caractères UniCode.
Regarde les fonctions de conversion, genre StrConv (à appliquer sur la chaine récupérée)

FNIAMKE · Answer

Ok ça marche.

Merci pour ton assistance.

une autre question.

Sous dot net grâce à SqlDataSourceEnumerator j'arrive à récupérer les instances de sql server 

est ce que tu connais son équivalent sous VB ou access?

Merci pour ton soutien.

NIAMKE Francis

Lire le contenu d'un fichier en une seule fois

4 réponses

Votre réponse

Discussions similaires