MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Abrir formulário sem dados

    Compartilhe

    m_araujo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 95
    Registrado : 15/11/2012

    [Resolvido]Abrir formulário sem dados

    Mensagem  m_araujo em Ter 01 Ago 2017, 00:23

    Boa noite

    Pessoal como se faz para ao abrir um formulário que não tenha nada inserido, repeitando a seguinte condição

    Código:

    'On Error Resume Next
        If id.Value = "" Then
            Me.aviso.Caption = "Sem dados a ser exibido..."
            Me.AllowAdditions = False
            Me.AllowEdits = False
        ElseIf status.Value = "ENCERRADO" Then
            Me.AllowAdditions = False
              Me.AllowEdits = False
        Else
          Me.aviso.Caption = "Vizualizando Reserva..."
        End If
            Sair.SetFocus





    Quando vou abrir o formulário apresenta erro,
    avatar
    ronaldojr1
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 292
    Registrado : 01/08/2011

    Re: [Resolvido]Abrir formulário sem dados

    Mensagem  ronaldojr1 em Ter 01 Ago 2017, 12:49

    vc pode postar o bd de exemplo para podermos analisar melhor?
    grato

    m_araujo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 95
    Registrado : 15/11/2012

    Re: [Resolvido]Abrir formulário sem dados

    Mensagem  m_araujo em Ter 01 Ago 2017, 14:29

    Bom dia!

    Amigo, tudo bem?

    segue
    o BD, o formulário é o de lançamento de reserva.
    Anexos
    SGR_VER 2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (926 Kb) Baixado 10 vez(es)
    avatar
    ronaldojr1
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 292
    Registrado : 01/08/2011

    Re: [Resolvido]Abrir formulário sem dados

    Mensagem  ronaldojr1 em Ter 01 Ago 2017, 18:29

    boa tarde

    para funcionar sua condição na abertura primeiro retire o codigo do evento ao abrir, sempre tente evitar trabalhar com dados
    nesse evento pq os dados ainda nao foram totalmente carregados pelo formulario, com isso o formulario pode ter comportamentos estranhos.
    sempre trabalhe com o evento ao carregar do form

    insira o codigo a seguir no evento ao carregar do form

    Código:

    Private Sub Form_Load()
    Me.AllowEdits = True 'nao sei se é por isso, mas acho que apresentava o erro pq formulario estava bloqueado, ai o access nao conseguia manipula os campos envolvidos na sua condição.
    Me.AllowAdditions = True

    If IsNull(Me.id) Then
        Me.aviso.Caption = "Sem dados a ser exibido..."
        Me.AllowAdditions = False
        Me.AllowEdits = False
     Else
        If Me.status = "ENCERRADO" Then
              Me.AllowAdditions = False
              Me.AllowEdits = False
        End If
        Me.aviso.Caption = "Vizualizando Reserva..."
    End If
    Sair.SetFocus

    End Sub




    m_araujo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 95
    Registrado : 15/11/2012

    Re: [Resolvido]Abrir formulário sem dados

    Mensagem  m_araujo em Ter 01 Ago 2017, 19:47

    Boa tarde, meu amgio obrigado!
    mais a tela fica toda em branco mesmo?
    so mostra os Text e o Rotulos quando mando incluir algo, não teria de outra forma não?

    Grato!
    avatar
    ronaldojr1
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 292
    Registrado : 01/08/2011

    Re: [Resolvido]Abrir formulário sem dados

    Mensagem  ronaldojr1 em Ter 01 Ago 2017, 21:10

    amanha cedo eu do uma olhada para ver se da pra nos fazermos algo a respeito.

    m_araujo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 95
    Registrado : 15/11/2012

    Re: [Resolvido]Abrir formulário sem dados

    Mensagem  m_araujo em Qua 02 Ago 2017, 15:20

    Boa tarde!

    Amigos, conseguir resolver.
    eu apenas criei um função de desabilitar os txtbox e outra para ativa.
    funcionou muito bem ate agora.

    obrigado!
    avatar
    ronaldojr1
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 292
    Registrado : 01/08/2011

    Re: [Resolvido]Abrir formulário sem dados

    Mensagem  ronaldojr1 em Qua 02 Ago 2017, 21:02

    disponha precisar estamos ai
    o forum agredece o retorno.

      Data/hora atual: Ter 21 Nov 2017, 10:09