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]Saber se tabela na minha base de dados está vazia

    avatar
    sedatedgurl
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 2
    Registrado : 08/12/2017

    [Resolvido]Saber se tabela na minha base de dados está vazia Empty [Resolvido]Saber se tabela na minha base de dados está vazia

    Mensagem  sedatedgurl 8/12/2017, 17:35

    Ola, gostaria como poderia saber se uma das minhas tabelas está vazia já tentei de varias formas mas sempre sem sucesso e além do mais sou meio novinha neste assunto. o meu codigo é o seguinte:

    Código:
    Sub VerificaPrimeiraVez()
           Try
              sql= "select Nome from Hotel NOTNULL"
               If sql=true Then  
                   If MsgBox("Deseja registrar os dados do seu hotel? ", MsgBoxStyle.YesNo, "Dados Empresariais") = MsgBoxResult.Yes Then
                       Registo.ShowDialog()
                   Else
                       MsgBox("Precisa de se registar para poder utilizar a aplicação.")
                       Application.Exit()
                   End If
               Else
                   Me.ShowDialog()
               End If

           Catch ex As Exception
               MsgBox(ex.Message)
           End Try


       End Sub

    obrigado e desculpem a minha falta de jeito para isto


    Última edição por sedatedgurl em 9/12/2017, 18:59, editado 2 vez(es)
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7700
    Registrado : 15/03/2013

    [Resolvido]Saber se tabela na minha base de dados está vazia Empty Re: [Resolvido]Saber se tabela na minha base de dados está vazia

    Mensagem  Alvaro Teixeira 8/12/2017, 18:13

    Olá Tânia Alexandra, Bem-Vinda ao fórum!

    Este fórum é de MS Access não VB.NET

    Para o que pretende em Access, será algo assim:
    Código:
    'ahteixera 2017 para MaximoAccess
    Dim dblContador As Double
    dblContador = DCount("*", "Hotel")

    If dblContador = 0 Then
        If MsgBox("Deseja registrar os dados do seu hotel? ", vbYesNo, "Dados Empresariais") = vbYes Then
            'Registo.ShowDialog()
        Else
            MsgBox ("Precisa de se registar para poder utilizar a aplicação.")
            DoCmd.Quit
        End If
    Else
        'Me.ShowDialog()
    End If

    Abraço
    avatar
    sedatedgurl
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 2
    Registrado : 08/12/2017

    [Resolvido]Saber se tabela na minha base de dados está vazia Empty Re: [Resolvido]Saber se tabela na minha base de dados está vazia

    Mensagem  sedatedgurl 8/12/2017, 18:33

    mt obrigado
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7700
    Registrado : 15/03/2013

    [Resolvido]Saber se tabela na minha base de dados está vazia Empty Re: [Resolvido]Saber se tabela na minha base de dados está vazia

    Mensagem  Alvaro Teixeira 9/12/2017, 13:07

    Olá Tânia Alexandra, obrigado pelo retorno.

    Se a dúvida ficou esclarecida, não se esqueça de dar o tópico como Resolvido, veja como fazer:
    https://www.maximoaccess.com/t860-resolucao-de-topicos

    Abraço

      Data/hora atual: 3/12/2022, 02:58