[Resolvido]Erro em tempo de execução

Amigos vejam o que esta errado.
Abrindo o form 'frmpontodevenda' eu coloco uma quantidade de produto a ser vendido clico F3 abre uma tela que localizo o produto...clico 2 vezes efetuo a venda,até ai legal.
Mas se eu coloco o código manualmente vem o erro em tempo de execução dizendo que o access não localiza o campo "produto"referido na expressão.Mas o campo esta la na tabela,e o preço do produto gostaria que aparecesse em formato moeda.
Que estou a fazer de errado.

Abçs.

https://dl.dropboxusercontent.com/u/98318720/PDV-2.zip

Amigos por que esta dando esse erro.

Abçs.

bom dia.....

Onde está dando erro ?

Ola Silvio,como eu falei.
Abrindo o form 'frmpontodevenda' eu coloco uma quantidade de produto a ser vendido, clico F3 abre uma tela que localizo o produto...clico 2 vezes efetuo e a venda é exibida no PDV,até ai legal.
Mas se eu coloco o código manualmente tipo código 727 vem o erro em tempo de execução dizendo que o access não localiza o campo "produto"referido na expressão.Mas o campo esta la na tabela,e queria que o preço do produto aparecesse em formato moeda.
Que estou a fazer de errado.

Kayman, testei aqui, com os códigos: 1079, 727 digitados manualmente. Não me deu erro algum.

Unica coisa, aqui para mim, é que para na leitura do código de barras e fica aguardando esse leitura e não vai mais para frente.

O erro em tempo de execução lhe retorna um numero....qual é esse número ?

Seria por algum acaso...nessa linha o erro:

Forms!frmpontodevenda!frmdetalhesvenda!Produto = DLookup("Produto", "Tbl_Cad_Produtos1", "CodProdManual='" & Forms!frmpontodevenda!CodBarras & "'")

Isso Silvio nesta linha mesmo.
Cada vez que coloc o codigo manualmente da esse erro e dpuro aparece essa linha amarela.
Ja coloquei esse exemplo em outro pc e faz o meo.

Estranho mesmo....
Ao meu ver, sem analisar muito devido a presença de parentes em casa, a sintaxe está correta.

No teu pc nãodeu erro? Coloque uma quantidade...coloque o codigo 727 e tecle enter pra ver se não da o erro.

Elementar meu caro... ele não está se referindo ao campo na tabela e sim no subform:

Forms!frmpontodevenda!frmdetalhesvenda!Descricao = DLookup("Produto", "Tbl_Cad_Produtos1", "CodProdManual='" & Forms!frmpontodevenda!CodBarras & "'")

No subform não tem caixa texto produto... e sim Descricao.

Cumprimentos.

Piloto quando crescer quero ser igual a você,é isso mesmo.
Obrigado Silvio pela atenção.

Abçs.

O Fórum agradece o Retorno.

Pessoal esse exemplo é para quando se quiser estornar um produto da venda,clica-se no sub no ladinho esquerdo dele e logo vem as mensagens se quero ou não estornar.
O problema é que não esta funcionando,alguém saberia ver onde esta o problema,eu tentei mas em vão.

Cumprimentos.

Boa noite Kaynan, você já é veterano no fórum. Devia saber que para novo assunto, novo tópico.
Evite ter sua barra de respeito às regras diminuída respeintando as regras do Fórum

Este tópico está exaurido.


Moderação

Boa noite,

Veja se assim dá certo.

só uma dica: dê uma conferida boa em seus códigos, aqui no fórum tem exemplos com o uso do  DLookup, você não precisa fazer várias chamadas a tabela, com apenas uma chamada você pega todas as informações que precisa economizando muito tempo.

abraços