Salut,

Mon probléme est que j'ai des données dans un champ OLE dont j'ai défini le type mais je ne sais pas les dispatcher dans chacune des variables. J'ai trouvé quelques infos sur le web via le terme consacré blobtype utilisé comme nom de champ dans la table.

Public Type pruftechnick
m_INoOfValues As Long
m_pfXvalue As Double
m_pfYvalue As Double
End Type


Function analyse()
Dim rst As Recordset
Dim db As Database
Dim sql As String
Dim Myrecord As pruftechnick
Set db = CurrentDb
sql = "SELECT T_MeasValue.Ref_MeasJob, T_MeasValue.Data_ID, T_MeasValue.BlobValues FROM T_MeasValue WHERE T_MeasValue.Ref_MeasJob=1438"
Set rst = db.OpenRecordset(sql, dbOpenSnapshot)
With rst
Do While Not .EOF
Debug.Print .Fields("Ref_MeasJob")
Debug.Print .Fields("Data_ID")
?????????????
Debug.Print Myrecord.m_INoOfValues
Debug.Print Myrecord.m_pfXvalue
Debug.Print Myrecord.m_pfYvalue
.MoveNext
Loop
End With
End Function

pouriez vous m'aider pour touver cette sollution,
Merci d'avence.


Romouts