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


2 participantes

    [Resolvido]Sistema de biblioteca

    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Sistema de biblioteca Empty [Resolvido]Sistema de biblioteca

    Mensagem  Almeidar 15/9/2016, 21:40

    Boa noite!

    Prazados amigos, estou criando um sistema para biblioteca gostaria de ajuda de você para a seguinte questão:

    Eu tenha uma tabela de Livro, tabela Membro,tabela Pratilera dos Livros e tabela Movimentação. A tabela PRATILERA mostrará os livros com o status disponível ou Alugado. Por padrão todos vão estar disponível e quando na tabela movimentação der saída em algum livro automaticamente teria que mudar o status na tabela PRATILERA para alugado.

    Serei grato se algum amigo poder me da uma força.


    Última edição por Almeidar em 13/10/2016, 20:50, editado 1 vez(es)
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  FabioPaes 15/9/2016, 21:58

    Veja aqui algo muito parecido com o que precisa, tem ate vide explicativo...
    Ver Mensagem Nº09
    https://www.maximoaccess.com/t27414-resolvidoimpedir-um-preenchimento


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  Almeidar 15/9/2016, 22:16

    Grato amigo, vou dar uma estudada aqui.

    Muito obrigado mesmo.
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  Almeidar 20/9/2016, 00:19

    Amigo boa noite, seu exemplo é ótimo. O problema sou eu que não tenho tanto conhecimento em access. Eu vi o video e não consegui aplicar no meu aplicativo, acho que para conseguir aplicar no meu aplicativo teria que começar do zero com duas tabelas que é como mostra o video que vocês. Eu estou usando três tabelas (LIVRO,MEMBRO E MOVIMETAÇÃO DE SAIDA).O formulario de saída esta feito pela tabela movimatação de saida. Devido a isso não consegui aplicar no meu aplicativo a função de livro disponível e livro emprestado. Se você poder me ajudar te agradeço.

    Abraço,
    Claudio
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  Almeidar 20/9/2016, 00:23

    Vou deixar o meu bd aqui se você poder da uma olhada. Não quero que faça não, gostaria que vc desse uma olhada só para dizer se estou no caminho correto.
    Agradeço a atenção.

    Abraço
    Claudio
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  FabioPaes 20/9/2016, 00:45

    Estou analisando aqui amigo... Mas ja lhe adianto, esta no caminho certo sim... e nao precisará mudar as tabelas nao... Assim que ver onde esta o erro lhe digo aqui!


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  Almeidar 20/9/2016, 00:46

    Grato amigo.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  FabioPaes 20/9/2016, 00:57

    Erro 1: Os Campos Disponivel e Emprestadopara so precisao estar na Tabela de Cadastro do Livro...

    Assim, ao emprestar aquele livro ATUALIZAMOS esses dois campos da tabela LIVROS e nao da tabela de MOVIMENTACAO DE SAIDA, Pois teremos Vários registros para o mesmo livro, certo?


    Erro2: O Update deve ser rodado na tabela Livro (Conforme indicação a cima).


    Erro3: Erro no No SQL do Update:
    CurrentDb.Execute "... emprestadopara = " & [Forms]![MEMBROS]![MEMBRO] & "where cod_livro = " & Me.LIVRO & ""


    Quando estou lidando com Texto o valor fica entre aspas "Duplas" e 'Simples' , Se for Numero fica somente entre "aspas" assim:

    CurrentDb.Execute "... emprestadopara = '" & [Forms]![MEMBROS]![MEMBRO] & "' where cod_livro = " & Me.LIVRO & ""

    Se atente para o Espaço antes do WHERE.


    Erro4: Na combo onde busca o Livro (LIVRO), tenho que ter a mesma quantidade de colunas na propriedade do campo, Formato> Numero de Colunas. No seu Caso esta 2, mas o correto é 5.



    Faça essas correções e vamos para o Próximo...




    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  Almeidar 20/9/2016, 01:04

    Grato amigo. Vou verificar esses erro e continuo amanhã.
    Saindo agora do trabalho.


    Valeu pela a ajuda.
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  Almeidar 20/9/2016, 23:38

    Boa noite amigo!

    Sua explicação é excelente mas não estou conseguindo caminhar. Sempre da erro de compilação
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  FabioPaes 21/9/2016, 00:52

    Vamos la, posta a nova versao com suas modificacoes...


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  Almeidar 21/9/2016, 01:06

    Amigo, obrigado.

    Desculpa os erros grosseiros, é que não entendo nada de programação.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  FabioPaes 21/9/2016, 03:06

    Amigo, vc se confundiu bem...

    Vamos la... Mude o comando que tem no evento apos atualizar do campo Livro, mude para:


    Private Sub LIVRO_AfterUpdate()
    If Me.LIVRO.Column(3) = -1 Then
    MsgBox "Livro ja Emprestado para: " & Me.LIVRO.Column(4), vbInformation
    Me.Undo
    Else
    CurrentDb.Execute "update [livros] set disponivel = -1, emprestadopara= '" & Me.MEMBRO.Column(1) & "' where COD_LIVRO = " & Me.LIVRO & ""
    End If
    End Sub


    Apague o Comando que tem la, no evento Antes de atualizar...
    Mude de 2 colunass para 5 colunas, o campo Livro.


    Assim, ja fara a mudança...

    Agora so tera que colocar o comando no formulario de devolução, para fazer o inverso do comando a cima...
    Atualizando os campos para esses Valores:

    disponivel = 0
    emprestadopara= ""





    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  Almeidar 22/9/2016, 00:46

    Boa noite!

    Fabaio, queria agradecer a sua ajuda. Sei que já passei do limite de solicitar sua ajudar, mas já estou quase jogando a toalha. Não consigo entender os comando por dentro do access. Sem querer ser abuso estou deixando meu bd aqui se caso der para você dar uma olhada. Mas mesmo assim abrigado pela atenção.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  FabioPaes 22/9/2016, 02:02

    Veja aqui:
    https://www.dropbox.com/s/aaexvkbk86jrxcg/BIBLIOTECA%20-%20Copia.zip?dl=0


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Sistema de biblioteca Empty Biblioteca

    Mensagem  Almeidar 24/9/2016, 00:55

    Amigos boa noite!

    Gostaria da ajuda dos senhores para a seguinte questão. Gostaria que meu formulário ao selecionado o o campo "membro", todas as informações do membro solicitado fosse preenchidas tipo (tel,e-mail,endereço, etc). Vi algumas informações aqui no forum, porem só vi usando duas tabelas e eu estou usando 3 tabelas. Sei que tem como fazer só não sei como. Se algum amigo pode ajudar, sei grato.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  FabioPaes 24/9/2016, 14:01

    Bom dia amigo, Nao importa o Numero de Tabelas...

    Veja esse Vídeo bem simples que fiz: https://www.youtube.com/watch?v=2M17fp8C7gM

    Com ele será capaz de fazer o que precisa...


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    Almeidar
    Almeidar
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 398
    Registrado : 03/03/2015

    [Resolvido]Sistema de biblioteca Empty Biblioteca

    Mensagem  Almeidar 29/9/2016, 11:44

    Bom dia!

    Prezado amigo Fabio, mas uma vez estou aqui para te pedir uma ajuda. Fiz algumas alterações no formulário de de saída automatizando o preenchimento dos campos. Quando vai salvar as informações da uma mensagem dizendo que os registro já foram alterados. Teria como você me ajudar? Vou deixar o bd aqui para você ver o erro caso de para você me ajudar.
    Anexos
    [Resolvido]Sistema de biblioteca AttachmentBIBLIOTECA - Copia.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (659 Kb) Baixado 56 vez(es)
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  FabioPaes 29/9/2016, 19:42

    Amigo, desculpe o Termo, mas esse seu BD ja esta meio "Bagunçado", acho que fez muitos testes nele o...



    O Correto é vc fazer as alterações em um Backup, e somente mover para o arquivo final quanto estiver Pronta...

    Nesse arquivo que me mandou na tabela Cadastro de livros tem uns Caracter chines eu acho... Estranho...



    Vamos la... 

    Esta confundindo as coisas amigo, a tabela LIVROS e a tabela MEMBROS nao devem ser alteradas pelo formulario de Saida... Deve apenas buscar os dados nelas para salvar na Tabela de Movimentações... 
    Da forma como vc está fazendo estaria mudando a Tabela de cadastro de LIvro e a de Membros:

    [Resolvido]Sistema de biblioteca 2lvfk9u 

    O correto mesmo é Apenas a tabela de Movimentaçoes...


    Outra coisa Estranha é o Seu relacionamento amigo, Tem relações demais ali... Veja:

    [Resolvido]Sistema de biblioteca Zswh0y



    Veja que foi mudado alguns campo na sua tabela de Movimentaçoes, tais como:

    Autor, Titulo, Editora, Assunto e Email. Pois ambos estavam como numero e continham algum relacionamento...

    Baixe aqui o arquivo corrigido: https://www.dropbox.com/s/ed8p3niyvuhetvk/BIBLIOTECA%20-%20Copia%20%281%29.zip?dl=0


    Melhore esse Relacionamento...


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!

    Conteúdo patrocinado


    [Resolvido]Sistema de biblioteca Empty Re: [Resolvido]Sistema de biblioteca

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 9/5/2024, 06:50