[Resolvido]relatório com foto

boas malta
mais uma vez venho apelar aos vossos conhecimentos, por não estar a conseguir que da minha BD que está a evoluir com os vossos apoios, mas ainda não consegui entender porque nos exemplos que daqui sako dá na perfeição e quando tento adaptar ao meu trabalho não consigo.
a minha questão?
estou a aproveitar um exemplo do JP e queria que ao clicar num botão existente num formulário , abre uma janela de seleção onde escolho a identificação da foto que pretendo,depois abre um relatório com o local da foto, mas está em branco.
acredito que esteja baralhada a minha questão.

""""

Private Sub Detalhe_Format(Cancel As Integer, FormatCount As Integer)
On Error GoTo Fim
'local da tabela onde está a foto'
If IsNull(Me.Fotos) = False Then
Me.FOTO.Picture = Me.Fotos
FOTO.Visible = True
SEMFOTO.Visible = False
Else
Me.FOTO.Visible = False
SEMFOTO.Visible = True
End If

Fim:
Exit Sub

End Sub

Private Sub Report_Open(Cancel As Integer)
DoCmd.Maximize
End Sub

""""

grato pela ajuda

Poste a parte do teu BD para que possamos ajudá-lo

Cumprimentos.

boas tardes

http://dl.dropbox.com/u/58104242/com%20fotos.rar

segue BD para verificação do meu erro

mirsofy

Aproveitar o meu Exemplo ???

Jamais eu faria o que aí está.

Veja com atenção o exemplo que lhe foi passado no outro tópico que você tem vindo a repetir e a infringir as regras.


http://maximoaccess.forumeiros.com/t8226-resolvidovincular-fotos-via-codigo

boas
por ventura devo ter-me expressado mal, o que queria dizer é a maneira como o teu trabalho é apresentado
um relatório com uma foto, e não um relatório com várias fotos como já me foi ajudado por ti.
copiei o teu codigo e pondo nos relatórios que desejo não dá.
não é minha intenção infringir as leis desta casa, mais que sobre leis é o meu serviço.
agora que não estou a conseguir entender, as funções, por isso peço ajuda.

mirsofy

Tem que se esforçar mais, já lhe demos a cana e ensiná-mos a pescar agora é só ir à pesca.

Boas Mirsofy

Uma dica..

Em Forms ou relatorios, o nome dos campos coloque como
Se texto = txtNome
se Combo = cbpNome
se ListBox = LstNome


Em Tabelas:
cpNome
cpData
cpEndereco


Para forms:
frmNomedoForm
Para relatórios}
rptNomeRelatorio


Não utilize Acentos, nomes como espacos do tipo Form FIcha Individual, prefira assim: frmFicha_Individual (com Underline)

Não utilize em nome de campos em forms ou tabelas, palavras reservadas do access.


Nos Formulários nunca use o nome da caixa texto igual ao nome da tabela.. assim como está o teu. Isto poderá gerá uma enormidade de erros.

Se campo na tabela = CpData
no forms: txtData.


é por ai. Eu aconselho rever todos os nomes de campos e de objetos.



>>>>>>>>> Abra o form, selecione um registro com foto e clique no botão relatório


https://dl.dropbox.com/u/26441349/MirSofy.rar


Cumprimentos.

Boas JP!! Não percebi que estavas a responder...


Pois bem... vendo sua solução postada no outro tópico:

https://dl.dropbox.com/u/771097/Fichas_OLD.rar


Está perfeito e funcional, não sei o porque o colega não o utilizou...


Abraços.

assunto resolvido

Obrigado a você tambem....

Cumprimentos.