MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Botões de Navegação em Formulário Desacoplado

    dailton_c
    dailton_c
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 67
    Registrado : 25/02/2012

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  dailton_c em 22/2/2020, 23:01

    Boa noite,

    Preciso de ajuda para implementar botões de navegação em formulários Desacoplado
    Em anexo está o BD, já procurei mas nenhum das referências que encontrei não funcionou.
    Preciso de botões de navegação que carregue os dados dos pedidos e dos clientes.
    O Pedido esta com uma lista não acoplada também.
    Se alguém poder perder um tempinho para me ajudar eu agradeço.
    Ah mas uma coisinha aproveitando, tem como ao excliur o pedido voltar tudo para o estoque?


    Desde já agradecido.
    Anexos
    [Resolvido]Botões de Navegação em Formulário Desacoplado AttachmentBDTestes.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (454 Kb) Baixado 18 vez(es)
    cleverson_manaus
    cleverson_manaus
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1009
    Registrado : 23/09/2011

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  cleverson_manaus em 29/2/2020, 00:46

    Boa noite amigo,

    Da uma olhada nesse exemplo:

    https://www.maximoaccess.com/t27534-estoque-por-lote-via-dao.

    Dúvidas, manda aí!!!

    Abraços,


    .................................................................................
    afro

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Marcar o tópico como resolvido!!!
    dailton_c
    dailton_c
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 67
    Registrado : 25/02/2012

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  dailton_c em 29/2/2020, 15:27

    Boa tarde, cleverson_manaus


    Baixei seu exemplo mas os modulos não consigo abrir!
    Achei legal a parte que eu consigo abrir, mas ainda falta a parte dos modulos que atualiza o estoque e parte de navegação pois sem navegar não vou conseguir excluir um pedido.

    Estou estudando seu exemplo assim que eu tiver mais duvida posso lhe perguntar? outra duvida baixou o meu exemplo para ver como e feito a minha estrutura.


    Sem mais e já muito grato pela ajuda,


    Dailton
    cleverson_manaus
    cleverson_manaus
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1009
    Registrado : 23/09/2011

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  cleverson_manaus em 29/2/2020, 15:54

    Tranquilo pode perguntar.

    Ainda vou baixar seu exemplo pra dar uma olhada!!

    Quanto aos módulos vou verificar!!!
    Abraços,


    .................................................................................
    afro

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Marcar o tópico como resolvido!!!
    cleverson_manaus
    cleverson_manaus
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1009
    Registrado : 23/09/2011

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  cleverson_manaus em 2/3/2020, 16:48

    Boa tarde amigo,

    Analisando rapidamente sua estrutura, fiquei em dúvida, tipo qual das estruturas é mais fácil implementar .

    Vou terminar aqui aí decido!!!

    Abraços,


    .................................................................................
    afro

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Marcar o tópico como resolvido!!!
    dailton_c
    dailton_c
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 67
    Registrado : 25/02/2012

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  dailton_c em 2/3/2020, 19:44

    Boa tarde,

    Cleverson fico muito grato por dispensar um tempo para me ajudar, lembrando que não sou experiente em access ou qualquer outra programação.
    Mas com a ajuda de muitos aqui, e agradeço a cada um pelo tempo dedicado, a fazer os bd para o meu uso e de minha esposa.


    sem mais e muito grato.

    Dailton
    Ps. estou estudando o seus códigos será que compensa eu refazer tudo?
    dailton_c
    dailton_c
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 67
    Registrado : 25/02/2012

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  dailton_c em 4/3/2020, 18:58

    Boa tarde Cleverson
    Este código é do JPaulo, para navegar em forms desacoplado mas infelizmente não consegui fazer ele funcionar, ele não carrega a lista como os produtos, eu tentei heim outro formulario que eu tenho em um outro bd com anexo também não carrega os anexos.
    Acho que teria que fazer uma sub rotina para carregar a caixa de listagem com os produtos, mas nem tenho ideia de como fazer isto!!

    Private cn As ADODB.Connection
    Private rs As ADODB.Recordset


    Private Sub Form_Load()
    On Error Resume Next
    Set cn = CurrentProject.Connection
    Set rs = New ADODB.Recordset

    With rs
    Set .ActiveConnection = cn
    .Source = "SELECT * FROM tblVendas"
    .LockType = adLockOptimistic
    .CursorType = adOpenKeyset
    .Open
    End With

    Set Me.Recordset = rs

    Me.txtIdPedido = rs!IdPedido
    Me.txtDataVenda = rs!DataVenda
    Me.txtIdCli = rs!IdCliente
    End Sub


    Private Sub btProximo_Click()
    Me.txtIdPedido = rs!IdPedido
    Me.txtDataVenda = rs!DataVenda
    Me.txtIdCli = rs!IdCliente
    End Sub
    cleverson_manaus
    cleverson_manaus
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1009
    Registrado : 23/09/2011

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  cleverson_manaus em 4/3/2020, 20:34

    boa tarde Dailton,


    Esse código utiliza a biblioteca ADO, trabalho com a DAO.


    Código:
    Private cn As ADODB.Connection
    Private rs As ADODB.Recordset


    Private Sub Form_Load()
    On Error Resume Next
    Set cn = CurrentProject.Connection
    Set rs = New ADODB.Recordset

    With rs
    Set .ActiveConnection = cn
    .Source = "SELECT * FROM tblVendas"
    .LockType = adLockOptimistic
    .CursorType = adOpenKeyset
    .Open
    End With

    Set Me.Recordset = rs

    Me.txtIdPedido = rs!IdPedido
    Me.txtDataVenda = rs!DataVenda
    Me.txtIdCli = rs!IdCliente
    End Sub


    Quantos os módulos do meu exemplo, estão abertos para verificação nos próprios formulários, basta entrar no modo estrutura, exibir o código.


    Vou aproveitar um formulário do seu exemplo, para demonstrar com o DAO, um form desacoplado.


    Abraços,



    .................................................................................
    afro

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Marcar o tópico como resolvido!!!
    dailton_c
    dailton_c
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 67
    Registrado : 25/02/2012

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  dailton_c em 7/3/2020, 23:37

    Boa noite Cleverson

    Conseguiu fazer o exemplo em DAO?
    Tem como ele carregar a caixa de listagem junto com o Pedido?
    Eu já abri os Modulos pelos Formularios, mas tem outros modulos, segue imagem.

    Já grato e no aguardo,

    Dailton
    Anexos
    [Resolvido]Botões de Navegação em Formulário Desacoplado AttachmentModulos.jpg
    Você não tem permissão para fazer download dos arquivos anexados.
    (33 Kb) Baixado 4 vez(es)
    cleverson_manaus
    cleverson_manaus
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1009
    Registrado : 23/09/2011

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  cleverson_manaus em 10/3/2020, 13:23

    Bom dia Dailton,


    Bem, fiz esse na correria para vc ter uma noção.


    Dá uma olhada.


    Abraços,
    Anexos
    [Resolvido]Botões de Navegação em Formulário Desacoplado AttachmentDailton_teste.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (131 Kb) Baixado 20 vez(es)


    .................................................................................
    afro

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Marcar o tópico como resolvido!!!
    dailton_c
    dailton_c
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 67
    Registrado : 25/02/2012

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  dailton_c em 10/3/2020, 18:29

    Boa tarde,

    Cleverson eu baixei o exemplo mas como dividiu o banco de dados, não estou conseguindo abrir o formulário.

    Tem como postar inteiro com a parte que esta dividida e esta dando um erro de biblioteca AUTHZAX.DLL


    No aguardo e agradecido pelo tempo dedicado.

    cleverson_manaus
    cleverson_manaus
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1009
    Registrado : 23/09/2011

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  cleverson_manaus em 10/3/2020, 22:07

    Boa noite amigo,

    Estou sem os arquivos agora, estou na rua.

    Basta vincular as tabelas que são as mesmas do arquivo que vc enviou.

    Abraços,


    .................................................................................
    afro

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Marcar o tópico como resolvido!!!
    cleverson_manaus
    cleverson_manaus
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1009
    Registrado : 23/09/2011

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  cleverson_manaus em 11/3/2020, 12:42

    bom dia amigo,

    dá uma verificada nas referencias do access conforme a figura em anexo.
    Anexos
    [Resolvido]Botões de Navegação em Formulário Desacoplado Attachmentreferencias_projeto.png
    Referencias do Access
    Você não tem permissão para fazer download dos arquivos anexados.
    (39 Kb) Baixado 9 vez(es)


    .................................................................................
    afro

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Marcar o tópico como resolvido!!!
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1150
    Registrado : 13/12/2016

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  Alexandre Fim em 11/3/2020, 13:36

    Apenas um pitaco...passando aqui pra dar minha sugestão:

    Atualmente, a maioria dos sistemas desenvolvidos não utilizam mais esses botões de navegação.
    Imagine que teu sistema possui um cadastro de clientes com 10.000 registros e vc tem que clicar em "Próximo Registro" até achar o registro.
    É inviável !!!
    A melhor forma de pesquisar seria uma tela de pesquisa genérica onde voce seleciona o campo que deseja pesquisar e informa o valor/texto a ser pesquisado (ou parte deste valor/texto) e o sistema busca os dados e carrega essa lista filtrada.

    Segue imagem.

    [Resolvido]Botões de Navegação em Formulário Desacoplado Pesqui11


    Espero ter ajudado.




    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    dailton_c
    dailton_c
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 67
    Registrado : 25/02/2012

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  dailton_c em 12/3/2020, 22:18

    Boa noite,

    Já consegui abrir o seu exemplo, agora estudando.

    E aproveitei a dica do Alexandre, melhor mesmo não ter os botões e fazer abrir por uma lista ai excluir o pedido que precisar ,

    muito obrigado aos dois.

    Quando estiver tudo certinho eu posto o bd.


    Muito grato pela ajuda.



    Dailton
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1150
    Registrado : 13/12/2016

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  Alexandre Fim em 13/3/2020, 12:27

    Beleza Dailton...boa sorte !!
    Valeu ai @cleverson_manaus...abs


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    cleverson_manaus
    cleverson_manaus
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1009
    Registrado : 23/09/2011

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  cleverson_manaus em 13/3/2020, 13:41


    Bom dia,


    Já consegui abrir o seu exemplo, agora estudando. escreveu:

    Blz, qualquer dúvida manda aí!!!


    Valeu ai @cleverson_manaus...abs escreveu:

    Abraços mestre!!!




    .................................................................................
    afro

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Marcar o tópico como resolvido!!!
    dailton_c
    dailton_c
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 67
    Registrado : 25/02/2012

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  dailton_c em 25/3/2020, 22:20

    Boa noite tinha me esquecido do Resolvido.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2458
    Registrado : 22/11/2016

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Re: [Resolvido]Botões de Navegação em Formulário Desacoplado

    Mensagem  DamascenoJr. em 25/3/2020, 22:33

    Ainda está faltando o resolvido.

    Veja como fazer
    https://www.maximoaccess.com/t860-resolucao-de-topicos


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    dailton_c
    dailton_c
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 67
    Registrado : 25/02/2012

    [Resolvido]Botões de Navegação em Formulário Desacoplado Empty Botões de Navegação em Formulário Desacoplado

    Mensagem  dailton_c em 20/5/2020, 20:37

    Desculpas tinha me esquecido ...

      Data/hora atual: 5/12/2020, 07:56