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