Insertar imagenes de una base de datos

jose
24 de Noviembre del 2003
Me gustaria saber como puedo insertar imagenes de una base de datos en access en un formulario de visual basic 6, y trabajar como si fuese un campo de texto, pudiendo ir a la siguiente, anterior, etc.

Jose Moure Moure
24 de Noviembre del 2003
Bueno si creo haber entendido lo que tienes que hacer es:
En el formulario tienes que tener para elegir la foto lo siguiente:
1.-Textbox(deshabilitado)
2.-Image(para ver las fotos)
3.-Commandbutton(para buscar las imagenes)
4.-FileListBox(en la propiedad Pattern poner las extensiones que quieras que te aparezcan.Ej:bmp,jpg,etc),esta no visible.Llamale lista

Bueno a la hora de programar se hace lo siguiente:

Private Sub boton_click()
boton.enabled=false
lista.visible=true
lista.setfocus
end Sub

Private sub lista_click()
image.picture=loadpictur(lista.path+"/"+lista.filename)
end sub
Asi vas viendo tus imagenes en el image pero no las metes todavia en el textbox para guardarlas para eso hay que hacer doble click

Private sub lista_dblclick()
Text1(32).Text = lista.FileName
lista.Visible = False
boton.Enabled = True
Aqui va por ejemplo:Aceptar.setfocus(para grabar)
end sub
Private sub texto_change()
If Texto.Text = "" Then
Image.Picture = LoadPicture()
Else
Image.Picture = LoadPicture(lista.Path + "" + Texto.Text)
End If
end sub

Private Sub form_load
lista=app.path & "/nombre de carpeta donde tienes fotos )
end sub

P.D:Despues grabas el campo del texto de la imagen en la b.d en su campo correspondiente,es decir lo introduces como un dato más haces un addnew y despues un update.

Espero no olvidarme de nada si es asi no dejes de avisarme.Suerte