ThecodeMaster
Gebruiker
- Lid geworden
- 23 jun 2009
- Berichten
- 56
Hallo,
Ik heb in een access-database een plaatje opgeslagen.
In het programma wat ik aan het schrijven ben gaat het lezen en schrijven van de data prima.
Maar nu wil ik de data van het plaatje in een imagelist plaatsen tijdens runtime.
en nu krijg ik telkens een fout.
Snap het even niet. Waarschijnlijk kijk ik ergens over heen wat betreft een verwijzing o.i.d.
Ik krijg de volgende fout:
System.InvalidCastException: 'Kan een object van het type System.Byte[] niet converteren naar het type System.Drawing.Bitmap.'
Deze fout treed op in de regel
'plaatje' is dat deel uit de datatabel waarin de bitmap is vastgelegd.
Wie kan mij even op weg helpen.
Hieronder de volledige code.
Werner
Ik heb in een access-database een plaatje opgeslagen.
In het programma wat ik aan het schrijven ben gaat het lezen en schrijven van de data prima.
Maar nu wil ik de data van het plaatje in een imagelist plaatsen tijdens runtime.
en nu krijg ik telkens een fout.
Snap het even niet. Waarschijnlijk kijk ik ergens over heen wat betreft een verwijzing o.i.d.
Ik krijg de volgende fout:
System.InvalidCastException: 'Kan een object van het type System.Byte[] niet converteren naar het type System.Drawing.Bitmap.'
Deze fout treed op in de regel
Code:
imgConcept = objReader.Item("Plaatje")
'plaatje' is dat deel uit de datatabel waarin de bitmap is vastgelegd.
Wie kan mij even op weg helpen.
Hieronder de volledige code.
Code:
Dim strSQL As String
Dim imgConcept As System.Drawing.Bitmap
Dim strConnection As String = My.Settings.ConnectionStringMorf
Dim objConnection As New OleDb.OleDbConnection(strConnection)
objConnection.Open()
Dim Trans As OleDb.OleDbTransaction
Trans = objConnection.BeginTransaction
Dim objCommand As New OleDb.OleDbCommand
strSQL = "SELECT Plaatje FROM Concept"
objCommand.CommandText = strSQL
objCommand.Connection = objConnection
objCommand.Transaction = Trans
Dim objReader As OleDb.OleDbDataReader
objReader = objCommand.ExecuteReader
Do While objReader.Read
imgConcept = objReader.Item("Plaatje")
ImageListConcepten.Images.Add(imgConcept)
Loop
objReader.Close()
objConnection.Close()
Werner