Visual Basic - Backup SQL C/Visual Basic 6.00

Por favor como puedo hacer para crear backups y restaurar base de Datos SQL desde Visual Basic, muchas gracias de antemano

Tenés que usar la librería Microsft SQLDMO Object Library

Una vez que la referencias, el código es simple

Private sub Crear_Backup()
Set SqlState = New SQLDMO.SQLServer
SqlState.Start False, "PC1\BASESQL" , "sa", "password"
SqlState.Connect "PC1\BASESQL" , "sa", "password"
Dim oBackup As New SQLDMO.Backup
oBackup.Database = "MIBASEDEDATOS"
'************ NET ***************
oBackup.Files = "c:\BACKUP.bak"
' Backup de la Base de Datos.
oBackup.SQLBackup SqlState
Set oBackup = Nothing
End Sub

Private Sub Restore_backup()
Set SqlState = New SQLDMO.SQLServer
SqlState.Start False, "PC1\BASESQL" , "sa", "password"
DoEvents
SqlState.Connect "PC1\BASESQL" , "sa", "password"
Dim oRestore As SQLDMO.Restore
Set oRestore = New SQLDMO.Restore
oRestore.Database = "MIBASEDEDATOS"
oRestore.Files = "c:\BACKUP.bak"
' Restaura la base de datos.
oRestore.SQLRestore SqlState
Set oRestore = Nothing
End Sub

Suerte con tu proyecto

muchas gracias, por tu ayuda, probare tu sentencia

hOLA, disculpa q te moleste pero no tengo en mi equipo la referencia mencionas donde la puedo conseguir o me la puedes mandar porfavor te lo agradecere

La libreria se llama Microsoft SQLDMO Object Library