cargar imagen

ezequiel
16 de Febrero del 2004
hola estoy tratando de cargar una imagen de un picture box
en un campo que se encuentra en una tabla de Access alguien me
podria decir por favor cual es mi falla en el codigo.




Private Sub cmdImagen_Click()
Dim fichero As String
CommonDialog1.DialogTitle = "Logo"
CommonDialog1.Filter = "Mapa de Bits|*.bmp"
CommonDialog1.DefaultExt = "*.doc"
CommonDialog1.ShowOpen
fichero = CommonDialog1.FileName
Logolalalala.Picture = LoadPicture(CommonDialog1.FileName)
End Sub

Private Sub CmdActualizar_Click()
On Error GoTo UpdateErr
Data1.Recordset.Update
Exit Sub
UpdateErr:
MsgBox Err.Description
End Sub

llanes
16 de Febrero del 2004
hola como está puede decirme cual es el error o enviarme el código completo