duvida imagem

Tentei para imagem:

Me.caixaimagem = Me.Listbox1.Column(3)

So que não funciona devido a ser uma imagem, qual o problema?

Tentei mas não funcionou o código é para quando no form frmHe crio uma fatura ao colocar o nome do funcionário que está na tabela funcionários me apareça a foto do funcionário. o codigo que utilizo é:

Código:

Private Sub NomeFuncionário_AfterUpdate()
    Dim MSG As String
        'Ask user if they want to exit database.
        MSG = MSG & "Deseja vincular/actualizar dados nos campos diretos?"
        If MsgBox(MSG, vbYesNo + 32, "INCLUSÃO DE DADOS") = vbYes Then
Me.Salário = Me.NomeFuncionário.Column(4)
 On Error Resume Next
    Me.foto.Picture = Me.NomeFuncionário.Column(5)
Me.Texto45.SetFocus
End If
End Sub

UP

up

Alguem me pode arranjar um exemplo???????

up

Qual erro dá?

na fatura quando coloco os dados do cliente aparece tudo menos a foto do cliente

Se puder mandar o banco fica mais facil de visualizar o erro ...

Oksegue bd o form é o frmHe que quando coloco o nome do cliente devia aparecer a foto do mesmo no canto superior direito ao lado do campo anexos

nao tenho como abrir o banco amigo , uso 2003

peço desculpa mas a bd não é compativel com 2003 devido aos controlos activX mas o erro é: tenho um forme clientes associado a tabela clientes e tenho um form fatura associado a tabela fatura.
abro a fatura e vou buscar os dados do cliente a tabela clientes atraves de listbox. até ai tudo bem o problema é que no form fatura tem um campo ole que quando escolho o nome do cliente na listbox deveria ficar com a foto do cliente, só que não fica. O codigo que utilizo e:

Código:

Private Sub NomeFuncionário_AfterUpdate()
    Dim MSG As String
        'Ask user if they want to exit database.
        MSG = MSG & "Deseja vincular/actualizar dados nos campos diretos?"
        If MsgBox(MSG, vbYesNo + 32, "INCLUSÃO DE DADOS") = vbYes Then
Me.Salário = Me.NomeFuncionário.Column(4)
 On Error Resume Next
    Me.foto.Picture = Me.NomeFuncionário.Column(5)
Me.Texto45.SetFocus
End If
End Sub

Ta , mas nao da nenhum erro , simplesmente nao aparece?

pq se nao da erro , vc deve estar pegando a coluna errada .. testa na consulta antes...

ja tentei não dá simplesmente não aparece na coluna 5 e a 4 é de valor (moeda Euro) que me coloca o valor noutro campo. É mesmo a coluna 5

mando-te a bd em 2003 mas podes ver que funciona mal

Quando abro o form he , ele da erro no access .. e fecha o programa

o teu acontece a mesma coisa?

pode ter havido um erro de exportacao tb

ve agora

Olá,

Dei uma olhada e vi que o tipo de dado foto está como objetoOLE. Na maioria das práticas que já vi usa-se o método picture para mostrar imagem que tem o seu caminho guardado como texto.

Como é o caso desses dois exemplos:
Como criar Logomarcas em Formulários e Relatórios - Access 2003.

empresa - Identificar formulários e relatórios com informações da empresa.

Acho que trabalhar com campo do tipo objetoOLE não é viável para o seu objetivo.

Analise e repense.

Editado:
Se ter uma ideia não veio nenhuma imagem salva neste campo foto, tive que vincular uma aqui que consequente se eu mandar o projeto de volta não verá.
(Esqueci de deixar claro que nunca vi usar picture para mostrar imagem armazenada em campo do tipo objetoOLE)

ok Dilson obrigado pela informação

Amigo Toyebom , conseguiu resolver seu problema?

Fiz uns testes aqui , e vc deve colocar um campo txt na tabela , com o caminho de onde esta o seu arquivo de imagem 

exemplo :

localFoto = c/sistema/imagem/foto.jpg

no form , vc coloca um campo tipo imagem , e atribui o valor do campo localfoto a este 

ficando assim :

me.CampoImagem.picture = localfoto 

espero ter ajudado ..