Discussion :

[User]

Bonjour à tous,

J'obtiens le message d'erreur "Espace de chaîne insuffisant" lors de la tentative de lecture d'un fichier texte volumineux (146 mo).

Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Public Function ReadLargeFile(chemin As String) As String
Dim c As String
Open chemin For Binary As #1
c = Space$(LOF(1))
Get #1, , c
Close #1
ReadLargeFile = c
End Function

Pensez-vous qu'il y a une solution à ce problème ?

Merci par avance,
Cdlt,
Denis

[unparia]

Bonjour

Oui : ne pas tout lire d'un seul jet. Décomposer en parties ou lire ligne par ligne et parcourir jusqu'à la dernière

[User]

Bonsoir,

Merci bien,

Oui, j'avais pensé à cette solution, mais il me faut réécrire une bonne partie de mon code.

J'aurais préféré une autre solution, mais sinon je m'en contenterai.

[unparia]

Il n'y a pas d'autre solution.

[User]

Finalement je vais essayer de réduire la taille du fichier car il y a des données inutiles.

Cdlt,

[unparia]

Les sages traitent par blocs n'excédant pas 512 k.
La limite n'est pas seulement celle de la taille, mais dépend également des disponibilités "consécutives" (sans nécessités de chaînages d'adresses) sur le disque dur.

[User]

et niveau temps de lecture du fichier c'est pareil ?

[clementmarcotte]

Bonjour,

Je n'ai rien actuellement sous la main pour tester, et je ne sais pas si c'est encore possible. Cela fait que tout cela c'est au cas où.

Dans "l'ancien temps", il y avait moyen d'utiliser ADO et le driver "Jet", si on peut dire, d'Access/Excel pour interroger un fichier texte de la même façon que pour ACCESS ou un fichier Excel. Mais, depuis que MS a remplacé le moteur Jet par le moteur ACE, je ne sais pas si c'est encore possible.

Tu peux toujours jeter un œil sur ces pages:

https://msdn.microsoft.com/fr-fr/library/bb469892.aspx

https://support.microsoft.com/fr-fr/kb/247412#top


https://www.connectionstrings.com/excel/

https://www.connectionstrings.com/textfile/

[User]

Merci c'est sympa d'avoir fait ces recherches, je vais étudier ça demain et reviendrai vers toi ces jours prochains si j'ai trouvé une solution,

J'avais lu également les mêmes conclusions et les mêmes expications que unparia sur le net, mais comme on dit 2 avis valent mieux qu'un !

Bonne soirée

[unparia]

Vous êtes apparemment deux sur un problème similaire, bien que sous deux langages VB distincts
Lis donc également cette discussion :
http://www.developpez.net/forums/d15...o/#post8596136
En appelant toutefois ton attention sur le fait que la dernière proposition de DarkVader n'est pas pour VBA.

[User]

Vous êtes apparemment deux sur un problème similaire, bien que sous deux langages VB distincts
Lis donc également cette discussion :
http://www.developpez.net/forums/d15...o/#post8596136
En appelant toutefois ton attention sur le fait que la dernière proposition de DarkVader n'est pas pour VBA.

Merci unparia pour ce lien.

En fait, mon fichier contient des blocs de longueur variable et délimités par un indicateur de début "ID..." et un indicateur de fin "//".
Je parcours les blocs dans une boucle et mon traitement s'effectue sur chacun des blocs dans cette boucle.

Je suis donc obligé :

Soit de lire la totalité du fichier.
Soit de lire au travers d'une bouble à chaque fois 1 ou plusieurs de ces blocs de longueur variable.

Concernant le message d'erreur, j'ai l'impression après avoir échangé avec un collègue que c'est un problème VBA :

"Selon ce que tu fais ensuite avec cette très grosse chaîne de caractères, ça peut fonctionner ... ou pas."

Cdlt,
Denis

[XLRATOR]

Bonjour à tous,

User,
Je rejoint clementmarcotte dans sa solution, elle est d'ailleurs la plus sage, recourir à une interrogation SQL qui puisse récupérer des blocs de données bien précis.

clementmarcotte,

Dans "l'ancien temps", il y avait moyen d'utiliser ADO et le driver "Jet", si on peut dire, d'Access/Excel pour interroger un fichier texte de la même façon que pour ACCESS ou un fichier Excel. Mais, depuis que MS a remplacé le moteur Jet par le moteur ACE, je ne sais pas si c'est encore possible.

Le moteur ACE répond bien à tout ce que le moteur JET pouvait faire, il ne devrait pas y avoir de problèmes avec ça.


Bien cordialement.