J'aurais voulu savoir (une piste ^^), comment faire pour parcourir toute la ligne et extraire ce que j'ai avant les "=" et extraire ce que j'ai après les "=" jusqu'au ";" .....?? Sachant comme vous pouvez le constater, la longueur de l'item varie ainsi ce qui suit le "="........
Merci d'avance pour l'aide que vous pourrez me donner....
Dim xsParts() As String
Dim i as Long
Dim nPos As Long
Dim sBuffer as string
Dim nID as long
Dim nValue as Long
xsParts = Split(sLigne, ";")
For i=0 To Ubound(xsParts)
sBuffer = Trim$(xsParts(i))
nPos = Instr(sBuffer, "=")
If nPos then
nId = Left$(sBuffer, nPos-1)
nValue = Mid$(sBuffer, nPos+1)
...
End If
Next i
Un recordset dynamique permet d'enregistrer les données de manière moi personnellement plus claire qu'un tableau, et plus je n'ai pas à définir sa taille.