Ver Mensaje Individual
  #1 (permalink)  
Antiguo 07/02/2015, 11:01
jheysson13
 
Fecha de Ingreso: febrero-2015
Mensajes: 8
Antigüedad: 9 años, 2 meses
Puntos: 0
Pregunta insertar imagen access con vb sentencias sql

Buenas a todos.

Quisiera que me pudieran ayudar con mi problema que es el siguiente.
necesito guardar y cargar imagenes a access con vb, mediante codigos, me explico

me conecto a la base de datos asi:

Public conn As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLED B.12.0;Data Source=DBsistema_clinico.accdb;Persist Security Info=False")
Public comando As New OleDb.OleDbCommand
Public sql As String = ""

' funcion para copnectarse
Public Sub conertarse()

Try
conn.Open()

Catch ex As Exception

MsgBox(ex.ToString)
End Try

'utilizo el codigo para cargar la imagen desde la pc. usando un try por si ahi algun error
Try
OpenFileDialog1.Title = " Cargar Imagen"
OpenFileDialog1.FileName = " Imagen "
OpenFileDialog1.Filter = "All Files |*.*"
OpenFileDialog1.ShowDialog()
foto.Image = System.Drawing.Image.FromFile(OpenFileDialog1.File Name)
Catch ex As Exception

End Try

'ahora bien el problema es que no se como mandar esa imagen a la base de datos
pensaba que se podia hacer por sql (disculpen mi ignorancia pero nunca habia tratado con imagenes) lo trate de hacer asi
'sabiendo que "foto" es el nombre del picturebox

comando.CommandType = CommandType.Text
comando.Connection = conn
sql = "insert into paciente ( foto ) values ('" foto.Image "')

comando.CommandText = sql

Try
comando.ExecuteNonQuery()
Catch ex As Exception
MsgBox(ex.ToString)
End Try


' sim embargo esto no funciona, espero que me entiendan y que me puedan dar una manito. a por cierto el campo foto lo nombre en access como Objeto OLE.
gracias de antemano.