Alguém sabe se existe um código VB para fechar um banco de dados sem precisar usar a macro sair.
2 participantes
[Resolvido]Código para fechar um BD
Grande- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 28
Registrado : 04/09/2012
- Mensagem nº1
Código para fechar um BD
Leandro- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1601
Registrado : 12/11/2009
- Mensagem nº2
Re: [Resolvido]Código para fechar um BD
Faça sua escolha!
DoCmd.Quit acQuitPrompt 'Pergunta se quer salvar os dados não salvos
DoCmd.Quit acQuitSaveAll 'Salva tudo
DoCmd.Quit acQuitSaveNone 'Não salva
DoCmd.Quit acQuitPrompt 'Pergunta se quer salvar os dados não salvos
DoCmd.Quit acQuitSaveAll 'Salva tudo
DoCmd.Quit acQuitSaveNone 'Não salva
.................................................................................
Grande- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 28
Registrado : 04/09/2012
- Mensagem nº3
Re: [Resolvido]Código para fechar um BD
Já resolvi.
Private Sub btnSair_Click()
If MsgBox(" Deseja fechar o sistema?", vbYesNo + vbDefaultButton1 + vbInformation, "Aviso!") = vbYes Then
DoCmd.Quit acSave
End If
End Sub
Private Sub btnSair_Click()
If MsgBox(" Deseja fechar o sistema?", vbYesNo + vbDefaultButton1 + vbInformation, "Aviso!") = vbYes Then
DoCmd.Quit acSave
End If
End Sub
Última edição por Grande em 28/9/2012, 01:11, editado 1 vez(es)
Grande- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 28
Registrado : 04/09/2012
- Mensagem nº4
Re: [Resolvido]Código para fechar um BD
Ok Leandro valeu pela dica.
Leandro- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1601
Registrado : 12/11/2009
- Mensagem nº5
Re: [Resolvido]Código para fechar um BD
Ótimo!!
Não esqueça o resolvido no tópico, beleza?
Abraço
Não esqueça o resolvido no tópico, beleza?
Abraço
.................................................................................
Grande- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 28
Registrado : 04/09/2012
- Mensagem nº6
Re: [Resolvido]Código para fechar um BD
Ta certo cara me desculpe um abraço e até mais.
Leandro- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1601
Registrado : 12/11/2009
- Mensagem nº7
Re: [Resolvido]Código para fechar um BD
Não precisa se desculpar não meu caro, isso é força do hábito,
.................................................................................
» [Resolvido]Código para fechar o Access
» [Resolvido]Código em botão para fechar BD Atual e abrir um outro BD
» [Resolvido]Abrir Formulário e só prosseguir com o código ao fechar o mesmo
» [Resolvido]Código ao fechar mesa Deleta registros inseridos na tabela.
» Fechar visualizaçao de relatorio sem fechar o sistema voltando para formulario princinpal
» [Resolvido]Código em botão para fechar BD Atual e abrir um outro BD
» [Resolvido]Abrir Formulário e só prosseguir com o código ao fechar o mesmo
» [Resolvido]Código ao fechar mesa Deleta registros inseridos na tabela.
» Fechar visualizaçao de relatorio sem fechar o sistema voltando para formulario princinpal