3 participantes
[Resolvido]Duvida salvar dados subfom com origem em consulta
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
- Mensagem nº1
Duvida salvar dados subfom com origem em consulta
Bom Dia !Gente minha duvida é o seguinte é tenho um subform que filtrado pela combo através de consulta certo ,mas se alterar os dados deste subform tem como salvar na tabela, já que a origem é uma consulta ?
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
Você quer salvar na tabela de origem da consulta mesmo ou outra tabela?
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
outra tabela
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
Talvez fosse melhor filtrar os dados em uma listbox e usar Recordset para gravar na tabela.
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
como faço isso?
Criquio se puder me exemplificar
Criquio se puder me exemplificar
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
Vendo agora, acho que você poderia colocar um botão no subformulário, na frente dos campos, para clicar e salvar o registro dessa linha na tabela, ou pode usar o evento "Após atualizar" dos campos se for para atualizar um registro. Se for para inserir como novo registro, melhor o botão mesmo, com um código mais ou menos assim:
CurrentDb.Execute "INSERT INTO NomeTabela(Campo1, Campo2, Campo3) VALUES('" & Me.Campo1DoForm & "', '" & Me.Campo2DoForm & "', '" & Me.Campo3DoForm & "')"
CurrentDb.Execute "INSERT INTO NomeTabela(Campo1, Campo2, Campo3) VALUES('" & Me.Campo1DoForm & "', '" & Me.Campo2DoForm & "', '" & Me.Campo3DoForm & "')"
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Vou deixa ver como fica por enquanto vou deixar aberto topico
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Gente fiz assim
Private Sub Comando48_Click()
CurrentDb.Execute "INSERT INTO detalhecompra(descrição, Custo, qtdcompra) VALUES('" & Me.Descrição & "', '" & Me.custo & "', '" & Me.qtdcompra & "')"
End Sub
mas retorna erro
Private Sub Comando48_Click()
CurrentDb.Execute "INSERT INTO detalhecompra(descrição, Custo, qtdcompra) VALUES('" & Me.Descrição & "', '" & Me.custo & "', '" & Me.qtdcompra & "')"
End Sub
mas retorna erro
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
Amigão, sempre que reportar um erro, procure descrevê-lo para facilitar a identificação e consequente resolução, ok?
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Erro de compilação método ou membro não encontrado
CurrentDb.Execute "INSERT INTO detalhecompra(descrição, Custo, qtdcompra) VALUES('" & Me.Descrição & "', '" & Me.custo & "', '" & Me.qtdcompra & "')"
end sub
o foco fica onde esta destacado
CurrentDb.Execute "INSERT INTO detalhecompra(descrição, Custo, qtdcompra) VALUES('" & Me.Descrição & "', '" & Me.custo & "', '" & Me.qtdcompra & "')"
end sub
o foco fica onde esta destacado
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
Essa mensagem costuma reportar nome de campo errado. Verifique o nome do campo no formulário e na tabela se está tudo certinho.
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Criquio campos estão corretos .
Inclusive alterei para txtdescrição,para não ficar igual a tabela ,mas o erro persiste
Inclusive alterei para txtdescrição,para não ficar igual a tabela ,mas o erro persiste
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
Quais referências estão marcadas?
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Criquio quero colar a imagem das referencias aqui mas não consigo
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Aqui a referencias ativas
http://www.speedyshare.com/files/29579748/Referencias.bmp
vieirasoft- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7304
Registrado : 11/05/2010
Envie para o meu email que eu repasso isso
sergiovieirasoft@gmail.com
sergiovieirasoft@gmail.com
vieirasoft- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7304
Registrado : 11/05/2010
Melhor, rsrsrs
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
criquio deu uma olhada nas referencias?
Convidado- Convidado
Manda o BD ai Amigão... Vamos tentar resolver isto..
A sua consulta se origina de uma tabela certo?
Quer salvar na mesma tabela ou em outra?
Saudações
A sua consulta se origina de uma tabela certo?
Quer salvar na mesma tabela ou em outra?
Saudações
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Harysohn segue bd pode salvar em outra tabela ,tabela esta vc pode adcionar pois não esta no bd certo.
http://www.speedyshare.com/files/29593118/Banco_de_Dados1.accdb
http://www.speedyshare.com/files/29593118/Banco_de_Dados1.accdb
Convidado- Convidado
Agravina.. tenta me explicar para que quer isso...
Voce seleciona um nome de fornecedor na cbo e ela filtra os produtos para este fornecedor em uma consulta baseada na tabela produtos... Ate ai tudo bem....
para que serve isto? depois que filtra na Cbo que uso vai fazer destas informações?
Aguardo
Voce seleciona um nome de fornecedor na cbo e ela filtra os produtos para este fornecedor em uma consulta baseada na tabela produtos... Ate ai tudo bem....
para que serve isto? depois que filtra na Cbo que uso vai fazer destas informações?
Aguardo
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
A ideia é fitro o fornecedor tenho todos os produtos cadastrados para aquele fornecedor ,ai quero dar entrada no pedido tenho todos os produtos só insiro a qtd
por isso preciso gravar na tabela.
por isso preciso gravar na tabela.
Convidado- Convidado
Voce sabe que se altarar a quantidade naquela consulta, isto alterará na tabela produtos...
Convidado- Convidado
A melhor solução para o que pretende..
1 - Uma listBox listando os produtos do fornecedor... e ao clique da listBox inserir os dados no subForm.. que seria o pedido
Entendeu?
1 - Uma listBox listando os produtos do fornecedor... e ao clique da listBox inserir os dados no subForm.. que seria o pedido
Entendeu?
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
tem como exemplificar para min
Convidado- Convidado
Posso te fazer um exemplo amigão.. mas apenas amanha.. pode ser?
do jeito que está não é certo o que pretende fazer...
do jeito que está não é certo o que pretende fazer...
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Certo fico no aguardo!
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Ola Harysohn alguma novidade
Convidado- Convidado
Ja ja Amigão... Take Easy
Convidado- Convidado
Eis ai amigão..
1 - LstBox no form..
2 - Seleciona o Forn. na cbo, ela lança em uma caixa texto que recebe o foco e faz o requery na list
3 - Criada a tabela venda
4 - Duplo click na lstbox insere as dados do registro clicado na tabela, fazendo um requery do subForm..
** So fiz para dois campos,,, insira os demais conforme desejar...
Saudações
http://dl.dropbox.com/u/26441349/Agravina27_07_11.rar
1 - LstBox no form..
2 - Seleciona o Forn. na cbo, ela lança em uma caixa texto que recebe o foco e faz o requery na list
3 - Criada a tabela venda
4 - Duplo click na lstbox insere as dados do registro clicado na tabela, fazendo um requery do subForm..
** So fiz para dois campos,,, insira os demais conforme desejar...
Saudações
http://dl.dropbox.com/u/26441349/Agravina27_07_11.rar
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Grande Harysonh vou trabalhar em cima do exemplo .
Valeu Um Abraço!
Valeu Um Abraço!
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
- Mensagem nº32
Comando Limpar
Qual Comamdo uso para após,salvar limpar dados do subform?
Convidado- Convidado
Ai que está.. o subform é vinculado a tabela......
Temos que ver como abrir com ele sem dados...
Temos que ver como abrir com ele sem dados...
Convidado- Convidado
Pensei assim... duas tabelas..uma temporária vinculada ao subform.. e depois que inserisse todos os dados e efetuasse a venda... transferir os dados para a tabela definitiva, excluindo da tabela temporária... Entendeu..?
Duas consultas... uma Adição TEMP - TblDefinitiva
e outra exclusão para limpar a temp..
Duas consultas... uma Adição TEMP - TblDefinitiva
e outra exclusão para limpar a temp..
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Harisonh ,entendi mas,como fazer
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Harysonh a consulta adição ja fiz e a exclusão como faço nos criterios
Convidado- Convidado
A exclusão não precisa de critério pois vai apagar todos da tabela
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Harysohn andei me virando aqui as consultas acrescimo e exclusão estão prontas,agora como enviar os dados da tbl temporaria para definitiva?
Convidado- Convidado
em um botão ao finalizar a venda...
DoCmd.SetWarnings False
DoCmd.OpeQuery "Sua ConsultaAdicao"
DoCmd.OpenQuery "SuaConsultaExclusão"
DoCmd.SetWarnings True
é por ai...
DoCmd.SetWarnings False
DoCmd.OpeQuery "Sua ConsultaAdicao"
DoCmd.OpenQuery "SuaConsultaExclusão"
DoCmd.SetWarnings True
é por ai...
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Harysohn fiz como me disse mas não deu resultado lembrando preciso enviar s dados da tbl temporaria para definitiva,antes da exclusão
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Nova Duvida Novo Topico vou encerrar este ok
Convidado- Convidado
Manda o novo tópico que vou la.. tentarei assim que possivel fazer isto para voce..
Saudações
Saudações
Agravina- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1623
Registrado : 18/07/2010
Harysonh estou me virando agora ,só falta eu criar uma maneira para executar a consulta de exclusão?
Convidado- Convidado
Em que pé está? fiquei perdido.... precisando me passe o novo topico... ou se precisar de algo mais.. avise-nos
Saudações
Saudações