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]enviar nome digitado para tabela de logs

    avatar
    mcsanches
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 149
    Registrado : 10/06/2012

    [Resolvido]enviar nome digitado para tabela de logs Empty [Resolvido]enviar nome digitado para tabela de logs

    Mensagem  mcsanches 21/7/2012, 21:44

    boa noite meus amigos,

    gostaria de agradecer a atenção de todos voces

    gostaria de saber se é possivel armazenar logs de usuarios quando acessam o banco

    alguem pode me passar um exemplo?

    atenciosamente
    Lupércio
    Lupércio
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1143
    Registrado : 07/05/2011

    [Resolvido]enviar nome digitado para tabela de logs Empty Re: [Resolvido]enviar nome digitado para tabela de logs

    Mensagem  Lupércio 22/7/2012, 02:46

    mcsanches boa noite!

    Existe sim, crie uma tabela exemplo:TabelaUsuario e no form do login defina no botão:

    Private Sub Comando39_Click()
    Dim db1 As Database, db2 As Database, rs1 As DAO.Recordset, rs2 As DAO.Recordset, rs3 As DAO.Recordset

    If MsgBox("Confirma Transferencia?", vbYesNo + vbQuestion, "CONFIRMAR") = vbYes Then

    Set db1 = CurrentDb

    Set rs1 = db1.OpenRecordset("TabelaUsuario", dbOpenTable)

    With rs1

    .AddNew
    ![usuario] = Me.usuario


    .Update

    End With

    MsgBox "Transferencia confirmada.", vbOKOnly + vbInformation, "Concluído"

    End If


    End Sub


    Você armazenará o nome e senha ou somente o nome do usuario!

    Um abraço!
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2115
    Registrado : 13/04/2012

    [Resolvido]enviar nome digitado para tabela de logs Empty Re: [Resolvido]enviar nome digitado para tabela de logs

    Mensagem  Fernando Bueno 22/7/2012, 03:28

    Grande Lupercio
    Gos tei da dica, vai ser de grande serventia pra mim tb.
    Um abraço..
    Lupércio
    Lupércio
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1143
    Registrado : 07/05/2011

    [Resolvido]enviar nome digitado para tabela de logs Empty Re: [Resolvido]enviar nome digitado para tabela de logs

    Mensagem  Lupércio 22/7/2012, 13:16

    Grande Fernandão, um bom domingo amigo!
    avatar
    mcsanches
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 149
    Registrado : 10/06/2012

    [Resolvido]enviar nome digitado para tabela de logs Empty Re: [Resolvido]enviar nome digitado para tabela de logs

    Mensagem  mcsanches 22/7/2012, 16:51

    Lupércio obrigado... vou implementar e posto aqui assim que tiver o resultado

    vlw
    Lupércio
    Lupércio
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1143
    Registrado : 07/05/2011

    [Resolvido]enviar nome digitado para tabela de logs Empty Re: [Resolvido]enviar nome digitado para tabela de logs

    Mensagem  Lupércio 22/7/2012, 17:02

    Inclusive se você quiser adicionar um campo com data e hora, terá também o horário e a data que o usuário logou!

    Conteúdo patrocinado


    [Resolvido]enviar nome digitado para tabela de logs Empty Re: [Resolvido]enviar nome digitado para tabela de logs

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 01:53