MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


3 participantes

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    avatar
    SupPremium
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 08/06/2012

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Empty [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    Mensagem  SupPremium 12/6/2012, 13:20

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Altexc



    Meu problema é o seguinte.
    Eu quero digitar o código(busca) e quando eu clicar em buscar eu quero que apareça o resultado da consulta nos campos abaixo.
    depois eu quero poder alterar/excluir estes dados pelos botões abaixo.
    Se possivel, caso não encontre nenhum produto, mostre uma mensagem de nenhum produto encontrado.

    Já tentei varias coisas... select, dlookup, e mais algumas de varios jeitos diferentes e nada reolveu...
    se alguem puder me ajudar

    Desde já agradeço a ajuda


    Última edição por SupPremium em 12/6/2012, 18:00, editado 1 vez(es)
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5074
    Registrado : 20/04/2011

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Empty Re: [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    Mensagem  Silvio 12/6/2012, 13:42

    Bom dia.

    Por gentileza, poste aqui, a parte desse projeto em que você está com problemas para podermos analisarmos com mais calma.

    Grato.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Empty Re: [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    Mensagem  JPaulo 12/6/2012, 14:20

    Esse form está vinculado a alguma tabela ou consulta ?

    Pode sempre utilizar:



    Private Sub SeuCampoCódigoBusca_AfterUpdate()

    If SeuCampoCódigoBusca.Value > 0 Then
    Me.Filter = "[SeuCampoCódigo]=" & SeuCampoCódigoBusca.Value
    Me.FilterOn = True
    Me.Requery
    End If

    End Sub





    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new Instruções SQL como utilizar...
    avatar
    SupPremium
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 08/06/2012

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Empty Re: [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    Mensagem  SupPremium 12/6/2012, 15:53

    Tentei vincula-lo a uma busca, mas não deu certo.
    Tentei vincula-lo a uma tabela e também não funcionou.
    Estou tentando fazer alteração e exclusão de produtos, eu queria que buscasse o produto pelo código digitado no campo "Código do Produto(busca)" e quando eu clicar em "buscar" ele mostra os dados do produto nos outros campos do formulário, para que eu possa altera-los e clicar no botão "Alterar para aplicar a alteração", ou clicar em "Excluir" para apagar o registro.

    Eu tentei esse código que JPaulo passou mas ele só fica pedindo o código do produto e não exibe nenhum dado.

    Estou deixando o link para download no 4Shared do meu Banco de Dados.
    http://www.4shared.com/file/WNkTg1w7/Enderecamento_2.html?
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Empty Re: [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    Mensagem  JPaulo 12/6/2012, 16:56

    Pelo 4shared não consigo fazer o Download

    Compacte com o winzip e anexe aqui em .zip


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new Instruções SQL como utilizar...
    avatar
    SupPremium
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 08/06/2012

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Empty Re: [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    Mensagem  SupPremium 12/6/2012, 17:05

    Esta ai em .rar
    Anexos
    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração AttachmentEnderecamento.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (192 Kb) Baixado 5 vez(es)
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Empty Re: [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    Mensagem  JPaulo 12/6/2012, 17:31

    Veja o simples;


    Private Sub btAcharProd_Click()
    If Me.Texto45.Value > 0 Then
    Me.Filter = "[cod_produto]=" & Texto45.Value
    Me.FilterOn = True
    Me.Requery
    End If
    End Sub


    http://dl.dropbox.com/u/771097/Enderecamento_OLD.rar




    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new Instruções SQL como utilizar...
    avatar
    SupPremium
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 08/06/2012

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Empty Re: [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    Mensagem  SupPremium 12/6/2012, 17:51

    Mto obrigado JPaulo, agora eu entendi.

    Mas eu não consigo escrever para editar...
    como faço agora?
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Empty Re: [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    Mensagem  JPaulo 12/6/2012, 17:56

    Veja nas propriedades do form, guia Dados, coloque permitir editar e deletar = sim


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Folder_announce_new Instruções SQL como utilizar...
    avatar
    SupPremium
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 08/06/2012

    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Empty Re: [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    Mensagem  SupPremium 12/6/2012, 18:01

    muitissimo obrigado JPaulo.

    Vai ajuda muito aqui.

    Conteúdo patrocinado


    [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração Empty Re: [Resolvido] Resultado da Consulta em Caixa de Texto Para Alteração

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 01:47