adjuntar imagenes access 2003

[Babylon]

Buenos dias.

Estoy realizando una base de datos de lugares turísticos y necesitaria saber cómo puedo adjuntar imagenes de estos lugares a mi base de datos. Cada registro llevara asociado una imagen y desearia tambien poder elegirla yo mediante una ventana y poder guardarla en un determinado directorio. Es posible?
Alguno ya lo hizo?
Gracias

[Taribo007]

Es mejor que no guardes iamgenes en la bd, mejor guarda la ruta en una campo tipo texto. Para ello, puedes usar por ejemplo este ejemplo:

http://elmundomagicodeltaribo.blogsp...r-archivo.html

Luego, cuando quieras mostrarlo en un formulario, por ejemplo, pones un control Imagen, y a este le asiganaras la ruta guardada, para mostrar la imagen, en el evento current del form ("Al activar registro"), algo asi:

if len(dir(ruta))>0 then
me.NombrControlImagen.picture=ruta
end if

Un saludo

[Babylon]

Muchas Gracias!
Me sirve perfectamente!
Pero creo que no hace una copia de la imagen en un directorio que yo quiero verdad? Es que es posible que tenga que transportar la base de datos a varios cd's y necesitaria incluirles las imagenes tambien.

Un saludo

[Taribo007]

Puedes uasra una funcion similar a esta para copiar las imagenes:

Public Function copiafichero_click(rutaorigenimportar As String,rutadestinoimportar As String)


Dim vr1 As Object
Set vr1 = CreateObject("Scripting.FilesystemObject")

vr1.CopyFile rutaorigenimportar , rutadestinoimportar

Set vr1 = Nothing
End Sub

Un saludo