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


4 participantes

    [Resolvido]Quem Introduziu e Alterou

    avatar
    Gerson
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 405
    Registrado : 25/08/2010

    [Resolvido]Quem Introduziu e Alterou Empty Quem Introduziu e Alterou

    Mensagem  Gerson 12/2/2011, 10:22

    Olá Pessoal,

    Como sempre Jpaulo nos motiva mais e mais. Baixei o exemplo Quem Introduziu e Quem alterou e com certeza é uma função que todos os Banco de Dados poderão utilizar o que eu gostaria de fazer com esse exemplo seria controlar todas as vezes que alguem alterasse um registro sem desfazer a anotação do procedimento anterior, ou seja um usuário colocou no campo preço 20,00 e outro usuário alterasse para 30,00 como manter os 2 registros gravados ? Outra coisa como poderei ampliar para outros formularios do BD a mesma rotina ?
    Abraços.
    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]Quem Introduziu e Alterou Empty Re: [Resolvido]Quem Introduziu e Alterou

    Mensagem  criquio 12/2/2011, 12:19

    Para manter todo o histórico de alterações, talvez fosse melhor criar um bd separado apenas com essa tabela, pois com o tempo, o volume de dados aumentará muito. Uma outra saída seria deixar as alterações gravadas em um arquivo de texto por exemplo. Nesses casos, você só precisaria dos campos apropriados na tabela ou arquivo de texto, como Data, Hora, Usuário, Form de entrada, Campo, Valor antigo, Novo valor...


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

    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Quem Introduziu e Alterou Empty Re: [Resolvido]Quem Introduziu e Alterou

    Mensagem  vieirasoft 12/2/2011, 13:06

    O Criquio tem razão. O melhor é criar uma BD para receber o histórico e manter assim a sua BD fresca e leve.

    1- Criar uma nova BD
    2- Criar a tabela

    Um botão de comando e no evento click

    Dim strSQL As String
    DoCmd.SetWarnings False
    strSQL = "INSERT INTO bdHistorico (Chave Primária, Meu campo1, Meu campo2,Meu campo3 ) IN 'C:\bdHistorico.mdb'" & _
    "SELECT suaTabela.Chave Primária, Meu campo1, Meu campo2,Meu campo3,Conclusões" & _
    " FROM SuaTabela WHERE SuaTabela.ChavePrimária= " & Me.ChavePrimária
    DoCmd.RunSQL strSQL
    strSQL = "DELETE * FROM suaTabela WHERE ChavePrimária = " & Me.ChavePrimária
    DoCmd.RunSQL strSQL
    DoCmd.SetWarnings True
    End If

    assim os dados são exportados e podem ser chamados em qualquer altura para consulta, sem pesarem na bd principal
    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]Quem Introduziu e Alterou Empty Re: [Resolvido]Quem Introduziu e Alterou

    Mensagem  criquio 12/2/2011, 13:22

    Isso isso isso

    Estou transferindo o tópico para outra área, uma vez que o Repositório é destinado à postagem de exemplos.


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

    avatar
    Gerson
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 405
    Registrado : 25/08/2010

    [Resolvido]Quem Introduziu e Alterou Empty Quem Introduziu e Alterou

    Mensagem  Gerson 13/2/2011, 10:19

    Bom dia pessoal,
    precisei sair ontem e obrigado pelo retorno.
    O caso é:
    Quero experimentar as sugestões que vocês enviaram, mas surgiu alguma dúvidas.
    Utilizado o próprio BD do JPaulo há um registro digamos ID 01
    Quando um outro usuário ou o mesmo retornar ao registro e fazer uma edição só haverá naturalmente como foi projetado o registro para essa modificação.(a idéia e monitorar toda movimentação)
    1) No caso de criar outro BD para vizualizar os registros não seria o caso de exportar so dados do BD de origem , no caso só a tabela de Registros ?
    2)Se a Idéia do subformulário for possível como faço a referencia no novo BD ?
    Obrigado,
    Gerson
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Quem Introduziu e Alterou Empty Re: [Resolvido]Quem Introduziu e Alterou

    Mensagem  JPaulo 13/2/2011, 11:07

    Tudo junto fica com um historico completo.

    http://maximoaccess.forumeiros.com/t526-resolvidohistorico-de-alteracoes

    http://maximoaccess.forumeiros.com/t530-registra-um-historico-de-alteracoes

    http://maximoaccess.forumeiros.com/t520-resolvidoarquivo-historico



    .................................................................................
    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]Quem Introduziu e Alterou Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Quem Introduziu e Alterou Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Quem Introduziu e Alterou Folder_announce_new Instruções SQL como utilizar...
    avatar
    Gerson
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 405
    Registrado : 25/08/2010

    [Resolvido]Quem Introduziu e Alterou Empty Quem Introduziu e Alterou

    Mensagem  Gerson 13/2/2011, 11:29

    Jpaulo,

    Sem mais. Perfeito! está resolvido ! Obrigado até breve e bom domingo.
    Abraços,

    Gerson
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Quem Introduziu e Alterou Empty Re: [Resolvido]Quem Introduziu e Alterou

    Mensagem  JPaulo 13/2/2011, 12:01

    Obrigado pelo retorno amigo Gerson, bom domingo.


    .................................................................................
    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]Quem Introduziu e Alterou Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Quem Introduziu e Alterou Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Quem Introduziu e Alterou Folder_announce_new Instruções SQL como utilizar...

    Conteúdo patrocinado


    [Resolvido]Quem Introduziu e Alterou Empty Re: [Resolvido]Quem Introduziu e Alterou

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/5/2024, 08:29