Discussion :

[Marc-L]

Justement ! Pour lire un fichier non texte dans une variable comme un fichier texte,
comme déjà conseillé, utiliser alors un buffer en lecture.

Sinon utiliser un type de données correspondant au format d'un enregistrement du fichier de données packé
(ou encore une fonction convertissant chaque donnée) afin d'alimenter soit directement une feuille de calculs
(en ayant au préalable désactiver l'affichage, le calcul automatique, …) soit une variable tableau à décharger
dans la feuille de calculs une fois pleine …

[TiJean2910]

Pour un cas similaire à toi, j'utilise la commande suivante (légèrement différente):

Code :

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

1
2
3
4
5
6
szFileName = LB_File_Path.Caption
f = FreeFile
Open szFileName For Binary As #f
fileContent = String$(LOF(f), " ")
Get #f, , fileContent
Close #f

Pas sûr que cela améliore ton problème mais avec cette procédure j'arrive à ouvrir un fichier de 160Mo sans soucis.

[stimp4ck]

@Tijean: même problème avec ton code, la commande String$(LOF(f), " ") ne passe pas et me génère une erreur 14

@Marc-L: Je veux bien passer par des buffers, et c'est le cas dans le code que j'utilisais avant, mais, ce n'est pas la lecture du fichier qui me pose problème mais bien son stockage dans une variable que je veux spliter après.
Avec des gros fichier le fait de faire fileContent = fileContent & Buffer génère toujours la même erreur.

Le truc c'est que ca passe beaucoup mieux quand je stock l'intégralité du fichier dans un tableau (chaque élément du tableau contenant un morceau du fichier, j'ai choisi de diviser le fichier en 30 morceaux histoire de prévoir gros ...)
Seulement je ne peux pas concaténer tout les éléments du tableau car je me retrouve avec le même problème d'espace de chaine insuffisant...

[Invité]

un fichier ouvert Binary ne retourne pas du string!

Code :

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

1
2
3
4
5
Dim fileContent() As Byte
Open szFileName For Binary As #f
    ReDim fileContent(LOF(f))
    Get #f, , fileContent
Close #f

ma remarque ne s’adresse pas à TiJean2910, j'ais repris son exemple!

[stimp4ck]

Mais que faire avec un tableau de byte ?

[Invité]

sans un extrait du fichier,!@

[stimp4ck]

Je ne peux pas donner d'extrait du fichier, confidentialité oblige, je travaille dans une banque
Un exemple de fichier pourrait simplement être des lignes séquentielles de texte (avec retour chariot à la fin de chacune) de différentes tailles
En gros comme si on prenait disons 4 phrases différente et qu'on les recopiait des centaines de millier de fois jusqu'a obtenir un fichier de taille conséquente (+ de 100 Mo)

je dois également traiter des fichiers qui ne contiennent pas de retour chariot (linéaire)
La question du traitement de ces lignes n'est pas le problème ici, les algorithmes traitant chacune des lignes marchent.

Mon problème se situe vraiment dans le fait de stocker un fichier entier dans une variable afin de la splitter pour les fichiers séquentiels, le traitement des fichiers linéaires étant différent et se base sur une longueur de ligne prédéfinie.

L'ancienne méthode consistait à lire une ligne d'une certaine longueur puis de l'éclater suivant un format prédéfini en terme de position longueur dans la ligne, mais cela était long étant donné que je fesait a chaque fois un accès fichier, la méthode de la mise en mémoire du fichier en totalité m'avait permis d'améliorer grandement les performances ... mais bon j'ai l'impression que je suis un peu coincé ... :/