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


    [Resolvido]Excluir usuário específico em Form, no qual todos são visualizados

    Access365
    Access365
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 288
    Registrado : 09/07/2012

    [Resolvido]Excluir usuário específico em Form, no qual todos são visualizados Empty Excluir usuário específico em Form, no qual todos são visualizados

    Mensagem  Access365 13/9/2012, 19:27

    Olá pessoal... Alguém sabe resolver isso aqui? (rs)
    -----
    Private Sub btnExcluir_Click()
    MsgBox "USUÁRIO: " & txtLogin & ".", vbExclamation, "Aviso"
    If MsgBox("Deseja excluir o usuário " & txtLogin & "?", _
    vbQuestion + vbYesNo, "Aviso") = vbYes Then
    DoCmd.RunCommand acCmdSelectRecord
    DoCmd.RunCommand acCmdDeleteRecord
    End If
    End Sub
    ----

    Na verdade, só aparece a cx. de mensagem padrão do Access2003: "Você está prestes a excluir i registro bla bla bla..."
    Não quero está mensagem... (rsrs)

    Eu quero a minha mensagem:
    -----
    Private Sub btnExcluir_Click()
    MsgBox "USUÁRIO: " & txtLogin & ".", vbExclamation, "Aviso"
    If MsgBox("Deseja excluir o usuário " & txtLogin & "?", _
    vbQuestion + vbYesNo, "Aviso") = vbYes Then
    CurrentDb.Execute "DELETE * FROM Usuario WHERE txtLogin= '" Me.login "'"
    DoCmd.RunCommand acCmdRefreshPage
    MsgBox "O usuário " & txtLogin & " foi excluído.", vbInformation, "Aviso"
    Form_CadastroUser.Requery
    Else
    End If
    End Sub
    -------
    O problema que neste Form, a medida em que usuários são cadastrados, ELE vai criando linhas... Eu já "mexi um monte", mas fica sempre aparecendo a mensagem padrão do Access2003 e as vezes pergunta se quero excluir 10 registros de uma vez (socorro né... excluir todo mundo) E outra quando clico em não da mensagem padrão do Access2003... ele abre o depurar VB.

    Desde já, eu agradeço!
    Paulo César
    avatar
    Convidado
    Convidado


    [Resolvido]Excluir usuário específico em Form, no qual todos são visualizados Empty Re: [Resolvido]Excluir usuário específico em Form, no qual todos são visualizados

    Mensagem  Convidado 13/9/2012, 22:52

    Boas info...

    Para inibir as menssagens padrão do access na execução de consultas em vba ou mesmo comandos do tipo..

    Antes:
    DoCmd.SetWarnings False

    Depois:
    DoCmd.SetWarnings True


    Cuprimentos.
    Access365
    Access365
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 288
    Registrado : 09/07/2012

    [Resolvido]Excluir usuário específico em Form, no qual todos são visualizados Empty Re: [Resolvido]Excluir usuário específico em Form, no qual todos são visualizados

    Mensagem  Access365 14/9/2012, 16:36

    Funfou!

    Muito obrigado Piloto... vc é um cara muito legal!
    Sempre me salvando... rsrs

    Muita luz luz pra vc!
    Abraço!
    Paulo César
    avatar
    Convidado
    Convidado


    [Resolvido]Excluir usuário específico em Form, no qual todos são visualizados Empty Re: [Resolvido]Excluir usuário específico em Form, no qual todos são visualizados

    Mensagem  Convidado 14/9/2012, 16:57

    O Fórum agradece o retorno.

    Conteúdo patrocinado


    [Resolvido]Excluir usuário específico em Form, no qual todos são visualizados Empty Re: [Resolvido]Excluir usuário específico em Form, no qual todos são visualizados

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 07:39