
Mostrar imagen en Picturebox con access OLE
Publicado por Mauricio (28 intervenciones) el 07/04/2015 17:13:09
Amigos tengo un problema, estoy desarrollando una aplicacion y al consultar las imagenes desde DB access no puedo asignarla al Picturebox, el codigo de la consulta es este:
Dim cadenaConexion As String
cadenaConexion = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\DBmant\mante.mdb"
Dim miConexion As OleDbConnection
miConexion = New OleDbConnection(cadenaConexion)
Dim EquiposTableAdapter As OleDbDataAdapter
EquiposTableAdapter = New OleDbDataAdapter
EquiposTableAdapter.SelectCommand = New OleDbCommand("SELECT * FROM equipos WHERE idplanta = '" & CbPlanta.Text & "' ", miConexion)
Dim MantencionDataSet1 As DataSet
MantencionDataSet1 = New DataSet
MantencionDataSet1.Tables.Add("equipos")
EquiposTableAdapter.Fill(MantencionDataSet1.Tables("equipos"))
CbEquipo.DataSource = MantencionDataSet1.Tables("equipos")
CbEquipo.DisplayMember = "nomEquipo"
con esto lleno el combobox y al elegir el nombre del equipo me tiene que mostrar la imagen en el picture y no me sale nada en limpio, favor ya que estoy al borde.
Dim cadenaConexion As String
cadenaConexion = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\DBmant\mante.mdb"
Dim miConexion As OleDbConnection
miConexion = New OleDbConnection(cadenaConexion)
Dim EquiposTableAdapter As OleDbDataAdapter
EquiposTableAdapter = New OleDbDataAdapter
EquiposTableAdapter.SelectCommand = New OleDbCommand("SELECT * FROM equipos WHERE idplanta = '" & CbPlanta.Text & "' ", miConexion)
Dim MantencionDataSet1 As DataSet
MantencionDataSet1 = New DataSet
MantencionDataSet1.Tables.Add("equipos")
EquiposTableAdapter.Fill(MantencionDataSet1.Tables("equipos"))
CbEquipo.DataSource = MantencionDataSet1.Tables("equipos")
CbEquipo.DisplayMember = "nomEquipo"
con esto lleno el combobox y al elegir el nombre del equipo me tiene que mostrar la imagen en el picture y no me sale nada en limpio, favor ya que estoy al borde.
Valora esta pregunta


0