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]mensagens e formularios

    avatar
    amandaalves1
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 482
    Registrado : 01/02/2010

    [Resolvido]mensagens e formularios Empty mensagens e formularios

    Mensagem  amandaalves1 17/8/2011, 20:51

    Olá pessoal tem como eliminar as mensagens do access, como por exemplo não encontrar dados e dar a mensagem não existem dados a serem exibidos, ai ao invez das mensagem de caixa de dialogos criar um formulario para que o sistema fique com um aspecto mais bonito, obrigada

    se alguém tiver um exemplo e puder disponibilizar para estudo
    avatar
    Convidado
    Convidado


    [Resolvido]mensagens e formularios Empty Re: [Resolvido]mensagens e formularios

    Mensagem  Convidado 17/8/2011, 21:42

    Essas mensagens que diz aparece em quais situacoes amanda?

    Saudacoes
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]mensagens e formularios Empty Re: [Resolvido]mensagens e formularios

    Mensagem  vieirasoft 17/8/2011, 21:50

    Private Sub Form_Load()
    DoCmd.SetWarnings = False
    End Sub
    avatar
    Convidado
    Convidado


    [Resolvido]mensagens e formularios Empty Re: [Resolvido]mensagens e formularios

    Mensagem  Convidado 17/8/2011, 21:53

    Very Happy Esse e meu mestre.. Sou Fa dele hehehe

    Abracos Vierao
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]mensagens e formularios Empty Re: [Resolvido]mensagens e formularios

    Mensagem  vieirasoft 17/8/2011, 21:54

    Fui dar uma volta e o Outono de Agosto aqui refrescou-me a memória, hehehehe
    avatar
    amandaalves1
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 482
    Registrado : 01/02/2010

    [Resolvido]mensagens e formularios Empty Re: [Resolvido]mensagens e formularios

    Mensagem  amandaalves1 18/8/2011, 01:13

    Oi meus amigos, eu gostaria que fosse assim, por exemplo se eu fizesse uma pesquisa me retornasse uma mensagem por meio de formulario, tipo assim, digamos que fosse fazer uma pesquisa dai que desse um erro qualquer, o access por si própio vai emitir uma mensagem certo, então gostaria de dar uma mudada o invez de ser aquelas caixas de dialogos do próprio access, fosse por um intermédio de um formulário, tem aquela uma que quando navegamos pelos registro e chegamos ao ultimo ou ao primeiro não será emitido a mensagem vc não pode ir para o registro especificado, então gostaria de usar um formulario para as mensagens serem exibidas,não sei se dará certo e se tem como , epero ter sido mais clara. Abraços
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]mensagens e formularios Empty Re: [Resolvido]mensagens e formularios

    Mensagem  vieirasoft 18/8/2011, 10:48

    Não precisa de criar formulários para isso. Basta assim, como este exemplo:

    Private Sub Comando34_Click()
    On Error GoTo Err_Comando34_Click
    Dim Msg, Style, Title ' (sempre igual)
    Msg="Não existem mais registros a visualizar" ' Esta mensagem pode ser alterada
    Style=vbInformation ' o Tipo de caixa também (vbCritical, vbYesNo, etc)
    Title="Aviso" 'o Título também pode ser alterado

    DoCmd.GoToRecord , , acPrevious

    Exit_Comando34_Click:
    Exit Sub

    Err_Comando34_Click:
    Msg=MsgBox (Msg,Style,Title) 'aqui substituimos a mensagem padrão do Access
    Resume Exit_Comando34_Click

    End Sub
    avatar
    Convidado
    Convidado


    [Resolvido]mensagens e formularios Empty Re: [Resolvido]mensagens e formularios

    Mensagem  Convidado 18/8/2011, 11:44

    Pode ser assim tambem

    Private Sub Comando34_Click()
    On Error Goto TrataErro

    '............Codigos

    Exit Sub


    TrataErro:
    If err.Number = XXX Then 'Onde XXX é o numero do erro que recebe
    MsgBox "Sua Mensagem para este Erro", vbCritical, "ERRO"
    Exit Sub
    Else
    MsgBox Error, , "Erro nº" & err & " em Comando34_Click"
    End If
    End Sub


    **** Pode adicionar quantos if's desejar conforme as mensagens de erro
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]mensagens e formularios Empty Re: [Resolvido]mensagens e formularios

    Mensagem  vieirasoft 20/8/2011, 17:20

    Como não retornou, o tópico passa a resolvido. Qualquer coisa reabra, por favor.
    avatar
    amandaalves1
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 482
    Registrado : 01/02/2010

    [Resolvido]mensagens e formularios Empty Re: [Resolvido]mensagens e formularios

    Mensagem  amandaalves1 20/8/2011, 18:40

    Olá amigos, acabei de ver as repostas vou testar e depois retorno, um grande abraço e ótimo final de semana a todos

    Conteúdo patrocinado


    [Resolvido]mensagens e formularios Empty Re: [Resolvido]mensagens e formularios

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 23:34