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]Abrir Banco de dados em um determinado dia

    avatar
    Fire
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 15/06/2014

    [Resolvido]Abrir Banco de dados em um determinado dia Empty [Resolvido]Abrir Banco de dados em um determinado dia

    Mensagem  Fire 29/12/2014, 17:20

    Boa tarde.
    Venho novamente pedir ajuda a todos aqui no forum.
    Preciso deixar meu bd zero em varias maquinas mais gostaria que ele só pudesse abrir somente dia 01.
    Então quando alguem tenta-se abrir, aparece-se uma mensagem "Sistema somente liberado dia 01"
    e quando fosse dia primeiro ele deixa-se abrir normalmente.

    obg. quem puder me ajudar
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5078
    Registrado : 20/04/2011

    [Resolvido]Abrir Banco de dados em um determinado dia Empty Re: [Resolvido]Abrir Banco de dados em um determinado dia

    Mensagem  Silvio 29/12/2014, 17:30

    Boa tarde...

    Supondo que esse banco deve estar com BE e FE e que cada estação já tenha o FE instalado...então no primeiro formulário que abre no FE:

    Código:
    Private Sub Form_Load()

    If Date < #1/01/2015# Then ' se data for menor que 01/01/2015
                'Mês/Dia/Ano
    MsgBox "Sistema somente liberado dia 01 ! ", vbCritical, me.caption
    DoCmd.Quit 'encerra o sistema
    End If
    Exit Sub
    End Sub


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    avatar
    Fire
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 15/06/2014

    [Resolvido]Abrir Banco de dados em um determinado dia Empty Re: [Resolvido]Abrir Banco de dados em um determinado dia

    Mensagem  Fire 29/12/2014, 17:36

    blz, Silvio

    Valeu mesmo. cheers cheers
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5078
    Registrado : 20/04/2011

    [Resolvido]Abrir Banco de dados em um determinado dia Empty Re: [Resolvido]Abrir Banco de dados em um determinado dia

    Mensagem  Silvio 29/12/2014, 17:48

    O fórum agradece o retorno !


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."

    Conteúdo patrocinado


    [Resolvido]Abrir Banco de dados em um determinado dia Empty Re: [Resolvido]Abrir Banco de dados em um determinado dia

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 15/5/2024, 17:49