Un get massif ?

Résolu
Julien237 Messages postés 883 Date d'inscription vendredi 3 novembre 2000 Statut Membre Dernière intervention 3 mars 2009 - 12 déc. 2005 à 12:58
Julien237 Messages postés 883 Date d'inscription vendredi 3 novembre 2000 Statut Membre Dernière intervention 3 mars 2009 - 12 déc. 2005 à 14:54
Bonjour,

J'ai une liste de 1000000 de nombres (single) dans un fichier et je
dois les envoyer dans l'ordre à un tableau de single. Pour le moment,
j'utilise get un million de fois mais c'est un peu lent. N'y aurait-il
pas un moyen d'acquérir tout d'un coup ?

Merci.

2 réponses

Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
12 déc. 2005 à 14:10
à condition qu'il ait été écrit pareil









Dim T() As Single



' Ecriture

Open Nomfichier For Binary As #1

ReDim T(2)

T(0) = 1.23

T(1) = 4.56

T(2) = 7.89

Put #1, , T

Close #1


' Lecture

Open Nomfichier For Binary As #1

ReDim T(2)

Get #1, , T

Close #1


Daniel
3
Julien237 Messages postés 883 Date d'inscription vendredi 3 novembre 2000 Statut Membre Dernière intervention 3 mars 2009 7
12 déc. 2005 à 14:54
Merci !!


J'aime bien les frites...
0
Rejoignez-nous