Descrição:
Como fazer o backup de um banco de dados através do E3?
Solução:
Para isso, há duas possibilidades:
1. Se o banco de dados for Access, copie o arquivo correspondente ao banco de dados manualmente.
2. Se o banco de dados for SQL, crie um botão na tela e, no seu evento Click, insira um script que envie um comando ao SQLServer para executar o backup. Por exemplo:
'Cria o objeto backup do banco de dados:
'Referencia o ActiveX:
Set Server = CreateObject("SQLDmo.SqlServer")
'Habilita verificação de login e cria uma conexão confiável:
Server.LoginSecure = True
Server.Connect SQLServer
'BackUp efetivo:
Set objBackup = CreateObject("SQLDMO.Backup")
'Configura propriedades:
objBackup.BackupSetName = NomeArqBackUp
objBackup.Database = NomeBD
objBackup.Action = "0"
objBackup.BackupSetDescription = BackupSetDescription
objBackup.Files = NomeArqBackUp & ".bak"
objBackup.TruncateLog = "0"
objBackup.Initialize = True
objBackup.SQLBackup Server
'Desconecta do servidor SQL:
Server.disconnect
'clean up
set Server = nothing
set objBackup = Nothing
Como faço para fazer essa consulta com o SQL Server 2014 , sendo que nao tem instalado o DMO do SQL Server?
Bom dia Fabiano,
A Microsoft não distribui mais as bibliotecas DMO desde o SQL Server 2008.
Para realizar o backup do banco, sugiro que verifique este artigo:
https://kb.elipse.com.br/linguagem-sql-capitulo-4-backup/