Recup Tableau

Je voudrais recuperer l'organisation d'un tableau generer par le code ci-dessou qui cree un fichier txt par exemple:

Sub main()
Dim buffer() As Integer
Dim i As Integer

ReDim buffer(511) As Integer

Open App.Path & "\test.txt" For Binary As #1

For i = 0 To 10
buffer(i) = i
DoEvents
Next i

ReDim Preserve buffer(10) As Integer

Put #1, , buffer()

Close #1

Erase buffer
End Sub

Bien sur ce n'est qu'un exemple d'utilisation mais bon le principe i est, merci pour votre aide, par avance.

Tiens je reconais quelques trucs la dedans...

L'organistaion d'un tableau comme un fichier wave?

RDX> ouais bien vu et je voulais enfaite a partir de ce code faire une sorte de base de donné, mais jai repris le code d'un tuto possé récament.
http://www.vbfrance.com/code.aspx?ID=24461

CanisLupus> cool sa marche impec, oulai ben jsuis trop gaze vla comment faire une base de donné sans Axcess en deux trois lignes ;-) trop merci man.

Bon j'ai postez une source qui pourrait interressez du monde sait t'on jamais.

http://www.vbfrance.com/code.aspx?ID=25235