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]Pesquisar utilizando critérios de filtro

    wvsilva
    wvsilva
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 13/06/2010

    [Resolvido]Pesquisar utilizando critérios de filtro Empty [Resolvido]Pesquisar utilizando critérios de filtro

    Mensagem  wvsilva 9/7/2010, 03:55

    Boa noite!!
    Preciso fazer um sistema de vendas.
    Tenho uma tabela de cadastro de produtos.
    Preciso criar um formulario de venda
    Aonde quando eu digite o codigo de barras o sistema busque a descrição e o valor unitario.
    Alguem poderia me ajudar!
    Desde ja agradeço cheers
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Pesquisar utilizando critérios de filtro Empty Re: [Resolvido]Pesquisar utilizando critérios de filtro

    Mensagem  criquio 9/7/2010, 11:51

    Você vai precisar de um formulário e de um subformulário. No formulário ficará o campo no qual você digitará o código do produto e o preço total, alem de outros ítens que se fizer necessário e no subformulário será aonde os produtos serão incluídos para que se possa fazer o cálculo no final da venda, pois creio que poderá ser vendido vários produtos em uma única negociação, correto?
    Existem várias formas para se buscar o produto após digitar o código, entre as quais podemos citar: uma combo que propaga os outros campos, o DLookUp e o Recordset. Forneça mais detalhes sobre seu sistema.
    Você só tem uma tabela para produtos?


    .................................................................................
    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.

    wvsilva
    wvsilva
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 13/06/2010

    [Resolvido]Pesquisar utilizando critérios de filtro Empty Re: [Resolvido]Pesquisar utilizando critérios de filtro

    Mensagem  wvsilva 9/7/2010, 14:28

    Sim eu so tenho uma tabela de cadastro de produtos.
    Neste formulario de venda eu queria saber se tem como colocar um codigo que busque o dados mas sem ser um subformulario.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Pesquisar utilizando critérios de filtro Empty Re: [Resolvido]Pesquisar utilizando critérios de filtro

    Mensagem  vieirasoft 9/7/2010, 15:03

    Viva:

    Se não quer usar um subformulário conforme o Moderador Criquio aconselhou e muito bem, faça assim:

    1-Crie uma consulta só com os dados que pretende a partir da tabela

    2- Crie um novo formulário e insira uma listabox anexada à consulta e um botão de comando

    3- No evento de um botão do form coloque:

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "seuformcom a listbox"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

    4- Abra o form com a Listbox e no botão de comando insira o código:
    On Error Resume Next

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "seuformprincipal"
    stLinkCriteria = "[ID]=" & Me![nome da sua lista]
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    DoCmd.Close acForm, ("seuformcomalista"), acSavePrompt

    Feche tudo e abra o form principal. Clique no botão para chamar o form que contém a lista. Clique sobre o produto seleccionado (este fica iluminado em negro) e clique no botão de comando. O produto seleccionado vai aparecer no form principal.

    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Pesquisar utilizando critérios de filtro Empty Re: [Resolvido]Pesquisar utilizando critérios de filtro

    Mensagem  vieirasoft 9/7/2010, 15:16

    Preparei-lhe um exemplo simples. Veja se é isto que quer:

    http://dl.dropbox.com/u/8157744/wsilva.zip

    wvsilva
    wvsilva
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 13/06/2010

    [Resolvido]Pesquisar utilizando critérios de filtro Empty Re: [Resolvido]Pesquisar utilizando critérios de filtro

    Mensagem  wvsilva 9/7/2010, 16:48

    Obrigado pela ajuda.
    Mas ainda não é isto que estou procurando.
    è mais o menos assim exemplo sistema de busca de cep.
    Tenho uma tabela com os ceps logradouro e bairro.
    No caso eu digite o cep apareça o endreço e bairro
    e mais ou menos assim.
    Desde ja agradeço pela ajuda de todos
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Pesquisar utilizando critérios de filtro Empty Re: [Resolvido]Pesquisar utilizando critérios de filtro

    Mensagem  vieirasoft 9/7/2010, 16:56

    Acho que agora entendi

    Coloque um combobox no seu form

    1- Origem do controle ID (Exemplo)

    2- Origem da linha Tabela/Consulta....SELECT Cliente.Id, Cliente.NomeDaEmpresa FROM Cliente ORDER BY Cliente.NomeDaEmpresa;

    3 -Private Sub Id_AfterUpdate()
    On Error Resume Next


    ' Avaliar o filtro antes ser passado para a função DLookup.
    strFiltro = "Id = " & Me!Id

    ' Procurar o preço unitário do produto e atribuí-lo ao controlo PreçoUnitário.

    Me!Endereço = DLookup("Endereço", "cliente", strFiltro)
    Me!Cpt = DLookup("Cpt", "cliente", strFiltro)
    Me!Local = DLookup("Local", "cliente", strFiltro)
    Me!Telefone = DLookup("Telefone", "cliente", strFiltro)
    Me!Pagamento = DLookup("Pagamento", "cliente", strFiltro)
    Me!Expedição = DLookup("Expedição", "cliente", strFiltro)
    Me!Contribuinte = DLookup("Contribuinte", "Cliente", strFiltro)
    Me!CBarra = DLookup("CBarra", "Cliente", strFiltro)
    Me!AdicionarP = DLookup("AdicionarP", "Cliente", strFiltro)
    End Sub

    Isto é um exemplo apenas, mas tenho a certeza que isto que necessita. Se tiver dúvidas apite.

    Conteúdo patrocinado


    [Resolvido]Pesquisar utilizando critérios de filtro Empty Re: [Resolvido]Pesquisar utilizando critérios de filtro

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 20:59