Restaurar una base de datos de SQL Server desde código (VB)

Publicado el 10/Ene/2008
Actualizado el 10/Ene/2008
Autor: Guillermo 'guille' Som

En este artículo te muestro el código de Visual Basic 2005 (o superior) que puedes usar para restaurar una base de datos de SQL Server de la que previamente hiciste una copia de seguridad (backup).

Introducción:

Hace unos meses te mostré cómo hacer una copia de seguridad (por medio de código de VB y C#) de una base de datos de SQL Server.

En esta ocasión el código que te muestro es para lo contrario, es decir, para restaurar una copia (backup) que ya tengas.

He separado el código de Visual Basic del de C#, así que... si quieres ver el código de C# para restaurar una base de datos de SQL Server, supongo que ya sabes que debes pulsar en el link anterior... y si no lo sabes... pues... por eso te lo digo.

Nota:
Decirte que en las pruebas que he hecho, solo una base de datos se ha resistido a que la restaure... el error que me daba era de "TimeOut", pero ni cambiándole el valor de Time Out se ha solucionado el problema... te lo digo por si te pasa que no me vengas con quejas ni con preguntas de cómo solucionarlo, que si yo lo supiera, pues ya lo habría comentado... así que... si te surge ese problema, lo mejor es que lo comentes en mis foros a ver si alguien (más experto en SQL que yo), sabe la respuesta.

El código es bien simple, y esto solo vale para Visual Basic 2005 o cualquier versión superior, pero yo solo lo he probado con Visual Basic 2005 y Visual Basic 2008.
De todas formas, si quieres usarlo en alguna versión anterior, solo tendrás que cambiar la forma de conectarse al servidor de SQL Server.

El ZIP con el código, incluye dos proyectos, uno para Visual Basic 2005 y el otro para Visual C# 2005.

Espero que te sea de utilidad.

Nos vemos.
Guillermo

Espacios de nombres usados en el código de este artículo:

System.Data.SqlClient
 

'------------------------------------------------------------------------------
' Restaurar una copia de una base de SQL Server                     (10/Ene/08)
' Ejemplo para restaurar una copia de seguridad de SQL Server 2005
'
' ©Guillermo 'guille' Som, 2008
'------------------------------------------------------------------------------
Option Strict On

Imports System
Imports Microsoft.VisualBasic
Imports System.Windows.Forms

Imports System.Data.SqlClient

Public Class Form1

    Private Sub btnRestore_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnRestore.Click
        Me.btnRestore.Enabled = False
        Me.btnRestore.Text = "Restaurando..."
        Me.btnRestore.Refresh()

        Dim sBackup As String = "RESTORE DATABASE " & Me.txtBase.Text & _
                                " FROM DISK = '" & Me.txtBackup.Text & "'" & _
                                " WITH REPLACE"

        Dim csb As New SqlConnectionStringBuilder
        csb.DataSource = Me.txtServidor.Text
        ' Es mejor abrir la conexión con la base Master
        csb.InitialCatalog = "master"
        csb.IntegratedSecurity = True

        Using con As New SqlConnection(csb.ConnectionString)
            Try
                con.Open()

                Dim cmdBackUp As New SqlCommand(sBackup, con)
                cmdBackUp.ExecuteNonQuery()
                MessageBox.Show("Se ha restaurado la copia de la base de datos.", _
                                "Restaurar base de datos", _
                                MessageBoxButtons.OK, MessageBoxIcon.Information)

                con.Close()
            Catch ex As Exception
                MessageBox.Show(ex.Message, _
                                "Error al restaurar la base de datos", _
                                MessageBoxButtons.OK, MessageBoxIcon.Error)
            End Try
        End Using

        Me.btnRestore.Text = "Restaurar copia"
        Me.btnRestore.Enabled = True
        Me.btnRestore.Refresh()

    End Sub
End Class

Fichero con el código de ejemplo: Restore baseSQL.zip - 23.2 KB

(MD5 checksum: C9FCFFD7A5F20570776B0F569876232F)